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《30 天 自制 操作 系统 》 中 文 版 终于 和 国内 读者 见面 
了 了。 标题 一 出 ， 有 人 说 “XX 天 ”这 种 标题 真 不 靠 
谱 ， 不 过 ， 作 者 取 这 个 标题 ， 并 非 随 随便 便 之 举 。 
打 个 比方 ,，“30 天 学 会 核 物 理 ” 看 起 来 “ 假 大 空 ”， 如 
果 改 成 “30 天 自制 微型 反应 堆 * 呢 ?虽然 可 能 还 是 太 
难 了 ， 但 至 少 你 知道 30 天 之 后 一 定 能 做 出 一 个 反应 
HER HEIA) 。 这 本 书 正 是 属于 后 者 : 不 管 多 
简单 ， 它 都 是 一 个 真正 意义 上 的 操作 系统 ， 更 何况 
它 还 真 不 简单 ，40KB 便 实现 了 图 形 界面 、 多 任务 
等 高 级 功能 。 只 要 跟着 作者 的 脚步 ， 你 也 能 做 到 。 
即便 只 是 抄 抄 代码 ， 也 必定 有 所 收获 。 


这 本 书 的 定位 是 零 基 础 的 读者 ， 作 者 甚至 找 了 中 学 
ERAI, Va SIA Te, PAPER. MENFE, 
我 很 喜欢 这 样 的 风格 ， 因 为 可 以 把 很 多 好 玩 的 流行 
词汇 代入 进去 ， 不 会 破坏 原 书 的 意境 ， 还 能 让 大 家 
看 起 来 更 有 意思 。 从 技术 角度 来 看 ， 这 本 书 并 没有 
过 多 地 解释 技术 细 市 。 作 者 认为 ， 目 制 操作 系统 最 
终 的 目的 还 是 为 了 好 玩 。 因 此 ， 想 从 这 本 书 系统 学 
习 计 算 机 原理 、 汇 编 语言 、C 语 言 等 知识 是 不 现实 
的 ， 但 你 一 定 能 够 获得 男 一 种 完全 不 同 的 体验 。 


这 本 书 的 一 大 特色 是 “从 失败 中 学 习 ”， 每 次 我 们 为 


这 个 操作 系统 实现 一 些 芒 能 ， 一 开始 总 会 有 一 些 漏 
词 和 缺 了 哆 ， 甚 全 根本 不 能 工作 。 这 些 漏洞 都 是 刻意 
安排 的 。 作 者 化 了 很 大 坑 幅 来 引导 读者 去 寻找 并 及 
现 这 些 漏洞 ， 并 从 中 学 习 如 何 让 系统 变 得 更 加 完 

善 。 这 种 思路 非常 有 趣 ， 也 符合 实际 开 及 过 程 ， 爷 
吾 后 垂 力 是 成 陨 感 和 笠 福 感 的 源 果 。 市 面 上 的 技术 
类 书籍 ， 很 少 有 这 种 “ 试 错 ? 的 过 程 ， 因 为 这 需要 精 
心 的 安排 ， 而 且 占 用 大 量 的 遍 幅 。 这 正 是 这 本 书 的 
与 众 不 同 之 处 ， 也 古 我 认为 值得 问 大 家 推荐 它 的 主 
要 理由 。 


如 果 你 是 一 位 高 手 ， 可 能 会 觉得 这 本 书 的 内 容 并 不 
是 那么 系统 和 有 有 条理， 甚至 党 得 做 出 来 的 操作 系统 
在 很 多 方面 的 处 理 都 很 简陋 ， 算 不 上 一 个 实用 的 系 
统 。 连 作者 自己 都 说 : “这 本 书 无 论 在 哪个 方面 都 
只 有 半 瓶 酷 。?” 不 过 ， 作 者 是 在 带领 大 家 从 零 开始 
编写 一 个 系统 ， 而 并 不 是 以 一 个 现成 的 内 核 〈 如 

Linux, FreeBSD) 为 基础 一 一 后 者 才 是 目前 自制 系 
统 的 主流 方式 。 然 而 ， 只 有 从 零 开 始 ， 才 能 真正 了 
解 系统 底层 是 如 何 运 作 的 ， 对 于 在 其 他 内 核 上 构筑 
系统 也 大 有 神 益 。 男 外 ， 干 万 别 态 了 读 一 读 最 后 那 
个 叫做 “这 也 能 叫 目 制 操作 系统 ? 太 坑 爹 了 ! ”的 专 
栏 ， 作 者 早 就 预料 到 了 读者 的 各 种 吐槽 ， 看 过 之 

后 ， 你 可 能 束 会 理解 作者 的 民 藻 用 心 了 。 


这 本 书 讲 到 了 “日 文 显示 ”， 在 翻译 上 相当 纠结 。 由 


于 操作 系统 都 是 底层 代码 ， 有 替 一 发 而 动人 全身 ， 为 了 
不 改动 原 书 的 结构 和 代码 ， 中 文 版 在 原 汁 原味 保留 
原 书 文字 的 基础 上 ， 补 充 了 一 些 中 文 显示 的 相关 内 
容 ， 以 体现 两 者 在 实现 上 的 异同 。 好 在 基本 上 只 要 
蔡 换 字库 和 编码 方式 ， 就 可 以 实现 中 文 显示 ， 其 至 
比 日 文 还 简单 些 。 这 部 分 补充 内 容 是 我 目 己 写 的 ， 
(AR A RUA Re, ABET, WAT Ra 
漏 ， 欢 迎 各 位 高 手 随 时 拍 砖 。 此 外 ， 关 于 光盘 中 代 
人 码 的 注释 ， 由 于 量 大 繁杂 ， 恕 无 法 翻译 成 中 文 ( 书 
中 代码 注释 已 翻译 ) » JR. WRENN 
乱码 ， 请 用 UltraEdit 等 编辑 器 以 Shift-JIS 编 码 打开 ， 
就 可 以 看 到 正常 的 日 文 了 。 


最 后 ， 在 这 里 衷心 感谢 其 他 三 位 译 者 ， 以 及 图 灵 公 

司 各 位 编辑 的 共同 努力 ， 使 得 这 本 书 能 够 最 终 问 
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“好 想 编 写 一 个 操作 系统 呀 ! ”笔者 的 朋友 曾 说 这 是 
所 有 程序 员 痢 曾经 怀揣 的 一 个 梦想 。 说 “所 有 的 程 
序 员 ?可 能 有 点 付 张 了 ， 不 过 作为 程序 员 的 梦想 ， 

它 至 少 也 应 该 能 排 进 前 十 名 吧 。 


也 许 很 多 人 和 澳 得 编写 操作 系统 是 个 天 方 夜 齐 ， 这 一 
定 是 操作 系统 业界 的 一 个 阴谋 《〈 笑 ) 。 他 们 故意 让 
大 家 相信 编写 操作 系统 是 一 件 非常 困难 的 事情 ， 这 
样 融 可 以 高 价 兜售 目 己 开发 的 操作 系统 ， 而 且 操作 
系统 的 作者 还 会 被 顶礼 膜拜 。 那 么 实际 情况 又 怎么 
RENE? 和 列 的 程序 相 比 ， 其 实 编写 操作 系统 并 没有 
那么 难 ， 人 至 少 笔者 的 感觉 是 这 样 。 


在 各 位 读者 之 中 ， 也 许 有 人 曾经 挑战 过 操作 系统 的 
编写 ， 但 因为 太 难 而 放弃 了 了。 拥有 这 样 经 历 的 人 也 
许 不 会 认同 笔者 的 观点 。 其 实 你 错 了 ， 你 的 失败 并 
不 是 因为 编写 操作 系统 太 难 ， 而 是 因为 没有 人 告诉 
你 那 其 实 是 一 件 很 简单 的 事 而 已 。 


不 仅 是 编写 操作 系统 ， 任 何事 痢 是 一 样 的 。 如 果 讲 
解 的 人 认为 它 很 难 ， 那 就 不 可 能 把 它 讲述 得 通俗 易 
情 ， 即 便 是 同样 的 内 容 ， 也 会 讲 得 无 比 复杂 。 这 样 
的 讲解 ， 肯 定 是 很 难 展 的 。 


那么 ， 你 想 不 想 和 笔者 一 起 再 挑战 一 次 呢 ? 如 果 你 
曾经 梦想 过 编写 目 己 的 操作 系统 ， 一 定 会 觉得 乐 在 
其 中 的 。 


可 能 有 人 会 说 ， 这 本 书 足 足 有 700 多 页 ， 怎 么 会 “有 
ER” A“ fay Pe? 唔 ， 这 么 一 说 笔者 也 觉得 挺 心 虚 
的 ， 不 过 其 实 也 只 是 长 了 那么 一 点 点 啦 。 平 均 下 来 
的 话 ， 每 天 只 有 大 约 23 页 的 内 容 ， 你 看 ， 也 没有 那 
AKIE? 
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得 很 快 。 但 是 这 样 的 话 可 能 印象 不 会 很 深 ,最 好 还 
古 能 静 下 心 来 慢 慢 地 读 。 书 中 所 展示 的 程序 代码 和 
文字 的 说 明 同 样 重 要 ， 因 此 也 希望 大 家 仔细 阅读 。 
只 要 注意 这 些 ， 理 解 本 书 的 内 容 就 应 该 没有 问题 

J. 


在 本 书 中 ， 我 们 使 用 C 语 言 和 汇编 语言 来 编写 操作 
系统 ， 不 过 不 必 担 心 ， 你 可 以 在 阅读 本 书 的 同时 来 
逐步 学 习 关 于 这 些 编程 语言 的 知识 。 本 书 在 这 方面 
写 得 非 第 仔细， 如果 能 有 人 通过 本 书 终于 把 C 语 言 
中 的 指针 给 摘 全 了 ， 那 笔者 的 目的 也 就 达到 了 。 即 
便 是 从 这 样 的 水 平 开 始 ，30 天 后 你 也 能 够 编写 出 一 
个 很 棒 的 操作 系统 ， 请 大 家 拭 目 以 行 吧 ! 
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。 操 作 系 统 开 发 中 的 困难 
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无 二 的 、 个 性 化 的 PC《〈 个 人 电脑 )》 对 我 们 来 说 已 不 
再 困难 。 不 仅 如 此 ， 只 要 使 用 合适 的 编译 器 ， 我 
们 就 可 以 自己 编写 游戏 、 制 作 上 自己 的 工具 软件 ;使 
用 网 页 制作 工具 ， 我 们 还 可 以 轻而易举 地 制作 主 
页 ， 如 果 看 过 名 著 《CPU 制 作法 》:2 的 话 ， 就 连 自 
制 CPU 也 不 在 话 下 。 


-英文 为 compiler， 指 能 够 将 源 代 码 编 译 成 机 噩 但 
的 软件 。 


“《CPU 制 作法 》， 渡 波 郁 著 ， 每 日 
Communications HIKA =], ISBN 4-8399-0986-5。 


然而 ， 在 “自制 领域 "里 至 今 还 有 一 个 无 人 涉足 的 课 
题 一 一 日 己 制作 操作 系统 OS) “， 它 看 起 来 太 难 
以 至 于 初学 者 不 敢 轻 易 挑 战 。 电 脑 组 竣 也 好 ， 游 
戏 、 工 具 软 件 制作 也 好 ， 主 页 也 好 ，CPU 也 好 ， 这 
些 都 已 经 成 为 初学 者 能 够 答 试 的 项 目 ， 而 唯 独 操 作 
系统 被 冷落 在 一 边 ， 实 在 有 些 遗 憾 。“ 既 然 还 没有 
这 样 的 书 ， 那 我 就 来 写 一 本 。” 这 束 是 笔者 撰写 本 
PEIX 
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3 Operating System 的 缩写 ， 汉 语 译作 “操作 系 
统 ”。Windows、Linux、MacOS、MS-DOS 等 软件 
的 总 称 O 


也 许 是 因为 面 癌 初学 者 的 书 太 少 的 缘故 吧 ， 一 说 起 
操作 系统 ， 大 家 束 会 部 着 那 东 西 复杂 得 不 得 了 ， 简 
直 是 高 深 名 测 。 特 别 是 像 Windows 和 Linux 这 些 操 作 
系统 ， 庞大 得 一 张 光 盘 都 快 装 不 下 了 ， 要 是 一 个 人 
赁 着 兴趣 来 开发 的 话 ， 不 知道 需要 历经 多 么 漫长 的 
过 程 才 能 完成 。 笔 者 也 认为 ， 像 这 么 复杂 的 操作 系 
统 ， 单 赁 一 个 人 来 做 ， 一 奉子 都 做 不 出 来 。 


不 过 大 家 也 不 必 担 心太 多 。 笔 者 就 成 功 地 开发 过 一 
个 小 型 操作 系统 ， 其 大 小 还 不 到 80KB4。 麻 丛 虽 
小 ， 五 脏 俱全 ， 这 个 操作 系统 的 功能 还 是 很 完整 
的 。 有 人 也 许 会 怀疑 : “这 么 小 的 操作 系统 ， 是 不 
是 只 有 命令 行 窗 口 ? 啊 ?要 不 就 是 没有 多 任务 


0? ”不 ， 这 些 功 能 部 有 。 


《kilobyte， 程 序 及 数据 大 小 的 度量 单位 ，1 字 市 

(byte) 的 1024 倍 。 一 张 软盘 的 容量 是 1440KB。 
顺便 提 一 下 ，1024KB 等 于 1MB ( 兆 字 节 ) 。1 字 
节 是 8 个 比特 ， 正 好 能 记录 8 位 0 和 1 的 信息 。B 到 
底 是 指 字 节 (byte) ， 还 是 指 比 特 (bit) ， 有 时 
容易 泥 消 。 这 里 根据 一 般 的 规则 ， 用 大 写 B 表 示 
字 节 ， 小 写 b 表 示 比 特 。 


? COnsole， 通 过 键盘 输入 命令 的 一 种 方式 ， 基 本 
上 只 用 文字 进行 计算 机 操作 ， 是 MS-DOS 等 老式 
操作 系统 的 主流 操作 方式 。 


0 在 操作 系统 的 世界 里 ， 运 行 中 的 程序 叫做 “ 任 
务 ”， 而 同时 执行 多 个 任务 的 方式 束 补 称 为 “多 任 
务 ”(multitask) 。 


怎么 样 ， 只 有 80KB 的 操作 系统 ， 大 家 不 筑 得 稍 作 
努力 就 可 以 开发 出 来 吗 ? MEEFFE, RAS 
觉得 这 不 是 件 难 事 吧 ? 没 错 ， 我 们 用 一 个 月 的 时 间 
就 能 写 出 目 己 的 操作 系统 ! 所 以 大 家 不 用 想 得 太 
难 ， 我 们 轻 轻 松 松 地 一 起 来 写 写 看 吧 。 
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以 本 书 作者 为 主角 开发 的 操作 系统 OSASK?” 


“笔者 与 他 人 一 起 合作 开发 的 操作 系统 (趁机 宣 

传 一 下 ) 。 虽 然 只 有 小 小 的 78KB， 不 过 为 了 做 它 
也 花 了 好 几 年 的 时 间 。 而 这 次 能 在 短 时 间 内 开发 
完成 操作 系统 ， 是 因为 我 们 较 好 地 总 结 了 开发 操 
作 系 统 所 必要 的 知识 。 也 就 是 说 ， 如 果 笔 者 在 年 
轻 时 可 以 看 到 现在 这 本 书 的 话 ， 可 能 在 短 时 间 内 
束 能 开发 出 OSASK J, AUER RA KAY - 


大 家 一 听 到 编 详 后 的 文件 大 小 为 8OKB 可 能 会 党 得 
它 作为 程序 来 讲 已 经 很 小 上， 不 过 曾经 编 过 程序 
的 人 可 以 得 一 碍 目 己 编 的 程序 〈.exe 文 件 ) 的 大 

小 ， 这 样 就 能 体会 到 80KB 到 底 是 难 是 易 了 。 


没 编 过 程序 的 人 也 可 以 下 载 一 个 看 上 去 不 是 很 复 
杂 的 目 由 软件 ， 看 看 它 的 可 执行 文件 有 多 大 。 
Windows 2000 的 计算 器 程序 大 约 是 90OKB， 大 家 也 
可 以 根据 这 个 想象 一 下 。 


本 书 对 于 不 打算 自己 写 操 作 系 统 ， 甚 至 连 想 都 没 想 
过 这 个 问题 的 人 来 说 也 会 大 有 神 益 。 举 个 例子 ， 读 
本 自己 组 装 PC 的 书 就 能 知道 PC 是 由 哪些 组 件 构成 

的 ，PC 的 性 能 是 由 哪些 部 分 决定 的 ; 读本 如 何 编 写 


游戏 的 书 ， 就 能 明白 游戏 是 怎样 运行 的 ， 同 理 ， 读 
了 本 书 ， 了 解 了 操作 系统 的 开发 过 程 ， 就 能 掌握 操 
作 系统 的 原理 。 所 以 说 ， 对 操作 系统 有 兴趣 的 人 ， 
哪怕 并 不 想 自己 做 一 个 出 来 ， 也 可 以 看 看 这 本 书 。 


阅读 本 书 几乎 不 需要 相关 储备 知识 ， 这 一 点 稍 后 还 
会 详 述 。 不 管 是 用 什么 编程 语言 ， 只 要 是 曾经 写 过 
简单 的 程序 ， 对 编程 有 一 些 感觉 ， 束 已 经 足够 了 
(即使 没有 任何 编程 经 验 ， 应 该 也 能 看 懂 )， ， 因 为 
这 本 书 主 要 束 古 面 辣 初学 者 的 。 书 中 虽然 有 很 多 C 
ie Fi 言 程序 ， 但 实际 上 并 没有 用 到 很 高 深 的 C 语 言 Fi 知 
识 ， 所 以 束 算 是 曾经 因为 C 语 言 太 难 而 中 途 放 弃 的 
MEA AFD a AT. 57A, GRA BAIR 
话 ， 理 解 起 来 会 相对 容易 一 些 ， 不 过 即使 没有 相关 
知识 也 没关系 ， 书 中 的 说 明 都 很 仔细 ， 大 家 可 以 放 
LY 6 


本 书 以 IBM PC/AT 兼 容 机 (也 就 是 所 谓 的 Windows 
个 人 电脑 》 为 对 象 进 行 说 明 。 至 于 其 他 机 型 5， 比 
如 Macintosh (苹果 机 ) 或 者 PC-9821 等 ， 虽 然 本 书 
也 参考 了 其 中 某 些 部 分 ， 但 基本 上 无 法 开发 出 在 这 
些 机 型 上 运行 的 操作 系统 ， 这 一 点 还 请 见谅 。 严 格 
地 说 ， 不 是 所 有 能 称 为 AT 羔 容 机 的 机 型 都 可 以 开 
发 我 们 这 个 操作 系统 ， 我 们 对 机 絮 的 配置 要 求 是 
CPU 高 于 386〔 因 为 我 们 要 开发 32 位 操作 系统 ) 。 
换 句 话说 ， 只 要 是 能 运行 Windows 95 以 上 操作 系统 


的 机 器 束 没 有 问题 ， 况 且 现 在 市 面 上 《包括 二 手 市 
场 ) 恐 介 都 很 难 找到 Windows 95 以 下 的 机 器 了 ， 所 
以 我 们 现在 用 的 机 型 一 般 都 没 问 题 。 


3 本 书 所 讲 的 操作 系统 内 容 仅 用 Macintosh 是 开发 
不 了 的 ， 并 且 开 发 出 的 操作 系统 也 不 能 直接 在 
Macintosh 上 运行 。 但 是 在 PC 上 开发 的 操作 系统 ， 
可 以 通过 模拟 器 在 Macintosh 上 运行 。 
另外 ， 大 家 也 不 用 担心 内 存 容 量 和 便 盘 剩余 空间 ， 
我 们 需要 使 用 的 空间 并 不 大 。 只 要 满足 以 上 条 件 ， 
束 算 机 絮 义 老 义 慢 ， 也 能 用 来 开发 我 们 的 操作 系 
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2 何谓 操作 系统 


说 老实 话 ， 其 实 笔 者 也 不 是 很 清楚 。 信 计 有 人 会 
ii: “EMSAM, BATA? ”不 好 意思 .……… 
笔者 见 过 很 多 种 操作 系统 ， 有 的 功能 非常 多 ， 而 有 
的 功能 特别 少 。 在 比较 了 各 种 操作 系统 之 后 ， 笔 者 
还 是 没有 找到 它们 功能 的 共同 点 ， 无 法 下 定义 。 结 
条 融 是 ， 软 件 作者 坚持 说 目 己 做 的 现 是 操作 系统 ， 
而 周围 的 人 也 不 深 咒 ， 丈 那样 默认 了 ， 以 全 于 什么 
Ha i 


既然 束 操 作 系 统 而 言 各 有 各 的 说 法 ， 那 笔者 也 可 以 
有 反 过 来 利用 这 一 点 ， 一 开始 就 根据 上 自己 的 需要 来 定 
义 操作 系统 ， 然 后 开发 出 一 个 满足 自己 定义 条 件 的 
软件 就 可 以 了 。 这 当然 也 算是 开发 操作 系统 了 。 哪 
怕 做 一 个 MS-DOS 那 样 的 ， 在 一 上 漆黑 的 画面 上 显 
示 出 白字 ， 输 入 个 命令 惑 能 执行 的 操作 系统 也 可 
以 ， 这 对 笔者 来 说 很 简单 。 


但 这 样 肯 定 会 让 一 些 读者 大 失 所 望 。 现 在 初学 者 也 
都 见 多 识 广 ， 一 提 到 操作 系统 ， 大 家 融会 联想 到 

Windows、Linux 之 类 的 庞然大物 ， 所 以 肯定 期 待 自 
制 操作 系统 至 少 能 任意 显示 窗口 、 实 现 鼠 标 光标 控 
制 、 同 时 运行 几 个 应 用 程序 ， 等 等 。 所 以 为 了 满足 


读者 的 期 待 ， 我 们 这 次 就 来 开发 一 个 具有 上 述 功能 
的 操作 系统 。 


3 开发 操作 系统 的 各 种 方法 
开发 操作 系统 的 方法 也 是 各 种 各 样 的 。 


笔者 认为 ， 最 好 的 方法 就 是 从 既 存 操作 系统 中 找 一 
个 跟 目 己 想 做 的 操作 系统 最 接近 的 ， 然 后 在 此 基础 
上 加 以 改造 。 这 个 方法 是 最 节省 时 间 的 。 


但 本 书 却 故 童 舍 近 求 远 ， 一切 从 零 开 始 ， 完 完全 全 
是 自己 从 头 做 起 ， 这 是 因为 笔者 想 回 各 位 读者 介绍 
从 头 到 尾 开 及 操作 系统 的 全 过 程 。 如 果 我 们 找 一 个 
现成 的 操作 系统 ， 然 后 在 此 基础 上 删 删 改 改 的 话 ， 
那 这 本 书 惑 不 能 涉及 操作 系统 全 盘 的 知识 了 ， 这 样 
肯定 无 法 让 读者 朋友 满意 。 不 过 由 于 是 全 部 从 零 做 
Se ncn. te ene © ee 
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程 语言 ， 这 次 我 们 想 以 C 语 言 为 主 。“ 啊 ，C 语 言 
W? ”笔者 仿佛 已 经 听 到 大 家 抱怨 的 声音 了 “〈 震 
R) 。“ 这 都 什么 年 代 了 ， 用 C 语 言 多 土 啊 ”" “用 
C++ 多 好 呀 ” “还 是 Java 好 ”“ 不 ， 我 就 喜欢 
Delphi”. “我 还 是 觉得 Visual Basic 最 好 ”...... 大 家 个 
人 喜好 习惯 各 不 相同 。 这 种 心情 笔者 都 能 理解 ， 但 
为 了 讲解 时 能 简单 一 些 ， 笔 者 还 是 想 用 C 语 言 ， 请 


大 家 见谅 。C 语 言 功 能 里 不 多 ， 但 用 起 来 方便 ， 所 
以 用 来 开 友 操作 系统 刚好 合适 。 要 是 用 其 他 语言 的 
th, MUR ARTE ASF IE He RR IN Ta], A Bcc tA at 
没 兴 趣 看 下 去 了 。 


在 这 里 和 匈 癌 大 家 传授 一 个 从 零 开 始 开 及 操作 系统 的 
诀 罕 ， 那 惑 是 不 要 一 开始 就 一 心 想 痢 要 开发 操作 系 
统 ， 先 做 一 个 有 扣 操 作 系 统 样子 的 东西 束 行 了 。 如 
琳 我 们 一 上 来 就 要 开 友 一 个 完整 的 操作 系统 的 话 ， 
要 做 的 东西 太 多 ， 想 想 脑 袋 部 大 了 ， 到 时 恐怕 连 看 
手 的 勇气 也 没有 了 。 笔 者 束 是 因为 这 个 ， 几 年 间 过 
到 了 很 多 挫折 。 所 以 在 这 本 书 里 ， 我 们 不 去 大 张 旗 
至 地 想 痢 要 开 及 一 个 操作 系统 ， 而 是 编写 几 个 像 操 
作 系 统 的 演示 程序 MAT So SESE FETT ACTON EY 
的 过 程 中 大 家 就 会 逐步 发 现 ， 演 示 程 序 不 再 是 简单 
的 演示 程序 ， 而 古越 来 越 像 一 个 操作 系统 了 。 


| 演示 程序 的 英文 是 demonstration。 指 不 是 为 了 使 
用 ， 而 古 为 了 演示 给 入 看 的 软件 。 


4 无 知 则 无 长 


当 我 们 打算 开发 操作 系统 时 ， 总 会 有 人 从 和 劳 边 跳出 
来 ， 罗 列 出 一 大 堆 专 业 术 语 ， 问 这 问 那 ， 像 内 核 怎 
么 做 啦 ， 外 元 垮 么 做 啦 ， 和 是 不 是 单 亡 啦 ， 有 是 不 是 微 
内 核 啦 ， 等 等 。 虽 然 有 时 候 提 这 些 问 题 也 是 有 益 
的 ， 但 一 上 来 就 问 这 些 ， 当 然 会 让 人 无 从 回答 。 


要 想 给 他 们 一 个 满意 答复 ， 让 他 们 不 再 从 劳 指 手 国 
脚 的 话 ， 还 真得 多 学 习 ， 拿 出 点 像 模 像 样 的 见解 才 
行 。 但 我 们 是 初学 者 ， 没 有 必要 去 学 那些 麻烦 的 东 
西 ， 费 时 费力 且 不 说 ， 当 我 们 知道 现 有 操作 系统 在 
各 方面 部 考虑 得 如 此 周密 的 时 候 ， 束 会 友 现 目 己 的 
想法 太 过 简单 而 备 受 打击 没 了 干 功 。 如 果 被 前 人 的 
成 果 吓 倒 ， 只 用 这 些 现 有 的 技术 来 做 些 拼 拼 凑 竣 的 
工作 ， 电 不 是 太 没 意思 了 。 


所 以 我 们 这 次 不 去 学 习 那 些 复杂 有 的 东西 ， 和 直接 着 手 
WR. WRIA SA. FER, XA 
什么 意思 呢 ? IBA GNSS, CB ORY 28 BG 
再 简单 ， 起 码 也 是 目 己 的 成 采 。 而 且 目 己 先 实 际 操 
作 一 次 ， 通 过 实践 找到 其 中 的 问题 ， 再 来 看 看 是 不 
是 已 经 有 了 这 些 问题 的 解决 方 采 ， 这 样 下 来 更 能 深 
刻 地 理解 那些 复杂 理论 。 不 管 怎 么 说 ， 反 正 目 前 我 
们 也 无 法 回答 那些 五 花 八 门 的 问题 ， 倒 不 如 直接 告 


诉 在 一 劳 指 手 画 脚 的 人 们 : 我 们 就 是 想 用 目 己 的 方 
法 做 目 己 辟 欢 的 事情 ， 如 条 要 讨论 高 深 的 问题 ， 束 


JA ta fea HAE 


其 实 反 过 来 看 ， 什 么 都 不 知道 有 时 倒是 好 事 。 正 是 
因为 什么 部 不 知道 ， 我 们 才 可 能 会 认真 地 去 做 那些 
专家 们 噬 之 以 蜡 的 没 意 义 的 “ 傻 事 ”。 也 许 我 们 大 多 
时 候 做 的 都 没什么 意义 ， 但 有 时 也 可 能 会 及 掘 出 专 
家 们 干 夸 一 失 的 问题 呢 。 专 家 们 在 很 多 方面 往往 会 
先入 为 主 ， 甚 至 根本 不 去 笠 试 就 断定 这 也 不 行 那 也 
不 行 ， 要 么 就 浅 尝 辑 止 。 因 此 能 够 挑战 这 些 问题 
的 ， 束 只 有 我 们 这 种 什么 虱 不 知道 的 门外汉 。 任 何 
人 部 能 通过 学 习 成 为 专家 ,但 是 一 旦 成 为 专家 ,就 
再 也 找 不 回 门外汉 的 挑战 精神 了 。 所 以 从 零 开 始 ， 
在 没有 各 种 条 条 框框 限制 的 情况 下 ， 能 做 到 什么 程 
度 就 做 到 什么 程度 ， 础 壁 以 后 再 回头 来 学 习 相 天 知 
识 ， 也 为 时 未 晚 。 


实际 上 笔者 也 正 是 这 样 一 路 兢 确 绊 绊 地 走 过 来 ， 才 
有 了 今天 。 笔 着 没 去 过 教授 编程 的 学 校 ， 也 几乎 设 
学 什么 复杂 的 理论 就 开始 开发 操作 系统 了 。 但 也 正 
是 因为 这 样 ， 笔 者 做 出 的 操作 系统 与 其 他 的 操作 系 
统 大 不 相同 ， 非 常 有 个 性 ， 所 以 得 到 了 专家 们 的 一 
致 好 评 ， 而 且 现 在 还 能 有 机 会 号 这 本 书 ， 辐 初学 者 


介绍 经 验 。 总 地 说 来 ， 笔 者 从 看 手 开 友 和 且 到 现在 ， 
每 天 都 是 乐 在 其 中 的 。 


下 是 像 笔者 这 样 目 己 措 着 石 涉 过 河 ， 一 路 克 兢 绊 特 
走 过 来 的 人 ， 讲 出 的 东西 才 简 单 易 屠 。 不 过 在 讲解 
过 程 中 会 涉及 失败 的 经 验 ， 以 及 如 何 重 新 修正 最 终 
取得 成 功 ， 所 以 已 经 情 了 的 人 看 着 可 能 会 着急 。 不 
好 意思 ， 如 果 磁 到 这 种 情况 请 奶 耐 一 下 吧 。 


读 了 这 部 分 内 容 或 许 有 人 会 觉得 “是 不 是 什么 部 不 
学 习 才 是 最 好 的 啊 ”， 其 实 那 倒 不 是 。 比 如 工作 上 
需要 编写 东 些 程序 ， 或 者 一 年 之 内 要 完成 攻 些 任 
务 ， 这 时 没有 时 间 去 故意 绕 远 路 ， 所 以 为 了 避免 不 
必要 的 失败 ， 当 然 是 先 学 习 册 着 手 开 友 比较 好 。 但 
这 人 我 们 是 因为 自己 的 兴趣 而 学 习 操作 系统 的 开 友 
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来 ， 这 样 就 挺 好 的 。 


5 ”如 何 开 友 操作 系统 


操作 系统 (OS) 一 般 打 开 电 源 开 关 就 会 自动 执行 。 
这 是 怎么 实现 的 呢 ? 一 般 在 Windows 上 开发 的 可 执 
行文 件 〈 一 .exe) ， 都 要 在 操作 系统 启动 以 后 ， 双 
击 一 下 才能 运行 。 我 们 这 次 想 要 做 的 可 不 是 这 种 可 
执行 程序 ， 而 是 希望 能 够 做 到 把 含有 操作 系统 的 
CD-ROM 或 软盘 插入 电脑 ， 或 者 将 操作 系统 装 入 硬 
盘 后 ， 只 要 打开 电源 开关 束 能 上 自动 运行 。 


在 Windows (或 其 他 ) 系统 上 编写 源 代码 
| 
用 C 语 言 编译 器 编译 源 代码 ， 生 成 机 器 语言 2 文件 
| 
对 机 器 语言 文件 进行 加 工 ， 生 成 软盘 映像 文件 


| 


将 映像 文件 写 入 磁盘 ， 作 成 含 操作 系统 的 启动 盘 


l source program， 为 了 生成 机 器 人 码 所 写 的 程序 代 
人 码 。 可 通过 编译 器 编译 成 机 器 语言 。 


“CPU 能 够 直接 理解 的 语言 ， 由 二 进 制 的 0 和 1 构 
成 。 其 实 源 代 码 也 征 由 0 和 1 构成 的 《后 述 ) 。 


也 就 是 说 ， 所 谓 开 发 操作 系统 ， 束 是 想 办 法 制作 一 
张 “ 含 有 操作 系统 的 ， 能 够 目 动 司 动 的 磁盘 ”。 


这 里 出 现 的 “映像 文件 ”一 词 ， 简 单 地 说 融 是 软盘 的 
备份 数据 。 我 们 想 要 把 特定 的 内 容 写 入 人 磁盘 可 不 是 
拿 块 磁铁 来 在 磁盘 上 晃 晃 整 可 以 的 。 所 以 我 们 要 先 
做 出 备份 数据 ， 然 后 将 这 些 备份 数据 写 入 磁盘 ， 这 
样 才能 做 出 符合 我 们 要 求 的 磁盘 。 


软盘 的 总 容量 是 1440KB， 所 以 作为 备份 数据 的 映 
像 文 件 也 恰好 是 1440KB。 一 旦 我 们 掌握 了 制作 磁 
檬 映像 的 方法 ， 束 可 以 按 上 自己 的 想法 制作 任意 内 容 
的 磁盘 了 。 


这 里 希望 大 家 注意 的 是 ， 开 用 操作 系统 时 需要 利用 
Windows 等 其 他 的 操作 系统 。 这 是 因为 我 们 要 使 用 
文本 编辑 占 或 者 C 编 译 融 ， 束 必须 使 用 操作 系统 。 
既然 是 这 样 ， 那 么 世界 上 第 一 个 操作 系统 又 是 怎么 
做 出 来 的 呢 ? 在 开 肥 世界 上 第 一 个 操作 系统 时 ， 当 
然 还 没有 任何 现成 的 操作 系统 可 供 利 用 ， 因 此 那 时 
候 人 们 不 得 不 对 照 着 CPU 的 命令 代码 表 ， 目 己 将 0 
和 1 排列 起 来 ， 然 后 再 把 这 些 数 据 写 入 磁盘 《〈 佑 计 
那个 时 候 还 没有 磁盘 ， 用 的 是 其 他 存储 设备 ) 。 这 
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功能 非常 有 限 ， 做 好 之 后 人 们 再 利用 它 来 开发 一 个 
稍微 像 点 样 的 操作 系统 ， 然 后 再 用 这 个 来 开 及 更 实 


用 的 操作 系统 ..…... 操 作 系 统 应 该 就 是 这 样 一 步 一 步 
发 展 过 来 的 。 


由 于 这 次 大 部 分 初学 者 都 是 windows 用 户 ， 所 以 决 
定 使 用 Windows 这 个 现成 的 操作 系统 ， 
Windows95/98/Me/2000/XP 中 任意 一 个 版 本 都 可 
以 。 肯 定 也 有 人 会 说 还 是 Linux 好 用 ， 所 以 笔者 也 
总 结 了 一 下 Linux 上 的 做 法 ， 具 体内 容 写 在 了 帮助 
与 支持 3 里， 有 需要 的 人 请 一 定 看 一 看 。 


3 http://hrb.osask.jp。 


为 外 ， 如 果 C 编 译 强 和 了 映像 文件 制作 工具 等 不 一 样 
的 话 ， 开 发 过 程 中 就 会 产生 一 些 细微 的 凑 别 ， 这 很 
难 一 一 解释 ， 所 以 笔者 就 直接 把 所 有 的 工具 都 放 到 
附 市 光盘 里 了 。 这 些 几 乎 都 是 笔者 所 及 布 的 免费 软 
件 ， 它 们 大 部 是 笔者 为 了 开 友 后 面 的 OSASK 操 作 系 
统 而 根据 需要 自己 编写 的 。 这 些 工具 的 源 代码 也 是 
公开 的 。 队 此 之 外 ， 我 们 还 会 用 到 其 他 一 些 人 免费 软 
件 ， 所 有 这 些 软件 的 功能 我 们 会 在 使 用 的 时 候 详 细 


了 


6 操作 系统 开 友 中 的 困难 


现在 市 面 上 众多 的 C 编 译 器 都 是 以 开 友 Windows 或 
Linux 上 的 应 用 程序 为 前 提 而 设计 的 ， 几 乎 从 来 没 
有 人 想 过 要 用 它们 来 开发 其 他 的 软件 ， 比 如 上 自己 的 
操作 系统 。 笔 者 所 提供 的 编译 器 ， 也 是 以 Windows 
版 的 gccl! 为 基础 稍 加 改造 而 做 成 的 ， 与 gcc 儿 平 没 什 
么 不 同 。 或 许 也 有 为 开发 操作 系统 而 设计 的 C 编 译 
器 ， 不 过 就 算 有 ， 汐 怕 也 只 有 开发 操作 系统 的 公司 
才 会 买 ， 所 以 当然 会 很 贵 。 这 次 我 们 用 不 了 这 人 么 高 
价 的 软件 。 


“GNU 项 目 组 开 友 的 免费 C 编 译 融 ，GNU C 
Compiler 的 简称 。 有 了 时 也 指 GUN 开 发 的 各 种 编译 
器 的 集合 (GNU Compiler Collection) 。 


因为 这 些 原 因 ， 我 们 只 能 徘 开发 应 用 程序 用 的 C 编 
诺 磊 想方设法 编写 出 一 个 操作 系统 来 。 这 实际 上 和 走 
在 硬 来 ， 所 以 当中 惑 会 有 很 多 不 方便 的 地 方 。 


就 比如 说 printf(“hellon”); 吧 ， 这 个 函数 总 是 出 现在 
C 语 言 教科 书 的 第 一 章 ， 但 我 们 现在 就 连 它 也 无 法 
使 用 。 为 什么 呢 ? 因为 printf 这 个 函数 是 以 操作 系统 
提供 的 功能 为 前 提 编 写 的 ， 而 我 们 最 开始 的 操作 系 
统 可 是 什么 功能 都 没有 有。 因此， 如 果 我 们 硬 要 执行 
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数 都 无 法 使 用 。 


“电脑 的 CPU 非常 优秀 ， 如 果 接 到 无 视 OS 保 护 的 
站 念 或 不 可 能 执行 的 指令 时 ， 首 先 会 保存 当前 状 
态 ， 中 断 正 在 执行 的 程序 ， 然 后 调用 事先 设 定 的 
函数 。 这 种 机 制 称 为 异 稼 保护 功能 ， 比 如 除法 异 
常 、 未 定义 指令 异常 、 栈 异常 等 。 不 能 归 类 到 任 
何 异 常 类 型 中 去 的 异常 事态 被 称 为 一 般 保护 异 

常 。 这 种 异常 保护 功能 或 许 会 让 老 Windows 用 户 
想起 那 露 梦 般 的 蓝屏 画面 ， 但 是 如 果 经 历 过 操作 
大 家 就 会 觉得 这 种 机 制 实在 是 太 
re 


关于 这 次 开发 语言 的 选择 ， 如 果 非 要 说 出 个 所 以 
然 的 话 ， 其 实 也 是 因为 C 语 言 还 算是 很 少 依赖 操 
作 系 统 功能 的 语言 ， 基 本 上 只 要 不 用 函数 束 可 以 
了 。 如 果 用 C++ 的 话 ， 像 new/delete 这 种 基本 而 重 
要 的 运算 符 都 不 能 用 了 ， 另 外 对 于 类 的 做 法 也 会 
有 很 多 要 求 ， 这 样 束 无 法 友 挥 C++ 语 言 的 优势 

了 。 当 然 ， 为 了 使 用 这 些 函 数 去 开发 操作 系统 ， 

只 要 我 们 想 办 法 ， 还 是 能 够 克服 种 种 困难 的 。 但 
是 如 果 做 到 这 个 份 上 ， 我 们 不 茶会 想 ， 到 展 是 在 


用 C++ 做 操作 系统 呢 ， 还 是 在 为 了 C++ 而 做 操作 
系统 呢 。 对 别 的 语言 而 言 这 个 问题 会 更 加 突出 ， 
所 以 这 次 还 是 决定 使 用 C 语 言 ， 硕 望 大 家 了 予以 理 
解 。 


顺便 插 一 句 ， 在 开发 操作 系统 时 不 会 受到 限制 的 语 
言 大 概 葡 只 有 汇编 语言 2 了。 还 是 汇编 语言 最 历 害 
tR) 。 但 是 如 下 本 书 仅 用 汇编 来 编写 操作 系统 
的 话 ， 愁 怕 没 几 个 人 会 看 ， 所 以 束 算 十 做 事 官 前 不 
顾 后 的 笔者 也 不 得 不 想 想 后 果 。 


3 Assembler， 与 机 器 语言 最 接近 的 一 种 编程 语 
言 。 过 去 和 掌握 这 种 语言 的 人 会 备 受 尊敬 ， 而 现在 
这 种 人 恐 介 要 被 当 作 怪人 了 ， 真 是 可 茧 啊 。 原 本 
汇编 语言 的 正 却 名 称 应 该 是 Assembly 语 言 ， 而 
Assembler 一 般 指 的 是 编译 程序 。 不 过 像 笔者 这 样 
的 老 程序 员 ， 人 往往 不 对 这 两 个 词 进行 区 分 ， 统 称 
为 Assembler。 


“ 读 到 这 里 ， 大 家 可 能 还 不 理解 为 什么 这 么 说 ， 
越 往 后 看 丈 越 能 慢 慢 体会 到 了 。 


另外 ， 在 开发 操作 系统 时 ， 需 要 用 到 CPU 上 的 许 
多 控制 操作 系统 的 寄存 器 5。 一 般 的 C 编 译 器 都 是 


用 于 开发 应 用 程序 的 ， 所 以 根本 没有 任何 操作 这 
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而 言 ， 内 存 是 外 部 存储 装置 ， 在 CPU 内 核 之 中 ， 
存储 装置 只 有 寄存器。 全 部 办 存 器 的 容量 加 起 来 
也 不 到 1KB。 


归根 到 底 ， 为 了 克服 以 上 这 些 困 难 ， 有 些 没 法 用 C 
语言 来 编写 的 部 分 ， 我 们 就 只 好 用 汇编 语言 来 写 
了 。 这 个 时 候 ， 我 们 瓯 必须 要 知道 C 编 译 堪 到 抵 是 
怎样 把 程序 编译 成 机 需 语 言 的 。 如 末 不 能 够 与 C 编 
诺 左 你 持 一 致 的 话 ， 就 不 能 将 汇编 语言 编写 的 部 分 
与 C 语 言 编 号 的 部 分 很 好 地 衔接 起 来 。 这 可 是 在 编 
写 普 通 的 C 语 言 程序 时 所 体会 不 到 哦 ! 不 过 相 比 之 
下 ， 今 后 的 碎 烦 可 比 这 种 好 处 多 得 多 啊 《〈 舌 突 ) 。 


同样 ， 如 果 用 C++ 来 编写 操作 系统 ， 也 必须 知道 
C++ 是 如 何 把 程序 编译 成 机 器 语言 的 。 当 然 ， 

C++ 比 C 功 能 更 多 更 强 ， 编 译 规 则 也 更 复杂 ， 上 所 以 
解释 起 来 也 更 及 烦 ， 我 们 选用 C 语 言 也 有 这 一 层 
理由 。 总 之 ， 如 果 不 理解 目 己 所 使 用 的 语言 是 如 
E 0 


书店 里 有 不 少 C 语 言 、C++ 的 书 ， 当 然 也 还 有 
Delphi、Java 等 其 他 各 种 编程 语言 的 书 ， 但 这 么 多 
书 里 没有 一 本 提 到 过 “这 些 源 代码 编译 过 后 生成 的 
机 器 语言 到 压 是 什么 样 的 "。 不 仅 如 此 ， 虽 然 我们 
是 在 通过 程序 癌 CPU 友 指令 的 ， 但 连 CPU 的 基本 结 
构 都 没有 人 肯 给 我 们 讲 一 讲 。 作 为 一 个 研究 操作 系 
统 的 人 ， 真 觉得 心里 不 是 滋味 。 为 了 弥补 这 一 空 
缺 ， 我 们 这 本 书 就 从 这 些 基 础 讲 起 《但 也 仅 限 于 此 
次 开 友 操作 系统 所 必 备 的 基础 知识 ) 。 


我 们 具备 了 这 样 的 知识 以 后 ， 说 不 定 还 会 改变 对 程 
序 设计 的 看 法 。 以 前 也 许 只 想 看 上 起 么 写 出 漂 完 的 源 
代码 来 ， 以 后 也 许 束 会 更 注重 编译 出 来 的 是 怎样 的 
机 器 语言。 源 代 人 码 写 得 再 漂 膨 ， 如 末 不 能 编译 成 目 
己 希 望 的 机 各 语言 ， 不 能 正常 运行 的 话 ， 也 是 蝇 

意义 的 。 反 过 来 说 ， 即 便 源 代码 写 得 难看 点 儿 ， 即 
便 只 有 特定 的 C 编 译 右 才能 编译 ， 但 只 要 能 够 得 到 
自己 想 要 的 机 器 语言 束 没 有 问题 了。 里 然 不 至 于 

说 “只 要 编译 出 了 想 要 的 机 器 语 言 ， 源 代码 束 成 了 
一 张 废 纸 >， 但 从 菏 种 意义 上 说 还 真 就 是 这 样 。 

对 于 开发 操作 系统 的 人 而 言 ， 源 程序 无 非 是 用 来 得 
到 机 桥 语 言 的 “手段 "”， 而 不 是 目的 。 浪 颖 太 多 时 间 
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对 了 ， 还 有 一 点 或 许 会 有 人 担心 ， 所 以 在 这 里 事先 


说 明 一 下 : 虽然 操作 系统 是 用 C 语 言 和 汇编 语言 纺 
写 的 ， 但 并 不 是 用 C++ 编 写 的 应 用 程序 就 无 法 在 这 
个 操作 系统 上 运行 。 编 写 应 用 程序 所 用 的 语言 ， 与 
开发 操作 系统 所 使 用 的 语言 是 没有 任何 关系 的 ， 大 
家 大 可 不 必 担心 。 


7 和 学 习 本 书 时 的 注意 事项 《重要 ! ) 


本 书 从 第 1 章 开 始 ， 写 的 是 每 一 天 实际 开 及 的 内 
容 ， 虽 然 一 共 分 成 了 30 天 ， 但 这 些 都 是 根据 笔者 现 
在 的 能 力 和 讲解 的 长 度 来 大 概 切 分 的 ， 并 不 是 说 读 
者 也 必须 得 一 天 完成 一 草 。 每 个 人 觉得 难 的 地 方 各 
不 相同 ， 有 时 学 习 一 章 可 能 要 伦 上 一 星期 的 时 间 ， 
也 有 时 可 能 一 天 惑 能 学 会 三 章 的 内 容 。 


当然 ， 学 习 过 程 中 可 能 会 过 到 看 不 太 书 的 章节 ， 这 
种 时 候 不 要 集 下 来 ， 先 接着 往 下 读 上 个 一 两 草 也 许 
会 突然 明日 过 来 。 如 果 往 后 看 还 是 不 明日 的 话 ， 束 
先 确认 一 下 自己 已 经 理解 到 哪 一 部 分 了， 然后 回 过 
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如 琳 已 经 弄 清 了 哪里 没 理解 ， 而 且 没 理解 的 部 分 看 
了 很 多 裔 还 是 不 明白 的 话 ， 大 家 可 以 参阅 我 们 的 帮 
助 与 支持 页 面 "， 或 许 “ 问 题 与 解答 ”(Q&A) 页 里 
会 有 解说 。 


1 http://hrb.osask.jp。 


本 书 对 C 语 言 的 指针 和 结构 体 的 说 明 与 其 他 书籍 有 
很 大 区 别 。 这 是 因为 本 书 先 讲 CPU 的 基本 结构 ， 然 
后 讲 六 编 ， 最 后 再 讲 C 语 言 ， 而 其 他 的 书 都 不 讲 这 
些 其 础 知识 ， 刚 一 提 到 指针 ， 蕊 上 束 转 到 变量 地 址 
如 何如 何 了 。 所 以 就 算 大 家 “和 觉得 ”已 经 明日 了 那些 
书 里 讲 的 指针 ， 也 不 要 把 本 书 的 指针 部 分 跳 过 去 ， 
相信 这 次 大 家 能 真正 地 理解 指针 。 当 然 ， 如 采 真 的 
己 经 弄 明日 了 的 话 ， 大 概 看 看 就 可 以 了 。 


从 现在 开始 我 们 来 一 点 一 点 地 开发 操作 系统 ， 我 们 
会 将 每 个 阶段 的 进展 情况 总 结 出 来 ， 这 些 中 间 成 果 
都 刻 在 附带 光盘 里 了 ， 只 要 简单 地 复制 一 下 就 能 马 
上 运行 。 关 于 这 些 程序 ， 有 些 需要 注意 的 地 方 ， 我 
们 在 这 里 简单 说 明 一 下 。 


比如 最 初出 现 的 程序 是 中 elloos0”， 下 一 个 出 现 的 程 
序 是 “helloos1”。 即使 我 们 以 helloos0 为 基础 ， 把 书 
中 讲解 的 内 容 一 个 不 漏 地 全 部 做 上 一 人 裔 ， 也 不 能 保 
证 肯定 可 以 得 到 后 面 的 helloos1。 书 中 可 能 偶尔 有 
讲解 得 很 完整 的 地 方 ， 但 其 实 大 多 部 分 都 讲 得 不 够 
明确 ， 这 主要 是 因为 笔者 党 得 这 些 地 方 不 讲 那么 仔 
细 大 家 肯定 也 能 明白 。 


笔者 说 这 些 主要 融 是 想 要 告诉 大 家 ， 不 仅 要 看 书 里 


的 内 容 ， 更 要 好 好 看 程序 。 有 时 候 书 上 写 得 很 全 
ti, DERRER, -AEF EH T o 
本 书 的 主角 不 是 正文 内 容 ， 而 是 附录 中 的 程序 。 正 
文 仅仅 是 介绍 程序 是 如 何 做 出 来 的 。 


所 以 说 从 这 个 意义 上 讲 ， 与 其 说 这 是 “一 本 附带 光 
盘 的 书 "， 倒 不 如 说 这 是 “一 张 附带 一 本 大 厚 节 的 光 
fi” (RR) 


天 于 程序 还 有 一 点 要 说 明 的 一 一 这 里 收录 的 程序 的 
版 权 全 部 归 笔 者 所 有 。 可 是 ， 恋 了 这 本 书后 打算 开 
发 自己 的 操作 系统 的 话 ， 可 能 有 不 少 地 方 要 仿照 多 
附带 程序 来 做 ;也 有 人 可 能 想 把 程序 的 前 期 部 分 全 
ta PRR; 还 有 人 可 能 想 接 看 本 书 最 后 的 部 分 
继续 开发 自己 的 操作 系统 。 


这 是 一 本 关于 操作 系统 的 教材 ， 如 条 大 家 有 上 面 这 
些 想 法 却 不 能 目 由 使 用 附录 程序 的 话 ， 这 教材 也 就 
没什么 意义 了 ， 所 以 大 家 可 以 随意 使 用 这 些 程序 ， 
也 不 用 事先 提出 任何 申请 。 尽 管 大 家 最 后 做 出 来 的 
操作 系统 中 可 能 会 包含 笔者 编写 的 程序 ， 不 过 也 不 
用 在 版 权 声 明 中 赣 上 笔者 的 名 字 。 大 家 可 以 把 它 当 
作 目 己 独 立 开 及 的 操作 系统 ， 也 可 以 卖 了 它 去 赚 
钱 。 束 算 大 家 罪 这 个 系统 成 了 亿 万 是 伍 ， 笔 者 也 不 


会 要 分 毫 的 分 成 ， 大 家 大 可 放心 ”。 


“在 版 权 著 名 时 ， 如 果 有 人 执意 要 效 上 笔者 的 名 
字 ， 笔 者 也 不 反对 。 另 外 ， 要 是 大 家 一 不 小 心 发 
了 大 财 ， 一 定 要 给 笔者 分 红 的 话 ， 笔 者 当然 也 会 
心 存 感激 地 接受 下 来 〈 舌 ) 。 


而 且 这 不 只 是 买 了 本 书 的 人 才能 至 受 的 特权 ， 从 图 
书馆 或 朋友 那儿 借 书 看 的 人 ， 其 至 在 书店 里 站 着 只 
看 不 买 的 人 ， 世 都 浊 有 以 上 权利 。 当 然 ， 大 家 要 是 
买 了 这 本 书 ， 对 笔者 、 对 出 版 社 都 是 一 个 帮助 。 
(ZX) 


在 引用 本 书 程 序 时 ， 只 有 一 点 需要 注意 ， 那 融 是 大 
家 开发 的 操作 系统 的 名 字 。 因 为 它 已 经 不 是 笔者 所 
开发 的 操作 系统 了 ， 上 所 以 请 适当 地 改 个 名 字 ， 以 免 
让 人 误解 ， 仅 此 一 点 请 务必 留意 。 不 管 程序 的 内 部 
是 多 么 相像 ， 它 都 是 大 家 目 己 负责 发 布 的 另外 一 个 
不 同 的 操作 系统 。 给 它 起 个 啊 腕 的 名 字 吧 。 


以 上 声明 仅 适 用 于 书 中 的 程序 ， 以 及 附带 光盘 中 收 
录 的 用 作 操 作 系 统 教材 的 程序 。 本 书 正文 和 附 市 光 
盘 中 的 其 他 工具 软件 不 在 此 列 。 复 制 或 修改 都 受到 
兰 作 权 法 的 保护 。 请 在 法 律 允 许 范 围 内 使 用 这 些 内 
容 。 与 光盘 中 的 工具 软件 相关 的 许可 权 会 放 在 本 书 
BR HP DAL 


8 各 章 内 容 摘要 


估计 看 过 目录 大 家 束 能 大 构 了 解 各 革 内 容 了 了， 但 因 
为 目录 里 项 目 太 多 ， 所 以 在 这 里 概括 总 结 一 下 。 如 
果 有 人 想 要 你 留 一 份 神秘 感 ， 想 边 看 边 猜 “ 后 面 的 
内 容 会 是 什么 "， 那 么 可 以 跳 过 本 市 不 读 〈( 笑 ) 。 

这 一 部 分 可 以 说 古 全 书 的 灯塔 ， 当 大 家 在 阅读 本 书 
的 过 程 中 感 党 有 什么 不 放心 的 时 候 ， 束 回 过 头 来 重 
新 看 看 本 节 内 容 吧 。 


第 一 周 (第 1 天 一 第 7 天 ) 


一 开始 首先 要 考虑 怎么 来 写 一 个 “只 要 一 通电 就 能 
运行 的 程序 ”。 这 部 分 用 C 语 诗 写 起 来 有 些 困难 ， 所 
以 主要 还 是 用 汇编 语言 来 写 。 


这 步 完成 之 后 ， 下 一 步 就 要 写 一 个 从 磁盘 读 取 操作 
系统 的 程序 。 这 时 即便 打开 电脑 电源 ， 它 也 不 会 自 
动 地 将 操作 系统 全 部 都 读 进 来 ， 它 只 能 读 取 磁盘 上 
最 开始 的 512 字 节 的 内 容 ， 所 以 我 们 要 编写 剩余 部 
分 的 载 入 程序 。 这 个 程序 也 要 用 汇编 语言 编写 。 

一 旦 完成 了 这 一 步 ， 以 后 的 程序 就 可 以 用 Ci 语言 来 
编写 了 。 我 们 就 尽快 使 用 C 语 言 来 学 习 开 发 显示 男 
面 的 程序 。 同 时 ， 我 们 也 能 慢 慢 熟悉 C 语 言语 法 。 


这 个 时 候 我 们 好 像 在 做 自己 想 做 的 事 ， 但 事实 上 我 
们 还 没有 自由 操纵 C 语 言 。 


接 下 来 ， 为 了 实现 “移动 鼠标 ”这 一 雄心 ， 我 们 要 对 
CPU 进行 细致 的 设 定 ， 并 掌握 中 断 处 理 程序 的 写 

法 。 从 全 书 总 体 看 来 ， 这 一 部 分 是 水 平 相当 高 的 部 
分 ， 笔 者 也 觉得 放 在 这 里 有 些 不 屎 ,但 从 本 书 条 理 
上 讲 ， 这 些 内 容 必 须 放 在 这 里 ， 所 以 只 好 请 大 家 怒 
耐 一 下 了 。 在 这 里 ，CPU 的 规格 以 及 电脑 复 洒 的 规 
格 痢 会 给 我 们 市 来 各 种 各 样 的 拱 烦 。 而 且 开 发 语言 
既 有 C 语 言 ， 勾 有 汇编 语言 ， 这 又 给 我 们 造成 了 更 
大 的 混乱 。 这 个 时 候 我 们 一 点 儿 也 不 会 澳 得 这 是 在 
做 目 己 想 做 的 事 ， 怎 么 看 都 像 是 在 “党 人 摆布 ?。 


滤 过 这 个 痛 苗 的 时 期 ， 第 一 周 束 该 结束 了 。 
Jil (BK 一 第 14 天 ) 


一 周 的 百 战 还 是 很 有 意义 的 ， 回 尖 一 看 ， 我 们 束 会 
发 现 上 自己 还 是 斩获 左 丰 的 。 这 时 我 们 已 经 基本 午 握 
了 C 语 言 的 语法 ， 连 汇编 语言 的 水 平 也 能 达到 本 书 
的 有 要求 二: 

所 以 现在 我 们 束 可 以 痢 手 开 肥 像样 的 操作 系统 了 。 
但 是 这 一 次 我 们 义 要 为 算法 头痛 了 。 即 使 掌握 了 编 
程 语 言 的 语法 ， 如 果 不 懂得 好 的 算法 的 话 ， 也 还 是 


不 能 开 及 出 来 目 己 想 要 的 操作 系统 。 所 以 这 一 周 我 
们 束 边 学 习 算 法 边 慢 慢 地 开发 操作 系统 。 不 过 到 了 
这 一 阶段 ， 我 们 惑 能 感 党 到 基本 上 不 会 再 受 技术 问 
题 限 制 了 。 


第 三 周 (第 15 天 ~ 第 21 天 ) 


现在 我 们 的 技术 已 经 相当 历 害 了 了 ， 可 以 随心 所 欲 地 
开发 自己 的 操作 系统 了 。 首 先是 要 文 持 多 任务 ， 然 
后 是 开 及 命令 行 窗口 ， 之 后 就 可 以 痢 手 开发 应 用 程 
序 了 。 到 本 周 结束 时 ， 丈 算 还 不 够 完备 ， 我 们 也 能 
拿 出 一 个 可 以 称 之 为 操作 系统 的 软件 了 。 


第 四 周 (第 22 天 ~ 第 28 天 ) 


在 这 个 阶段 ， 我 们 可 以 尽情 地 给 操作 系统 增加 各 种 
各 样 的 功能 ， 同 时 还 可 以 开发 出 大 量 像 柑 像样 的 应 
用 程序 来 。 这 个 阶段 我 们 已 经 能 做 得 很 好 了 ， 这 可 
能 也 是 我 们 最 高 兴 的 时 期 。 这 部 分 要 讲解 的 内 容 很 
少 ， 笔 者 也 不 用 再 仇 费 二 心地 去 写 那些 文字 说 明 
了 ， 可 以 把 精力 都 集中 在 编程 上 《〈 笑 ) 。 对 了 ， 说 
起 文字 才 想 起 来 ， 正 好 在 这 个 时 期 可 以 让 我 们 的 操 
作 系 统 显示 文字 了 。 


倪 费 赠送 两 天 (第 29 天 ~ 第 30 天 ) 
剩 下 的 两 天 用 来 润色 加 工 。 这 两 天 我 们 来 做 一 些 之 


前 没 来 得 及 做 ， 但 做 起 来 既 简 单 色 有趣 的 内 容 。 
EERE 

以 上 就 是 从 第 1 天 到 第 30 天 的 内 容 摘 要 ， 越 到 后 面 

介绍 越 短 ， 这 也 说 明 最 开始 的 内 容 是 最 复杂 的 。 那 

么 ， 束 让 我 们 做 好 准备 ， 开 始 第 一 天 的 学 习 吧 。 

啊 ， 大 家 不 用 紧张 ， 放 松 ! 放松 ! 


第 1 天 从 计算 机 结构 到 汇编 程序 
AT] 

。 先 动手 操作 

。 究竟 做 了 些 什 么 

。 初 次 体验 汇编 程序 

。 加工 润色 


1 移动 手 操 作 


Ej UP Rn th EE, EAN USE FI 
来 得 轻松 ， 我 们 这 就 开始 吧 。 而 且 我 们 一 上 来 就 完 
全 抛 开 前 面 的 说 明 ， 既 不 用 C 语 言 ， 也 不 用 汇编 程 
序 ， 而 是 采用 一 个 过 然 不 同 的 工具 来 进行 开发 
(人 


有 一 种 工具 软件 名 为 "二进制 编辑 左 ”(Binary 
Editor) -“， 是 一 种 能 够 直接 对 二 进 制 数 进行 编辑 的 
软件 。 我 们 现在 要 用 它 来 编辑 出 下 图 这 样 的 文件 。 


! 原文 直译 为 “二 进 制 编辑 器 ”(Binary Editor) , 
在 中 国 “ 二 进 制 编辑 器 ”、“ 十 六 进 制 编辑 右 ” 这 两 
种 说 法 都 有 ， 这 里 尊重 原著 保留 了 “二 进 制 编辑 
器 ”的 说 法 。 一 一 译 者 注 


也 许 有 人 会 说 “这 样 的 工具 我 从 来 没有 见 过 呀 ”， 没 
关系 ,下面 我 们 来 详细 地 介绍 一 下 。 


首先 打开 下 面 这 个 网 页 : 


http://www.vcraft.jp/soft/bz. html? 


“如果 此 网 页 连接 不 上 ， 也 可 用 google 等 检索 工具 
来 搜索 一 下 ， 从 别处 下 载 Bz1621.1zh。 


f ES 82 - helloos.img lolak 
ile Edi lump | Tools Help 

| | x B Damn s\*@lt Oo FS 

+0 +] +2 +3 +4 +5 +6 +7 +8 +9 +4 +B +C +0 +E +F «0123456 789ABCDEF 
000000 EB 4E 90 48 45 4C 4C 4F-49 50 4C 201 01 oN HEELOIPE „sanes 
No00010 02 EO 00 40 OB FO 09 00-12 00 02 00 00 00 00 00 ...@............ 
000020 40 0B 00 00 00 00 29 FF-FF FF FF 48 45 4C 4C 4F @..... )....HELLO 
000030 2D 4F 53 20 20 20 46 41-54 31 32 20 20 20 00 00 -0S FATI2 .. 
000040 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 2... 
000050 B8 00 00 8E DO BC 00 7C-8E D8 8E CO BE 74 7C 8A ....... pansa tf: 
1000060 04 83 C6 01 3C 00 74 09-B4 OE BB OF 00 CD 10 EB ....<.t......... 
000070 EE F4 EB FD 0A 04 68 65-6C 6C GF 2C 20 77 BF 72 ......hell 
000080 6C 64 0A 00 00 00 00-00 0 00 0 eg 
000090 00 00 00 00 00 00 00 00-00 DE DODGE OOO OD vy 
0000A0 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 .sse 
0000B0 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 .ei 目 
Rea : 0 ASCI 


用 BZ 打开 helloos.img 时 的 画面 


点 击 “ 在 此 下 载 ”(Download) 的 链接 ， 下 载 文 件 
Bz1621.1zh 〈 在 此 非常 感谢 cmos 公 司 无 偿 公 开 这 人 么 
好 的 软件 ) 。 当 你 谈 到 本 书 的 时 候 ， 也 许 会 有 新 的 
版 本 友 布 ， 所 以 文件 名 可 能 会 有 所 不 同 。 接 下 来 ， 
安装 下 载 下 来 的 文件 ， 然 后 双击 启动 Bz.exe 程 序 。 
如 果 不 能 正常 启动 的 话 ， 可 以 参考 上 面 网 页 的 “ 友 
注意 去” 一 项 ， 按 照 上 面 的 安装 指导 进行 操作 。 


顺利 局 动 的 话 屏 幕 上 会 出 现 如 下 画面 。 


(fm ez - =e « -n t. JFT’ lelak 
File Edit View Jump Tools Help 
以 回 | x alinoeo 


-|a 
+0 +] +2 43 +4 +5 46 +7 +8 +9 +A +B 40 +0 +E 4F pua 


000000 


BZ 起 动 时 的 画面 


好 ， 让 我 们 赶紧 来 输入 吧 ， 只 要 从 键盘 上 直接 输入 
EB4E904845...... 就 可 以 了 ， 简 单 吧 。 其 中 字符 之 
间 的 空格 是 这 个 软件 在 显示 时 为 方便 阅读 自动 插入 
的 ， 不 用 自己 从 键盘 上 输入 。 另 外 ， 碳 边 

的 .N.HELLOIPL..….. 部 分 ， 也 不 用 从 键盘 输入 ， 这 
是 软件 自动 显示 的 。 可 能 版 本 或 者 显示 模式 不 一 样 
的 时 候 ， 右 侧 显 示 的 内 容 会 与 下 面 的 截图 有 所 不 

同 。 不 过 不 用 往 心 里 去 ， 这 些 内 容 完 全 是 锦上添花 
的 东西 ， 即 使 不 一 样 也 没事 。 


000038: 0x00 (0) 


输入 到 000037 位 置 时 的 画面 


从 000090 开 始 后 面 全 都 是 00， 一 直 输 入 到 最 后 
168000 这 个 地 址 。 如 果 一 直 按 着 键盘 上 的 “0? 不 放 
手 的 话 ， 画 面 上 的 0 就 会 不 停 地 增加 ， 但 因为 个 数 
相当 多 ， 也 还 是 挺 花 时 间 的 。 如 果 家 里 有 只 猫 的 
话 ， 倒 是 可 以 考虑 请 它 来 帮忙 按 住 这 个 键 (日 本 的 
Wis: 想 让 猫 来 搭 把 手 ， 形 容 人 手 不 足 ， 连 猫 爪 子 
都 想 借 用 一 下 ) ， 或 者 也 可 以 干脆 就 用 透明 胶 把 这 
个 键 粘 上 。 


AFR 
， 帮 我 


因为 一 下 子 输入 到 最 后 实在 是 插花 时 间 的 ， 大 家 也 
许 想 保存 一 下 中 间 结 果 ， 这 时 可 以 从 荣 单 上 选 


PETE” (File) -另存 为 ”(Save As) ， 国 面 上 
束 会 弹出 保存 文件 的 对 话 框 。 我 们 可 以 随便 取 个 名 
字 进 行 你 存 ， 笔 者 推荐 使 用 “helloos.img”。 当 想 要 
打开 保存 过 的 文件 时 ， 首 先 要 局 动 Bz.exe， 从 琵 单 
上 选择 “文件 ”(Eile) “打开 ”(Open) ， 然 后 选 
择 目 标 文 件 ， 这 样 原来 保存 的 内 容 束 能 显示 出 来 
了 。 可 是 这 个 时 候 不 党 我 们 怎么 努力 投 键盘 ， 它 都 
一 点 反应 也 没有 。 这 是 怎么 回 事 ?难道 必须 要 一 次 
性 输入 到 最 后 吗 ? 这 个 大 家 不 必 担 心 ， 其 实 只 要 从 
荣 音 里 选择 “编辑 ”(Edit) — “ise” (Read Only) 
束 可 以 进入 编辑 状态 啤 。 好 了 ， 我 们 继续 输入 。 


MRA BANA eS, NAIC, TAKA 
不 想 用 透明 胶 粘 键盘 这 种 土方 法 的 话 ， 不 妨 这 样 : 
用 女 标 选择 一 部 分 0， 然 后 从 菜单 选择 “ 编 

H” (Edit) “复制 ” (Copy) 。 简 简单 单 复 制 粘贴 
几 次 束 可 以 大 功 告 成 了 ， 这 工具 还 真 方便 呀 。 


哦 ， 对 了 ， 差 点 态 记 一 件 重要 的 事 一 一 在 地 址 
0001F0 和 001400 附 近 还 有 些 地 方 不 全 是 00， 要 像 下 
图 那样 把 它们 也 改过 来 ， 然 后 整体 检查 一 下 ， 确 认 
没有 输入 错误 。 


> : 
ER Bz - helloos.img * lelak 


File Edit View Jump Tools Help 


> tel | BX e mman Jü tork 
+0 +] +2 +3 +4 +5 +6 +7 +8 +9 +4 +B +C +D +E +F 0123456789ABCDEF 

000100 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 ................ 

0001E0 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 .ieee 
WCOO1FO 00 00 00 00 00 00 00 00-00 00 00 00 00 00 55 AA LL... U 

000200 FF Mo 00 00 00 00 00-00 00 00 00 00 00 00 00 .有 

000210 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 ................ 

000220 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 .iii 

000230 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 ................ - 
|Ready (000202: 0x00 (0) 1,689,696 bytes [ASCII |OV 


0001F0 附 近 


[ EB 82 - helloos.img lelak 
File Edit View Jump Tools Help 
a> tl E e mnan JA tor SE 
+0 +] +2 +3 +4 +5 +6 +7 +8 +9 +4 +B +C +D +E +F (0123456 789ABCDEF 
0013E0 00 00 00 00 00 00 00 00-00 00 00 00 00 00 0000 we. 
O013FO 00 00 00 00 00 00 00 00-00 00 00 00 00 00 0000 ,00 
001400 FO FF FF 00 00 00 00 00-00 00 00 0000 00 0000 sis. 
410 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 M.............. 
001420 00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 we. 
001430 00 00 00 00 00 00 00 00-00 00 00 00 00 00 0000 .se 
001440 00 00 00 00 00 00 00 00-00 00 00 00 00 00 0000 .1 ~ 
Ready 001411: 0x00 (0) 1,689,696 bytes [ASCII |O\ 


001400 附 近 


下 面 ， 我 们 把 输入 的 内 容 保 存 下 来 束 完 成 了 软 礁 映 
像 文 件 的 制作 ， 这 时 查看 一 下 文件 属性 ， 应 该 能 
到 文件 大 小 正好 是 1474560 字 节 (=1440x1024 字 
节 ) 。 然 后 我 们 将 这 个 文件 写 入 软盘 〈 具 体 后 
述 ) ， 并 用 它 来 启动 电脑 。 如 下 所 示 ， 画 面 上 会 显 
示 出 “hello, world” 这 个 字符 串 。 目 前 的 程序 虽然 简 
单 ， 但 毕竟 一 打开 电脑 它 就 能 够 自动 启动 ， 还 能 在 
屏幕 上 显示 出 一 句 话 来 ， 已 经 小 小 成 功 了 哦 。 不 
过 ， 我 们 现在 还 没有 结束 这 个 程序 的 方法 ， 所 以 想 


要 结束 的 时 候 ， 只 能 把 软盘 取出 来 后 切断 电脑 电 
源 ， 或 者 重新 局 动 。 


Bochs VGABIOS ver.0.2 : 
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ision: 1.110 $ $Date: 2004/05/31 13:11:27 $ 
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至 于 最 关键 的 往 磁 盘 上 写 映像 文件 的 方法 ， 笔 者 已 
经 预先 准备 好 了 一 个 程序 。 在 介绍 它 的 使 用 方法 之 
前 ， 我 们 移 把 笔者 准备 的 工具 全 都 安 朔 进来 吧 ， 这 
样 后 面 讲解 起 来 比较 省 事 。 下 面 我 们 就 来 看 怎么 安 
装 这些 工 具 。 


打开 附带 光盘 ， 里 面 有 一 个 名 为 tolseb 的 文件 夹 ， 

把 这 个 文件 夹 复 制 到 硬盘 的 任意 一 个 位 置 上 。 现 在 
里 面 的 东西 还 不 多 ， 只 有 3MB 左 右 ， 不 过 以 后 我 们 
目 己 开 友 的 软件 也 都 要 放 到 这 个 文件 夹 里 ， 所 以 往 
后 它 会 越 来 越 大 ， 因 此 硬盘 上 最 好 留 出 100MB 左 右 
的 剩余 空间 。 工 具 安装 到 此 结束 ， 我 们 既 不 用 修改 


注册 表 ， 也 不 用 设 定 路 径 参 数 ， 就 这 么 简单 。 而 且 
以 后 不 管 什么 时 候 ， 都 可 以 把 这 整个 文件 夹 移动 到 
任何 其 他 地 方 。 用 这 些 工 具 ， 我 们 不 仅 可 以 开发 操 
作 系 统 ， 还 可 以 开发 简单 的 Windows 应 用 程序 或 
OSASK 应 用 程序 等 。 


3 tool set 的 缩写 , “工具 套件 ”的 意思 。 


接 下 来 我 们 打开 刚才 安装 的 tolset 文 件 夹 ， 在 文件 夹 
的 名 字 上 早 击 鼠标 右键 ， 从 弹出 的 末 单 上 选择 “新 
建 ”(New) “文件 来” (Folder) 。 男 面 上 会 显示 
出 缺 省 的 文件 夹 名 “新 建文 件 夹 ”(New Folder) ， 
我 们 要 把 它 改 为 “helloos0”， 并 把 前 面 保存 的 映像 文 
件 helloos.img 复 制 到 这 个 文件 夹 里 。 男 外 ， 刚 才 安 
装 的 tolset 文 件 夹 下 有 个 名 为 Z_new_w 的 子 文件 夹 ， 
其 中 有 !cons_9x.bat 和 !cons_nt.bat 这 两 个 文件 ， 要 把 
它们 也 复制 粘贴 到 helloos0 文 件 光 里 。 


接着 ， 在 文件 夹 helloos0 里 单 击 鼠标 右键 ， 从 弹出 
的 荣 单 中 选择 “新 建 ”(New) = “SCA ICLP” (Text 
Document) ， 并 将 文件 命名 为 “run.bat”， 回 车 后 屏 
幕 上 会 显示 “如 果 改 变 文件 扩展 名 ， 可 能 会 导致 文 
件 不 可 用 。 确 实 要 更 改 吗 ?” 的 对 话 框 ， 我 们 选 
择 “ 是 ”， 创 建 run.bat 文 件 。 然 后 在 run.bat 文 件 名 上 
ALTE bn BE, E AN Se AE ae PE“ 

fe” (Edit) ， 输 入 下 面 内 容 并 保存 。 


run.bat 


copy helloos.img ..\z_tools\qemu\fdimage@.bin 


..\z_tools\make.exe -C ../z_tools/qemu 


然后 按照 同样 的 步骤 ， 创 建 install.bat， 并 将 下 列 内 
容 输 入 进去 。 


install.bat 


.. \z_tools\imgtol.com w a: helloos.img 


其 实 以 上 步骤 创建 的 所 有 文件 都 已 经 给 事先 给 大 家 
准备 好 了 ， 就 放 在 附 市 光盘 中 名 为 
projects\01_day\helloos0 的 子 文 件 夹 里 。 所 以 大 家 只 
要 把 光盘 上 的 helloos0 复 制 下 来 ， 粘 帖 到 人 硬盘 的 
tolset 文 件 夹 里 ， 所 有 的 准备 工作 就 瞬间 完成 了 。 


好 了 ， 现 在 我 们 就 来 把 这 个 有 点 像 操 作 系 统 的 软件 
安装 到 软盘 上 吧 。 随 便 从 附近 的 小 店 里 买 片 新 软盘 
来 ， 在 Windows 下 格式 化 一 下 格式 化 方法 : 把 软 
盘 插入 磁盘 张 动 右 后 打开 “我 的 电脑 ”， 在 “3.5 时 软 
盘 ”(3.5inches Floppy) A: 上 单 击 鼠标 右键 ， 再 选 
FERS TUL” (Format) 即 可 ) 。 对 了 ， 这 个 时 候 不 
要 选择 “快速 格式 化 ?选项 。 然 后 用 鼠标 左 键 双击 
helloos0 文 件 夹 里 的 !cons_nt.bat 文 件 


(Windows95/98/Me 的 用 户 需要 双 
击 !cons_9x.bat) ， 屏 莫 上 束 会 出 现 一 个 命令 行 窗 口 
(console〉。 我 们 先 仔 细 确 认 一 下 软盘 是 否 已 经 插 
好 ， 然 后 在 命令 行 窗 口上 输入 “install* 并 回 车 ， 这 
样 安 装 操 作 就 开始 了 。 稍 候 片 刻 ， 等 安装 程序 执行 
完毕 ， 我 们 的 操作 系统 启动 盘 也 就 做 好 了 。 完 成 安 
装 之 后 ， 也 可 以 关闭 刚才 的 命令 行 窗 口 了 。 


现在 我 们 束 用 这 张 操 作 系 统 启动 软盘 来 启动 一 下 电 
脑 试 试 吧 ， 表 定 跟 刚才 一 样 ， 会 显示 出 “hello， 
world” 的 字样 来 。 


在 这 里 要 提醒 大 家 几 点 : 一 是 软盘 虽然 不 要 求 必须 
用 全 新 的 ， 但 如 果 太 旧 的 话 ， 在 读 写 过 程 中 容易 出 
问题 ， 所 以 最 好 还 古 不 要 用 太 旧 的 软盘 。 男 外 ， 整 
算是 新 盘 ， 如 果 太 便宜 的 话 有 时 也 用 不 了 ， 符 是 及 
现 有 问题 ， 束 需要 再 去 买 一 张 。 最 后 一 点 ， 一 旦 格 
式 化 或 者 往 软 盘 内 安装 操作 系统 ， 残 会 把 里 面 原 有 
HAR Pa EA ic, AT KAT AD BAA ER 
文件 的 软盘 来 尝试 哦 。 


看 到 这 里 ， 大 家 可 能 会 有 各 种 问题 : “这 些 我 都 明 
日 ， 可 是 既 要 专门 去 买 张 软盘 ， 又 要 重 月 电脑 ， 实 
在 太太 烦 了 ， 难 让 就 没有 什么 更 简单 的 方法 


吗 ? ”、“ 我 家 的 电脑 根本 就 没有 软驱 呀 ” “我 的 电 
脑 没 有 什么 重启 按钮 ， 也 没有 关 电 源 的 开关 ， 一 且 
局 动 了 这 个 奇怪 的 操作 系统 ， 就 没 法 终止 啦 ”。 其 
实 这 些 问 题 笔者 已 经 考虑 到 了 ， 所 以 特意 准备 了 一 
个 模拟 占 。 我 们 有 了 这 个 模拟 占 ， 不 用 软盘 ， 也 不 
用 终止 Windows， 就 可 以 确认 所 开发 的 操作 系统 启 
动 以 后 的 动作 ， 很 方便 呢 。 


使 用 模拟 右 的 方法 也 非常 人 简单， 我 们 只 需要 在 

用 !cons_nt.bat (或 者 是 !cons_9x.bat) 打开 的 命令 行 
窗口 中 输入 “run” 指 令 束 可 以 了 。 然 后 一 个 名 叫 
QEMU 的 非常 优秀 的 免费 PC 模拟 器 就 会 日 动 运行 。 
QEMU 不 是 笔者 开发 的 ， 它 是 由 国外 的 一 些 天 才 们 
开发 出 来 的 。 感 谢 他 们 ! 


“我 按照 你 说 的 一 步 一 步 地 做 了 一 裔 ， 可 是 不 行 
WE! 怎么 回 事 呢 ? ”会 遇 到 这 种 情况 的 人 肯定 是 个 
非常 认真 的 人 ， 可 能 真 的 完全 按照 上 面 步骤 用 二 进 
制 编辑 需 目 己 做 了 一 个 helloos.img 文 件 出 来 。 出 现 
这 种 了 问题， 肯定 是 因为 文件 中 有 输入 错误 的 地 方 ， 
虽然 笔者 不 知道 具体 错 在 哪儿 ， 不 过 建议 最 好 检查 
一 下 000000 到 000090， 以 及 0001F0 前 后 的 数据 。 如 
果 还 是 不 行 的 话 ， 那 束 干 脆 用 附 襄 光盘 中 笔者 做 的 
helloos.img 好 了 。 


AYRE ALE GRU, BSAA, ORE Bete 


用 光盘 里 的 helloos.imng 文 件 ， 这 当然 也 没什么 不 可 
bh; 但 笔者 认为 这 种 体验 (一 点 一 点 地 输入 ， 青 干 
对 万 兰 地 纠 错 ， 最 终 功 夫 不 负 有 心 人 取得 成 功 ) 本 
吴 更 难 能 可 贯 ， 建 议 大 家 最 好 还 是 杀 目 答 试 一 下 。 


就 这 样 ， 我 们 没有 去 改造 现成 的 操作 系统 ， 而 是 从 
BAUR It, 并 计 它 运转 了 起 来 《当然 ;如 
果 别 人 承认 这 是 个 操作 系统 的 话 ) 。 这 太 了 不 起 
了 ! 大 家 完全 可 以 在 朋友 们 面前 炫 疙 一 番 了 。 仅 学 
习 了 几 个 小 时 开发 的 一 个 初学 者 ， 就 能 从 零 开始 做 
出 一 个 操作 系统 ， 这 本 书 不 错 吧 〈 笑 ) ? 这 次 我 们 
考虑 到 从 键盘 直接 输入 比较 麻烦 ， 所 以 就 只 让 它 显 
示 了 一 条 消息 ， 如果 能 再 多 输入 一 些 内 容 的 话 ， 那 
仅 用 这 种 方法 就 可 以 开发 任意 一 个 操作 系统 《〈 当 然 
最 大 只 能 到 1440KB ) 。 现 在 唯一 的 问题 是 ， 我 们 
还 不 知道 之 前 输入 的 那些 “EB 4E 90 48 45......” 到 底 
是 什么 意思 《而 这 也 正 是 我 们 所 面临 的 最 大 问 
题 ) 。 今 天 剩 下 的 时 间 ， 以 及 以 后 的 29 天 时 间 里 ， 
我 们 都 会 讲解 这 个 问题 。 


2 拖 竟 做 了 些 什么 


为 什么 用 这 种 方法 就 能 开 友 出 操作 系统 来 呢 ? 现 在 
搞 消 楚 这 个 问题 ， 会 对 我 们 今后 的 理解 很 有 帮助 ， 
所 以 在 这 里 要 稍 做 说 明 。 


首先 我 们 要 了 解 电脑 的 结构 。 电 脑 的 处 理 中 心 是 
CPU, &“central process unit” 的 缩写 ， 翻 译 成 中 文 
残 是 “中 央 处 理 单元 ”， 顾 名 思 义 ， 它 就 是 处 理 中 
心 。 如 果 我 们 把 别 的 元 件 当 作 中 心 来 使 用 的 话 ， 那 
它 束 叫做 CPU 了 ， 所 以 无 论 什么 时 候 CPU 都 六 是 处 
理 中 心 。 不 过 这 个 CPU 除 了 与 别 的 电 足 进行 电信 号 
交换 以 外 什么 都 不 会 ， 而 且 对 于 电信 号 ， 它 也 只 能 
理解 开 CON) 和 关 COFF) 这 两 种 状态 ， 真 是 个 没 
用 的 人 呀 《虽然 它 不 是 人 吧 ， 大 家 领会 精神 ) 。 


CPU 


我 们 平时 会 用 电脑 号 文章 、 听 音乐 、 修 照片 以 及 做 
其 他 各 种 各 样 的 事情 ， 我 们 用 电脑 所 做 的 这 些 ， 其 


实 本 质 上 都 不 过 是 在 与 CPU 交换 电信 和 号 而 已 ， 而 且 
电信 号 只 有 开 (CON) 和 关 (OFF) 这 两 种 状态 。 再 
说 直 白 一 点 ，CPU 根 本 无 法 理解 文章 的 内 容 ， 更 不 
会 鉴赏 首 乐 、 照 片 ， 它 只 会 机 械 地 进行 电信 号 的 转 
换 。CPU 有 计算 指令 ， 所 以 它 能 够 进行 整数 的 加 减 
乘除 运算 ， 也 可 以 处 理 负 数 、 计 算 小 数 以 及 10 的 
100 次 方 这 样 庞 大 的 数值 ， 它 甚至 能 够 处 理 我 们 初 
中 才学 到 的 平方 根 和 高 中 才学 到 的 对 数 、 三 角 函 
数 ， 而 且 所 有 这 些 计 算 仅 通过 一 条 指令 就 能 简单 实 
现 。 虽 然 CPU 功 能 如 此 强大 ， 但 它 其 实 根 本 不 理解 
数 的 概念 。CPU 吏 是 个 集成 电路 板 ， 它 只 是 忠实 地 
执行 电信 号 给 它 的 指令 ， 输 出 相应 的 电信 号 。 


这 些 概念 可 能 不 太 容 易 理 解 ， 还 是 让 我 们 来 看 个 的 
具体 例子 吧 。 比 如 说 ， 让 我 们 用 1 来 表示 开 

(ON) ， 用 0 来 表示 关 (OFF) ， 这 样 比较 容易 理 
解 。 我 们 可 以 用 32x16=512 个 开 (ON) 和 关 
(OFF) 的 集合 (二 电信 号 的 集合 ) ， 来 显示 出 下 
面 这 个 不 其 好 看 的 人 头像 。 


00000000000000000000000000000000 
00000000111111111111111110000000 
0000001 1000000000000000001 100000 
00000100000000000000000000010000 
00000100000000000000000000010000 
00000100001110000000111000010000 


00000100001 110000000111000010000 
00000100000000011000000000010000 
00000100000000011000000000010000 
00000100000000000000000000010000 
00000100000111111111100000010000 
00000100000001111110000000010000 
0000001 1100000000000000011100000 
0000000001 1100000000011100000000 
0000000000001 1111111100000000000 
00000000000000000000000000000000 


我 们 也 可 以 用 0000 0000 0000 0000 0000 0100 1010 

0010 这 32 个 电信 号 的 集合 来 表示 1186 这 个 整数 。 
QE: 用 二 进 制 表示 1186 的 话 ， 就 是 100 1010 

0010) 。 我 们 还 可 以 用 0100 1011 0100 1111 0100 

1111 0100 0010 这 32 个 电信 号 的 集合 来 表 

示 “BOOK” 这 个 单词 QE: 这 实际 上 就 是 电脑 内 部 

保存 这 个 单词 时 的 电信 和 号 集合 ) 。 


CPU 能 看 见 的 束 只 有 这 些 开 (ON) AIK (OFF) 的 
电信 号 。 换 句 话 说， 假如 我 们 给 CPU 人 发送 这 人 么 一 串 


电信 号 : 
0000 0100 0011 1000 0000 1110 0001 0000 


这 信号 可 能 是 一 幅 画 的 部 分 数据 ， 可 能 是 个 二 进 制 
整数 ， 可 能 是 一 段 音乐 旋律 ， 可 能 是 文章 中 的 一 段 
文字 ， 也 可 能 是 你 存 了 的 游戏 的 一 部 分 数据 ， 或 者 
是 程序 中 的 一 行 代码 ， 不 管 它 是 什么 ，CPU 痢 一 罕 
不 通 。CPU 不 情 这 些 ， 也 不 在 乎 这 些 ， 它 只 是 默 默 
地 、 任 玫 任 级 地 按照 程序 的 指令 进行 相应 的 处 理 。 


CLLD 
看 到 这 里 ， 或 许 有 人 会 认为 是 多 有 了 这 么 多 要 做 的 


事情 ， 所 以 人 类 才 发 明了 CPU， 而 实际 上 并 不 是 这 
样 。 最 早 人 们 发 明 CPU 只 是 为 了 处 理 电 信和 号， 那个 


时 候 没 有 人 能 想到 它 后 来 会 成 为 这 么 有 用 的 机 器 。 
不 过 后 来 人 们 发 现 ， 一 旦 把 电信 号 的 开 CON) / 关 
COFF) 与 数字 0 和 1 对 应 起 来 ， 束 能 将 二 进 制 数 转 
换 为 电信 号 ， 同 时 电信 号 也 可 以 转换 回 二 进 制 数 。 
所 以 ， 虽 然 CPU 依 然 只 能 处 理 电信 号 ， 但 它 从 此 摇 
身 一 变 ， 成 了 神奇 的 二 进 制 数 计 算 机 。 


因为 我 们 可 以 把 十 进 制 数 转换 成 二 进 制 数 ， 也 能 把 
二 进 制 数 还 原 成 十 进 制 数 ， 所 以 人 们 叉 发 明了 普通 
的 计算 机 。 后 来 ， 我 们 发 现 只 要 给 每 个 文字 都 编 上 
写 《 即 文字 编码 ) ， 束 可 以 建立 一 个 文字 与 数字 的 
对 应 关系， 从 而 束 可 以 把 文字 也 转换 成 电信 号 ， 让 
CPU 来 处 理 文 曹 〈 比 如 进行 文字 输入 或 者 字 词 检索 
等 ) 。 依 此 类 推 ， 人 们 接着 又 找到 了 将 图 像 、 音 乐 
等 等 转换 成 电信 号 的 方法 ， 使 CPU 的 应 用 范围 越 来 
越 广 。 不 过 CPU 还 是 一 如 既往 ， 只 能 处 理 电信 和 号 。 


而 且 我 们 能 用 CPU 来 处 理 的 并 不 仅仅 只 有 数据 ， 我 
们 还 可 以 用 电信 号 向 CPU 发 出 指令 。 其 实 我 们 所 编 
写 的 程序 最 终 都 要 转换 成 所 谓 的 机 器 语言 ， 这 些 机 
器 语言 就 是 以 电信 号 的 形式 发 送 给 CPU 的 。 这 些 机 
器 语言 不 过 就 是 一 连 串 的 指令 代码 ， 实 际 上 也 束 是 
一 串 0 和 1 的 组 合 而 已 。 


软 检 的 原理 也 有 异曲同工 之 妙 ， 简 单 说 来 ， 束 是 把 
二 进 制 的 0 和 1 转换 为 磁极 的 N 极 和 S 极 而 已 ， 所 以 我 


们 只 用 0 和 1 束 可 以 写 出 映像 文件 来 。 不 仅 是 映像 文 
件 ， 计 算 机 所 能 处 理 的 各 种 文件 最 终 都 是 用 0 和 1 与 
成 的 。 因 此 可 以 说 ， 不 能 仅 用 0 和 1 来 表达 的 内 容 ， 
部 不 能 以 电信 和 号 的 形式 传递 给 CPU， 所 以 这 种 内 容 
是 计算 机 所 无 法 处 理 的 。 


而 “二 进 制 编辑 融 ? 束 是 用 来 编辑 二 进 制 数 的 ， 我 们 
可 以 很 方便 地 用 它 来 输入 二 进 制 数 ， 并 保存 成 文 
件 。 所 以 它 束 是 我 们 的 秘密 武 蔓 ， 也 束 是 说 只 要 有 
二进制 编辑 器 ， 随 便 什 么 文件 我 们 部 能 做 出 来 。 
EE!) 如 果 大 家 在 商店 里 看 到 一 个 软件 ， 很 
想 要 而 又 不 想 伦 那么 多 钱 的 话 ， 那 残 干 脆 就 回 家 用 
二 进 制 编辑 占 目 己 做 一 个 算 啦 ! 用 这 个 方法 我 们 完 
全 可 以 目 己 制作 出 一 个 与 店 里 商品 一 模 一 样 的 东西 
来 。 看 上 一 个 500 万 像 际 的 数码 相机 ， 但 是 太 贯 
KANE? 那 有 什么 关系 ? 我 们 只 要 有 二 进 制 编辑 规 
在 手 ， 融 可 以 制作 出 坚 不 逊 色 于 相机 提 摄 效 末 的 图 
像 ， 而 且 想 做 几 张 束 可 以 做 几 张 。 要 是 C 编 译 右 大 
bt SEA, CENA ABI. BACHE, R 
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有 了 这 么 强大 的 工具 ， 制 作 操作 系统 就 是 小 菜 一 


侏 。 道 理 束 是 这 么 人 简单， 所 以 我 们 这 次 不 费 吹 灰 之 
力 就 做 了 个 操作 系统 出 来 也 是 理所当然 的 。 或 许 有 
AZEMA T HANDE, AURKARI 
这 么 多 吗 ? ”其 实 不 然 ， 如 来 我 们 对 CPU 的 基础 有 
SME HIER, MERA Aer le T. 


“ 咀 ， 且 慢 ， 我 明白 了 二 进 制 编辑 器 就 是 编辑 二 进 
制 数 的 软件 ， 可 是 在 你 让 我 输入 你 的 helloos.img 的 
时 候 ， 除 了 0 和 1 以 外 ， 不 是 还 让 我 输入 了 很 多 别 的 
东西 吗 ? 你 看 ， 第 一 个 不 束 是 E 吗 ? 这 哪里 是 什么 
二 进 制 数 ? 分 明 是 个 瑞 文 字母 嘱 ! ”.… 噢 ， 不 好 
意思 ， 这 说 得 一 点 错 都 没有 。 


虽然 二 进 制 数 与 电信 号 有 很 好 的 一 一 对 应 关系 ， 但 
它 有 一 个 缺点 ， 那 就 是 位 数 实 在 太 多 了 ， 举 个 例子 
来 说 ， 如 果 我 们 把 1234 写 成 二 进 制 数 ， 就 成 了 
10011010010， 居 然 长 达 11 位 。 而 写成 十 进 制 数 ， 
只 用 4 位 就 够 了 。 因 为 这 样 也 太 痕 性 纸张 了 ， 所 以 
计算 机 业界 普遍 使 用 十 六 进 制 数 。 十 进 制 数 的 1234 
写成 十 六 进 制 数 ， 就 是 4D2， 只 用 3 位 就 够 了 。 


那 为 什么 非 要 用 十 六 进 制 数 呢 ， 用 十 进 制 数 不 是 也 
挺 好 的 吗 ? 实际 上 ， 我 们 可 以 非常 简便 地 把 二 进 制 
BU MT NEE Tl BL o 


二 进 制 数 和 十 六 进 制 数 对 照 表 


有 了 这 个 对 照 表 ， 我 们 就 能 轻松 进行 二 进 制 与 十 六 
进 制 之 间 的 转换 了 。 将 二 进 制 转换 为 十 六 进 制 时 ， 
只 要 从 二 进 制 数 的 最 后 一 位 开始 ，4 位 4 位 地 替换 过 
来 就 行 了 。 如 : 


106 1101 0010 > 4D2 


反之 ， 把 十 六 进 制 数 的 4D2 转 换 为 二 进 制 数 的 100 

1101 0010 也 很 简单 ， 只 要 用 上 面 的 对 照 表 反 过 来 变 
换 一 下 就 行 了 。 而 十 进 制 数 变换 起 来 束 没 这 么 简单 
了 。 同 理 ， 八 进 制 数 是 把 3 位 一 组 的 二 进 制 数 作为 

一 个 八进制 位 来 变换 的 ， 这 种 计数 法 在 计算 机 业界 
也 偶 有 使 用 。 


因此 我 们 在 输入 EB 的 时 候 ， 实 际 上 是 在 输入 
11101011， 上 所 以 它 其 实 是 个 十 六 进 制 编辑 器 ， 但 笔 
者 习惯 称 它 为 二 进 制 编辑 器 ， 硕 望 大 家 不 要 见怪 。 


里 然 笔 者 对 二 进 制 编辑 器 如 此 地 赞 不 绝口 ， 但 用 它 


也 解决 不 了 什么 实际 问题 。 因 为 这 残 相当 于 “只要 
有 了 笔 和 纸 ， 什 么 优秀 的 小 说 都 能 写 出 来 一样。 
笔 和 纸 不 过 就 是 笔 和 纸 而 已 ， 实 际 上 对 创作 优秀 的 
小 说 也 帮 不 上 多 大 的 忙 。 所 以 大 家 在 写 程 序 时 ， 用 
HS) eS ee SCAB nd EE as AU Sin PE a» BOA ME JR H a al] i 
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机 ， 没 有 谁 只 用 二 进 制 编辑 器 来 做 图 像 文件 。 
此 ， 我 们 用 二 进 制 编辑 费 进 行 的 开 友 束 到 此 为 止 ， 
接 下 来 我 们 要 调转 方向 ， 开 始 用 编程 语言 来 继续 我 
们 的 开发 工作 。 不 过 有 了 这 次 的 经 验 ， 我 们 融 知 嘎 
本 如 果 今 后 过 到 什么 特殊 情况 还 可 以 使 用 二 进 制 编 
辑 器 ， 它 是 非常 有 用 的 。 而 且 后 面 章 节 中 我 们 偶尔 
ESHE 


3 初次 体验 汇编 程序 


好 ， 现 在 就 让 我 们 马上 来 写 一 个 汇编 程序 ， 用 它 来 
生成 一 个 跟 刚 才 完 全 一 样 的 helloos.img 吧 。 我 们 这 
次 使 用 的 汇编 语言 编译 器 是 笔者 目 己 开发 的 ， 名 
为 “nask”， 其 中 的 很 多 语法 都 模仿 了 自由 软件 里 享 
有 盛名 的 汇编 器 “NASM”， 不 过 在 “NASM” 的 基础 
之 上 又 提高 了 目 动 优 化 能 


超 长 的 源 代码 


Oxeb, Ox4e, 0x90, 0x48, 0x45, Ox4c, Ox4c, 
0x49, Ox50, Ox4c, Ox0@, OxO@2, Ox01, ©0xð1, 
0x02, O@xe@, Ox00, 0x40, OxOb, OxfO, 0X09, 
0x12, Ox0@, 0x02, Ox00, Ox00, Oxe@, Oxee, 


0x40, @xOb, Oxe@, OXO, Oxe@, Oxee, 8x29, 
(为 节省 纸张 ， 这 里 省 略 中 间 的 18 万 4314 行 ) 
DB “6x66，6x686，68Xx696，6x69，68x686，68x69 ，6X668， 


我 们 使 用 复制 粘 帖 的 方法 ， 束 可 以 写 出 这 样 一 个 超 
长 的 源 代码 来 ， 将 其 命名 为 “helloos.nas”， 并 保存 
在 helloos0 中 。 仔 细 看 一 下 天 能 发 现 这 个 文件 内 容 
与 我 们 用 二 进 制 编辑 右 输 入 的 内 容 是 一 模 一 样 的 。 


接着 ， 我 们 用 “lcons_nt.bat”* 或 是 “lcons_9x.bat”( 我 
们 在 前 面 已 经 说 过 ， 要 根据 Windows 的 版 本 决定 用 
哪 一 个 。 以 后 每 次 都 这 样 解释 一 亿 的 话 比 较 抹 烦 ， 


所 以 我 们 就 将 它 简写 为 lcons 好 了 ) 打开 一 个 命令 
行 窗口 (console) ， 输 入 以 下 指令 提示 符 部 分 不 
用 输入 ) : 


提示 符 1>..\z_tools\nask.exe helloos.nas helloos. img 


1 prompt， 出 现在 命令 行 窗口 中 ， 提 示 用 户 进 行 输 
入 的 信息 。 


这 样 我 们 束 得 到 了 映像 文件 helloos.img。 


好 ， 我 们 的 第 一 个 汇编 语言 程序 就 这 样 做 成 

TE ena: 不 过 这 么 写 程序 也 太 麻 烦 了， 要 做 个 18 万 
行 的 程序 ， 不 但 浪费 时 间 ， 还 浪费 硬盘 空间 。 与 其 
这 样 还 不 如 用 二 进 制 编辑 硕 呢 ， 不 用 办 

入 “0x”、“,” 什 么 的 ， 还 能 轻松 一 后 。 


其 实 要 解决 这 个 问题 并 不 难 ， 如 果 我 们 不 只 使 用 

DB 指令 ， 而 把 RESB 指 令 也 用 上 的 话 ， 束 可 以 一 下 
将 helloos.nas 缩 得了 ， 而 且 还 能 保证 输出 的 内 容 不 
变 ， 具 体 我 们 来 看 下 面 。 


正常 长 度 的 源 程 序 


DB @xeb, @x4e, 0x90, 0x48, 0x45, Ox4c, Ox4c, Ox4Ff 
DB 0x49, 0x50, Ox4c, 0x00, 0x02, Ox01, Ox01, Axee 


DB 6Xx62，6xe6，6X66，6Xx46 ，6Xx6b，6xf6，6x69，6Xx60 
DB 06x12, 686x660, 6x62，06x60，06x60，06x606，06x606，06x060 
DB 0x40, 86x68@b, 8x606, Ox@0, Ox0@, Ox0@, 0x29, OxfFf 
DB Oxff, Oxff, Oxff, 0x48, 0x45, Ox4c, Ox4c, Ox4Ff 
DB @©x2d, @x4f, 0x53, @x20, 0x20, 0x20, Ox46, 0x41 
DB 0x54, 0x31, 0x32, 0x20, 0x20, 0x20, 0x00, O@xee 
RESB 16 

DB @©xb8, 0x00, Ox@@, Ox8e, Oxd@, Əxbc, Oxe@, Ox7c 
DB @©x8e, @xd8, Ox8e, O@xc@, Oxbe, Ox74, Ox7c, Ox8a 
DB 0x04, @x83, Oxc6, 0x01, Ox3c, Ox00, Ox74, 0x09 
DB @xb4, @x@e, Oxbb, OxOf, Oxe@@, Oxcd, 0x10, Əxeb 
DB Oxee, Oxf4, Oxeb, Oxfd, Ox@a, OxOa, Ox68, Ox65 
DB @x6c, Ox6c, Ox6f, Ox2c, Ox20, Ox77, Ox6f, 0x72 
DB @x6c, Ox64, Ox0a, 0X00, 0X00, Ox00, Ox00@, 0x00 
RESB 368 

DB 0x00, 0x00, 0x00, Ox00, Ox00@, Ox00, 0x55, Oxaa 
DB Oxf®, Oxff, Oxff, 0x00, Ox0@, Ox0G@, Oxe0, Axed 
RESB 4600 

DB Oxf®, Oxff, Oxff, @x@0@, Ox0@, Ox0@, Oxe0, Oxee 
RESB 1469432 


RIJA OF A BOE BOI, A A Se 
把 它 放 在 附带 光盘 的 projects\01_day helloos1 H >K 
下 了 。 大 家 只 要 把 helloos1 文 件 夹 复制 粘 帖 到 tolset 
文件 夹 里 就 可 以 了 。 之 前 的 helloos0 文 件 夹 以 后 就 
不 用 了 ， 我 们 可 以 把 它 删 除 ， 也 可 以 放 在 那里 留 作 
纪念 。 顺 便 说 一 下 ， 笔 者 将 helloos0 文 件 夹 名 改 为 
了 helloos1， 删 挥 了 其 中 没 用 的 文件 ， 新 建 并 编辑 
了 需要 用 到 的 文件 ， 了 新 的 helloos1 文 
件 夹 。 操 作 系 统 就 是 这 样 一 点 一 点 地 成 长 起 来 的 。 


每 次 进行 汇编 编译 的 时 候 ， 我 们 都 要 输入 刚才 的 指 
令 ， 这 太 厂 烦 了 ， 所 以 笔者 就 做 了 一 个 批 处 理 文件 
“asm.bat。 有 了 这 个 批 处 理 文 件 ， 我 们 只 要 在 

用 “!cons” 打 开 的 命令 行 窗 口 里 输入 “asm>”， 就 可 以 
生成 helloos.img 文 件 。 在 用 “asm>” 作 成 img 文 件 后 ， 
再 执行 “run” 指 令 ， 就 可 以 得 到 与 刚才 一 样 的 结果 。 


“batch file， 基 本 上 只 是 将 命令 行 窗 口 里 输入 的 命 
令 写 入 文本 文件 。 虽 然 还 有 功能 更 强 的 处 理 ， 但 
本 书 中 我 们 用 不 到 。 上 所谓 批 处 理 束 是 批量 处 理 ， 

即 一 次 处 理 一 连 串 的 命令 。 


DB 指令 是 “define byte” 的 缩写 ， 也 就 是 往 文件 里 直 
接 写 入 1 个 字 节 的 指令 。 笔 者 喜欢 用 大 与 字母 来 写 
汇编 指令 ， 但 小 写 的 “db” 也 是 一 样 的 。 


在 汇编 语言 的 世界 里 ， 这 个 指令 是 程序 员 的 杀手 

铜 ， 也 就 是 说 只 要 有 了 DB 指令 ， 我 们 就 可 以 用 它 
做 出 任何 数据 《〈 甚 全 是 程序 ) 。 所 以 可 以 说 ， 没 有 
用 汇编 语言 做 不 出 来 的 文件 。 文 本 文件 也 好 ， 图 像 
文件 也 好 ， 只 要 能 叫 上 名 的 文件 ， 我 们 部 能 用 汇编 
语言 写 出 来 。 而 其 他 的 语言 《比如 C 语 言 ) 就 没有 
这 么 万 能 。 


RESB 指 令 是 “reserve byte” 的 略 写 ， 如 果 想 要 从 现在 
的 地 址 开始 空 出 10 个 字 节 来 ， 束 可 以 写成 RESB 
10， 意 思 是 我 们 预约 了 这 10 个 字 节 (大 家 可 以 想象 
成 在 对 号 入 座 的 火车 里 ， 预 订 了 10 个 连 号 座位 的 情 
Æ) 。 而 且 nask 不 仅仅 是 把 指定 的 地 址 空 出 来 ， 它 
还 会 在 空 出 来 的 地 址 上 自动 填 入 0x00， 所 以 我 们 这 
次 用 这 个 指令 就 可 以 输出 很 多 的 0x00， 省 得 我 们 上 自 
CASISATHES SS, Ben SAIL. 
ABB F, BOAR DO _EOx, W~ I FN 
进 制 数 ， 不 加 0x， 束 是 十 进 制 数 。 这 一 点 跟 C 语 言 
是 一 样 的 。 


4 加工 润色 


刚才 我 们 把 程序 变 成 了 短 短 的 22 行 ， 这 成 果 令 人 欣 
埋 。 不 过 还 有 一 点 不 足 丈 是 很 难看 出 这 些 程序 是 干 
什么 的 ， 所 以 我 们 下 面 惑 来 稍微 改写 一 下 ， 让 别人 
也 能 看 懂 。 改 写 后 的 源 文件 增加 到 了 48 行 ， 它 位 于 
附带 光盘 的 projects\O1_day\helloos2 目 录 下 ， 大 家 可 
以 直接 把 helloos2 文 件 夹 复制 到 tolset 里 。 现 在 
helloos1 也 可 以 删 抒 了 《每 个 文件 夹 都 是 独立 的 ， 
用 完 之 后 束 可 以 删除 ， 以 后 不 再 敬 述 。 当 然 放 在 那 
里 留 作 纪念 也 是 可 以 的 ) 。 


现在 的 程序 有 50 行 ， 也 占 不 了 多 少 地 方 ， 所 以 我 们 
将 它 写 在 下 面 了 。 


有 模 有 样 的 源 代码 
; hello-os 
; TAB=4 


; 以 下 这 段 是 标准 FAT12 格 式 软盘 专用 的 代码 


DB Oxeb, Ox4e, 68x90 


DB "HELLOIPL" ; 启动 区 的 名 称 可 以 是 任意 的 字 
RRB (85247) 

DW 512 ;每 个 扇 区 (sector) 的 大 小 
(必须 为 512 字 节 ) 


DB 1 ; B (cluster) 的 大 小 (必须 


为 1 个 局 区 ) 


DW 
开始 ) 


是 18) 


1 ; 
2 ; 
224 ; 
2880 3 
exf0 ; 
9 ; 
18 3 
2 ; 
0 ; 
2880 S 
@,0,0x29 
Oxf FF FFFFF 
"HELLO-OS 
"FAT12 j 
18 


Q@xb8, Oxee, 
Ox8e, Oxd8, 
0x04, 0x83, 
xb4，6x6e， 


Oxee, Oxf4, 


O@x@a, OxVa 


FAT 的 起 始 位 置 (一 般 从 第 一 个 肩 区 
FAT 的 个 数 〈 必 须 为 2) 


; 根 目录 的 大 小 《一 般 设 成 224 项 ) 
; 该 磁盘 的 大 小 《必须 是 2886 刷 区 ) 
; 磁盘 的 种 类 《必须 是 Bxf8 ) 


FAT 的 长 度 〈 必 须 是 9 扇 区 ) 


; 1 个 磁道 (track) AJLA OH 


; 磁头 数 《〈 必 须 是 2) 


不 使 用 分 区 ， 必 须 是 6 
重 写 一 次 磁盘 大 小 
; 意义 不 明 ， 固 定 
;《〈 可 能 是 ) 卷 标号 码 
"5 磁盘 的 名 称 〈11 字 节 ) 
; 人 厂 盘 格式 名 称 〈8 字 节 ) 
; 先 空 出 18 字 节 
0OX006，6Xx8e，6Xxd6，6xbc， 
Ox8e, @xc@, O@xbe, 0x74, 
@xc6, 0x01, Ox3c, 0X00, 
Oxbb, OxOf, Oxe@, Oxcd, 


Oxeb, Oxfd 


; 2 个 换行 


"hello, world" 


Ox0a 
0 


RESB @xi1fe-¢ ; 150x00, HF] 6x661fe 
DB 0x55, Oxaa 


; 以 下 是 启动 区 以 外 部 分 的 输出 


DB Oxf, Oxff, Oxff, 0x00, Ox00, Oxee, 
0x00, 0X00 

RESB 4600 

DB Oxf, Oxff, Oxff, x00, Oxe0, Oxee, 
0x00, Ox 


RESB 1469432 


这 里 有 几 点 新 内 容 ， 我 们 逐一 来 看 一 下 。 首 先 

是 “命令 ， 这 是 个 注释 命令 ， 相 当 于 C 语 言 或 是 
C++ 中 的 %/"。 正 是 因为 有 它 ， 我 们 才 可 以 在 源 代码 
里 加 入 很 多 注释 。 


其 次 是 DB 指令 的 新 用 法 。 我 们 居然 可 以 直接 用 它 
写字 符 串 。 在 写字 符 串 的 时 候 ， 汇 编 语言 会 目 动 地 
查找 字符 串 中 每 一 个 字符 所 对 应 的 编码 ， 然 后 把 它 
们 一 个 字 市 一 个 字 市 地 排列 起 来 。 这 个 功能 非常 方 
便 ， 也 就 是 说 ， 当 我 们 想 要 变更 输出 信息 的 时 候 ， 
就 再 也 不 用 目 己 去 碍 字符 编 但 表 了 。 


再 有 就 是 DW 指 令 和 DD 指 令 ， 它 们 分 别 是 “define 
word” 和 “ddefine double-word” 的 缩写 ， 是 DB 指令 


Hye LS” © wordy AS ae “Sia”, (ACE REALL 


编 语 言 的 世界 里 ，word 指 的 是 “16 位 ”的 晶 思 ， 也 残 
是 2 个 字 节 。 “double-word" 是 “32 位 ”的 意思 ， 也 就 
是 4 个 字 节 。 


对 了 ， 差 点 忘记 说 RESB 0xlfe-$ 了 。 这 个 美元 符号 
的 意思 如 果 不 讲 ， 恐 怕 谁 也 搞 不 明白 ， 它 是 一 个 变 
量 ， 可 以 告诉 我 们 这 一 行 现在 的 字 节 数 〈 如 果 严 格 
来 说 ， 有 时 候 它 还 会 有 别 的 意思 ， 关 于 这 一 点 我 们 
明天 再 讲 ) 。 在 这 个 程序 里 ， 我 们 已 经 在 前 面 输出 
了 132 字 节 ， 所 以 这 里 的 $ 就 是 132。 因 此 nask 先 用 
0xlfe 减 去 132， 得 出 378 这 一 结果 ， 然 后 连续 输出 
378 个 字 节 的 0x00。 


那 这 里 我 们 为 什么 不 直接 写 378， 而 非 要 用 $ 呢 ? 这 
是 因为 如 果 将 显示 信息 从 “hello, world” 变 成 “this is a 
pen.” 的 话 ， 中 间 要 输出 0x00 的 字 节 数 也 会 随 之 变 
化 。 换 名 话说， 我 们 必须 保证 软盘 的 第 510 字 他 

《 即 第 0xlfe 字 节 ) 开始 的 地 方 是 55 AA。 如 果 在 程 
序 里 使 用 美元 符号 ($) 的 话 ， 汇 编 语 言 会 自动 计 
算 需 要 和 输出 多 少 个 00， 我 们 也 惑 可 以 很 轻松 地 改写 
输出 信息 了 。 


既然 可 以 时 不 费力 地 改写 显示 的 信息 ， 吏 一 定 要 好 


好 用 挥 这 一 功能 ， 让 我 们 的 操作 系统 显示 出 目 己 豆 
欢 的 一 句 话 ， 让 它 成 为 一 个 只 属于 我 们 自己 的 、 世 
界 上 独一无二 的 操作 系统 。 不 过 遗憾 的 是 现在 它 还 
不 能 显示 汉字 。 当 然 大 家 也 可 以 笑 斌 一下， 但 由 于 
这 个 程序 还 没有 显示 汉字 的 功能 ， 所 以 显示 出 来 的 
都 是 乱码 ， 因 此 大 家 先 将 就 一 下 ， 用 英语 或 拼音 

吧 。 


CLLD 
最 后 再 给 大 家 解释 一 下 程序 中 出 现 的 几 个 专门 术 


语 。 时 间 不 时 了 ， 我 们 今天 就 到 这 吧 。 其 他 的 留待 
明天 再 说 。 


有 的 文本 编辑 器 可 以 调整 TAB 键 的 宽度 。 请 使 用 这 种 编辑 器 的 人 将 TAB 键 的 宽度 
设 定 成 4， 这 样 源 程序 更 容易 读 。 可 能 有 人 说 ， 我 这 里 只 能 用 记事 本 
Genie. TAB 键 宽 度 固定 为 9， 想 调 都 没 法 调 。 没 关系 ， 明 天 笔者 来 推荐 一 

个 好 用 的 文本 编辑 器 。 


(FAT12 Format) 用 Windows 或 MS-DOS 格 式 化 出 来 的 软盘 就 是 这 种 格式 。 我 们 
的 helloos 也 采用 了 这 种 格式 ， 其 中 容纳 了 我 们 开发 的 操作 系统 。 这 个 格式 兼容 性 
A 在 Windows 上 也 能 用 ， 而 且 剩 余 的 磁盘 空间 还 可 以 用 来 保存 自己 喜欢 的 文 


(boot sector) 软盘 第 一 个 的 扇 区 称 为 启动 区 。 那 么 什么 是 扇 区 呢 ? 计算 机 读 写 

软盘 的 时 候 ， 并 不 是 一 个 字 节 一 个 字 节 地 读 写 的 ， 而 是 以 512 字 节 为 一 个 单位 进 

行 读 写 。 因 此 ,软盘 的 512 字 节 就 称 为 一 个 扇 区 。 一 张 软盘 的 空间 共有 1440KB， 

也 就 是 1474560 字 节 ， 除 以 512 得 2880， 这 也 就 是 说 一 张 软盘 共 有 2880 个 扇 区 。 那 

为 什么 第 一 个 扇 区 称 为 启动 区 呢 ? 那 是 因为 计算 机 首先 从 最 初 一 个 扇 区 开始 读 软 
启动 区 盘 ， 然 后 去 检查 这 个 扇 区 最 后 2 个 字 节 的 内 容 。 

如 果 这 最 后 2 个 字 节 不 是 0x55 AA， 计 算 机 会 认为 这 张 盘 上 没有 所 需 的 启动 程 

序 ， 就 会 报 一 个 不 能 启动 的 错误 。 (也 许 有 人 会 问 为 什么 一 定 是 0x55 AA 呢 ? F 

是 当初 的 设计 者 随便 定 的 ， 笔 者 也 没 法 解释 ) 。 如 果 计 算 机 确认 了 第 一 Pax 

最 后 两 个 字 节 正 好 是 0x55 AA, 那 它 就 认为 这 个 肩 区 的 开头 是 启动 程序 ， j 

执行 这 个 程序 。 

initial program loader 的 缩写 。 启 动 程序 加 载 器 。 启 动 区 只 有 区 区 512 字 节 ， 实 际 

的 操作 系统 不 像 hello-os 这 么 小 ， 根 本 装 不 进去 。 所 以 edz: 的 操作 系统 ， 都 

是 把 加 载 操 作 系统 本 身 的 程序 放 在 局 动 区 里 的 。 有 鉴于 此 ， 有 时 也 将 启动 区 称 为 

IPL IPL。 但 hello-os 没 有 加 载 程序 的 功能 ， 所 以 HELLOIPL 这 个 名 字 不 太 顺 理 成 章 

A 如 果 有 人 正义 感 特别 强 ， 觉 得 “这 是 撒谎 造假 ， 万 万 不 能 容忍 ! *， 那 也 可 以 改 成 


FAT12 格 式 ... 


其 他 的 名 字 。 但 是 必须 起 一 个 8 字 节 的 名 字 ， 如 果 名 字 长 度 不 到 8 字 节 的 话 ， 需 要 
在 最 后 补 上 空格 。 

(boot) boot 这 个 词 本 是 长 靴 〈boots) 的 单数 形式 。 它 与 计算 机 的 启动 有 什么 关 
系 呢 ?一 般 应 该 将 启动 称 为 start 的 。 实 际 上 ，boot 这 个 词 是 bootstrap 的 缩写 ， 原 
指 靳 子 上 附带 的 便于 拿 取 的 靳 带 。 但 自从 有 了 《吹牛 大 王 历 险 记 》 (德国 ) 这 个 
故事 以 后 ，bootstrap 这 个 词 就 有 了 “自力 更 生 完 成 任务 ”这 种 意思 “(大 家 如 果 对 详 
情感 兴趣 ， 可 以 在 Google 上 查找 ， TE A EP T E. osask.jp E 


提问 ) 。 而 且 ， 磁 盘 上 明明 装 有 操作 系统 ， 还 要 说 读 入 操作 系统 的 程序 ( CB 

IPL) 也 放 在 磁盘 里 ， 这 就 像 打开 宝物 箱 的 钥匙 就 在 宝物 箱 里 一 样 ， 是 一 种 矛盾 

的 说 法 。 被 称 为 bootstrap 方 式 。boot 这 个 说 

法 就 来 源 于 此 。 如 果 者 来 命名 的 话 ， 肯 定 不 会 用 bootstrap 这 么 奇怪 的 名 字 ， 
笔者 大 概 会 叫 它 “多 级 火箭 式 ” 吧 。 


第 2 天 汇编 语言 学 习 与 Makefile 入 
门 

。 介 绍 文本 编辑 器 

。 继 续 开 发 


。 先 制作 局 动 区 
e Makefile 入 门 


1 介绍 文本 编辑 需 


笔者 要 问 大 家 推荐 一 个 文本 编辑 费 TeraPad， 可 以 
从 下 面 这 个 网 站 下 载 ， 这 是 一 球 人 免费 软 件 〈 在 此 感 
谢 寺 尾 进 先生 的 慷慨 奉献 ! ) 。 


http://www5f.biglobe.ne.jp/~t- 
susumu/library/tpad.html! 


1! 这 个 编辑 器 是 日 文 版 的 ， 译 者 推荐 一 个 可 编辑 
中 文 的 文本 编辑 器 Notepad++， 可 以 从 这 个 网 站 下 
载 : http://notepad-plus-plus.org/。 


这 也 是 个 免费 软件 。 下 载 以 后 解压 纵 ， 大 家 可 以 
在 解压 后 的 文件 夹 里 找到 “Notepad++”， 然 后 双击 
鼠标 左 键 就 可 以 安装 软件 了 。 


大 家 下 载 的 时 候 ， 可 能 版 本 会 升级 ， 所 以 文件 名 
也 许 会 略 有 不 同 。 它 的 使 用 方法 与 记事 本 
(notepad) 基本 上 是 一 样 的 。 它 有 很 多 选项 ， 大 
家 可 以 根据 自己 的 喜好 进行 相应 的 设置 。 这 里 介 
绍 几 个 非常 有 用 的 设置 。 


设置 中 文 模式 方法 : 


从 菜单 选择 “Encoding”->“Character 
set” = “Chinese” = “GB2312 (Simplified) ” 


大 家 可 以 按照 如 下 步骤 设置 Tab 键 所 对 应 的 字符 
to MKA“ Settings” = “Preference”, Z5% H 
一 个 对 话 框 ， 选 择 “Language Menu/Tab 

Settings”, WIAs AN ie A PITA BEEN E A 

口 。 在 TAB 键 设置 的 下 半 部 可 以 看 到 TAB 键 的 宽 
度 设置 ， 默 认 值 是 4。 如 果 要 用 空格 代 符 TAB， 则 
勺 选 “Replace by space” 前 面 的 选择 框 焉 可 以 了 。 
其 他 还 有 显示 文章 行 号 ， 显 示 换 行 待 、 文 件 结束 
符 等 很 多 设置 。 笔 者 没有 设置 显示 这 些 符号 ， 因 
为 这 样 男 面 看 起 来 比较 整洁 。 不 过 人 各 有 上 所 好 ， 
大 家 可 以 试 一 下 各 种 设置 ， 选 择 一 组 目 己 喜欢 
的 。 设 置 完成 后 ， 请 按 “OK” 按 钮 关闭 对 话 框 。 
一 一 详 者 注 


笔者 虽然 从 昨天 开始 介绍 了 很 多 免费 软件 ， 但 并 没 
有 强制 大 家 使 用 的 意思 ， 如 果 大 家 已 丝 有 了 目 己 喜 
欢 的 二 进 制 编辑 需 或 者 文本 编辑 融 的 话 ， 那 融 还 用 
它们 吧 。 即 便 使 用 不 同 的 软件 ， 开 发 出 来 的 程序 也 
是 一 样 的 ， 所 以 笔者 没有 特意 把 这 些 免 费 软 件 放 在 
光盘 里 。 大 家 不 用 太 在 意 笔 者 推荐 的 软件 ， 尽 管用 
AOE KIN alse I o 


2 继续 开发 


昨天 我 们 还 没有 详细 地 讲解 helloos.nas 中 的 注释 音 
分 ， 其 中 要 掌握 程序 核心 之 前 的 内 容 和 启动 区 以 外 
的 内 容 ， 需 要 具备 软盘 方面 的 一 些 具体 知识 ， 而 这 
在 以 后 我 们 还 会 讲 到 ， 所 以 这 两 部 分 暂时 先 保留 。 


这 样 一 来 ， 尚 未 讲解 清楚 的 残 只 有 程序 核心 部 分 
T, ABABA TEAN GE eS BCE fay BD TNT 
吧 。 先 把 projects/02_day 中 的 helloos3 复 制 到 tolset 
中 ， 然 后 打开 其 中 的 helloos.nas 文 件 。 这 个 文件 太 
长 了 ， 我 们 节选 一 部 分 来 讲解 。 


helloos.nas $ 1% 
3 hello-os 
; TAB=4 
ORG 9Xx7c66 ;指明 程序 的 装载 地 址 


; 以 下 的 记述 用 于 标准 FAT12 格 式 的 软盘 


JMP entry 
DB 0x90 
--- CPER) --- 


; 程序 核心 


entry: 


MOV AX,@ 3 初始 化 寄存 器 
MOV SS ,AX 
MOV SP ,0x7c00 
MOV DS, AX 
MOV ES, AX 
MOV SI,msg 
putloop: 
MOV AL, [SI] 
ADD SI,1 ; 给 SI 加 1 
CMP AL ,6 
JE fin 
MOV AH, OxQe ; 显示 一 个 文字 
MOV BX,15 ; 指定 字符 颜色 
INT 0x10 ; 调用 显卡 BIOS 
JMP putloop 
fin: 
HLT ; 让 CPU 停止 ， 等 待 指 令 
JMP fin ; 无 限 循环 
msg: 
DB Q@x@a, Ox0a ; 换行 2 次 
DB "hello, world" 
DB 9Xx6a ; 换行 
DB O 


这 段 程序 里 有 很 多 新 指令 ， 我 们 从 上 到 下 依次 来 看 
看 。 


首先 是 ORG 指令 。 这 个 指令 会 告诉 nask， 在 开始 执 
行 的 时 候 ， 把 这 些 机 絮语 言 指令 装载 到 内 存 中 的 哪 
个 地 址 。 如 果 没 有 它 ， 有 几 个 指令 束 不 能 被 正确 地 
翻译 和 执行 。 男 外 ， 有 了 这 条 指令 的 话 ， 美 元 符 
C$) 的 信义 也 随 之 变化 ， 它 不 再 是 指 输出 文件 的 
第 几 个 字 节 ， 而 是 代表 将 要 读 入 的 内 存 地 址 。 


ORG 指令 来 源 于 英文 “origin”， 意 思 是 “源头 、 起 
点 ”。 它 会 告诉 nask， 程 序 要 从 指定 的 这 个 地 址 开 
始 ， 也 就 是 要 把 程序 装载 到 内 存 中 的 指定 地 址 。 这 
里 指定 的 地 址 是 0x7c00， 至 于 指定 它 的 原因 我 们 会 
在 后 文 (FERE) FR. 

下 一 个 是 JMP 指 令 ， 它 相 当 于 C 语 言 的 goto 语 句 ， 来 
源 于 英文 的 jump， 意 思 是 “ 跳 转 ?。 人 简单 吧 ! 


再 下 面 是 “entry:*"， 这 是 标签 的 声明 ， 用 于 指定 JMP 
指令 的 跳 转 目的 地 等 。 这 与 C 语 言 很 像 。entry 这 个 
HE ACRI S hs 


FAIA BMRA MOVIES © MOVIES MIZERE 
用 的 指令 了 ， 即 便 在 这 段 程 厅 里 ，MOV 指 令 的 使 
用 次 数 也 仅 次 于 DB 指令 。 这 个 指令 的 功能 非常 简 
单 ， 即 赋值 。 虽 然 简 单 ， 但 笔者 认为 ， 只 要 完全 和 


握 了 MOV 指 令 ， 也 就 理解 了 汇编 语言 的 一 大 半 。 
所 以 ， 我 们 在 这 里 详细 地 讲解 一 下 这 个 指令 


“MOV AX,0”， 相 当 于 “AX=0;” 这 样 一 个 赋值 语 
句 。 同 样 ，“MOV SS,AX” 就 相当 于 “SS=AX:”。 或 
许 有 人 会 问 :“ 这 个 AX 和 SS 是 什么 东西 ? ”这 个 问 
题 我 们 竺 会 儿 和 再 回答 。 


MOV 命 令 源 自 英 文 “move”， 意 思 是 “移动 >。“ 赋 
值 ” 与 “移动 ”虽然 有 些 相 似 ， 但 毕竟 还 是 不 同 的 。 

- 般 说 来 ， 如 果 我 们 把 一 个 东西 移 走 了 ， 它 原来 所 
占用 的 位 置 束 会 空 出 来 。 但 是 ， 在 执行 了 MOV 
SS,AX” 语 句 之 后 ，AX 并 没有 变 “ 空 ”， 还 保留 着 原 
来 的 值 不 变 。 所 以 这 实际 上 是 “赋值 >， 而 不 是 “ 移 
zj”. MRH COPY SRF EI, HERR 
a 至 于 为 什么 成 了 MOV 指 令 ， 笔 者 也 搞 不 
H 


现在 来 说 说 AX 和 SS。CPU 里 有 一 种 名 为 寄存 器 的 
存储 电路 ， 在 机 器 语言 中 就 相当 于 变量 的 功能 。 具 
有 代表 性 的 寄存 器 有 以 下 8 个 。 各 个 寄存 器 本 来 都 
是 有 名 字 的 ， 但 现在 知道 这 些 名 字 的 机 会 已 经 不 多 
了 ， 所 以 在 这 里 顺便 介绍 一 下 。 


accumulator, 3 IA TTAF 
counter, tHL% 

DX 一 一 data， 数 据 寄存 器 
BX——base, HAIT AF 


AX 


CX 


SP——stack pointer， 栈 指针 寄存 器 

BP 一 一 base pointer， 基 址 指针 寄存 器 
SI——-source index, WAHA Ar 

DI destination index， 目 的 变 址 寄存 器 


这 些 寄 存 器 全 都 是 16 位 寄存 器 ， 因 此 可 以 存储 16 位 
的 二 进 制 数 。 虽 然 它 们 都 有 上 面 这 种 正式 名 称 ， 但 
在 平常 使 用 的 时 候 ， 人 们 往往 用 简单 的 英文 字母 来 
代替 ， 称 它们 为 <AX 寄 存 器 *、“SI 寄 存 器 "等 。 

其 实 寄存 器 的 全 名 还 是 很 能 说 明 它 本 来 的 意义 的 。 
比如 在 这 8 个 寄存 器 中 ， 不 管 使 用 哪 一 个 ， 差 不 多 
都 能 进行 同样 的 计算 ， 但 如 果 都 用 AX 来 进行 各 种 
运算 的 话 ， 程 序 就 可 以 写 得 很 简洁 。 


“ADD CX,0x1234” 编 译 成 81 C1 34 12， 是 一 个 4 字 


的 命令 。 


节 
M “ADD AX,0x1234” 编 译 成 05 34 12， 是 一 个 3 字 
节 的 命令 。 


从 上 面 例子 可 以 看 出 ， 这 里 所 说 的 “程序 可 以 写 得 
简洁 ”是 指 “ 用 机 笑语 言 写 程序 ”的 情况 ， 从 汇编 语 
言 的 源 代 码 上 是 看 不 到 这 些 区 别 的 。 如 果 我 们 不 展 
机 如 语言， 束 会 有 很 多 地 方 难以 理解 。 


再 说 说 别 的 寄存 器 ，CX 是 为 方便 计数 而 设计 的 ， 
BX 则 适合 作为 计算 内 存 地 址 的 基点 。 其 他 的 寄存 
arth A DLA o 


关于 AX、CX、 DX、 BX 这 几 个 寄存 器 名 字 的 由 
来 ， 虽 然 我 们 找 不 到 缩写 为 X 的 单词 ， 但 这 个 X 表 
示 扩 展 〈extend) 的 意思 。 之 所 以 说 扩展 是 因为 在 
这 之 前 CPU 的 寄存 器 都 是 8 位 的 ， 而 现在 一 下 变 成 
了 16 位 ， 扩 展 了 一 倍 ， 所 以 发 明 者 在 原来 寄存 器 的 
名 字 后 面 加 了 个 X， 意 思 是 说 “扩张 了 一 倍 ， 了 不 起 
吧 ! ”。 大 家 可 能 注意 到 了 这 几 个 寄存 器 的 排列 顺 
序 ， 扎 并 不 遵循 名 称 的 字母 顺序 。 没 错 ， 其 实 这 是 
按照 机 咒语 言 中 寄存 器 的 编号 顺序 排列 的 ， 可 不 是 
笔者 随手 瞎 写 的 哦 。 


这 8 个 寄存 器 全 部 合 起 来 也 才 只 有 16 个 字 节 。 换 名 


话说 ， 就 算 我 们 把 这 8 个 寄存 器 都 用 上 ，CPU 也 只 
能 存储 区 区 16 个 字 节 。 


另 一 方面 ，CPU 中 还 有 8 个 8 位 寄存 器 。 
AL—— RI AFARA (accumulator low) 
ECL 一 一 计数 寄存 器 低位 Ccounter low) 
DL 一 一 数据 寄存 右 低 位 〈data low) 


BL 一 -一 基 址 寄存 需 低 位 (base low) 


AH— a MATa (accumulator high) 


CH— it ar #8 1. (counter high) 


DH—— 2H ar 77 4s ai DL (data high) 


BH 一 一 基 址 寄存 器 局 位 (base high) 


AX 寄 存 器 


A 
[wt 


AX 内 放 入 E21F 


名 字 看 起 来 有 点 像 ， 其 实 这 是 有 原因 的 : AX ate 
器 共有 16 位 ， 其 中 0 位 到 7 位 的 低 8 位 称 为 AL， 而 8 
位 到 15 位 的 高 8 位 称 为 AH。 所 以 ， 如 果 以 为 “再 加 
上 这 8 个 8 位 寄存 器 ，CPU 就 又 可 以 多 保存 8 个 字 节 
了 ”就 大 错 特 错 了 ，CPU 还 是 那个 CPU， 依 然 只 能 
存储 区 区 16 个 字 节 。CPU 的 存储 能 力 实在 是 太 有 限 
ie 


= SP. SI, DUB ARAASL” AH’ WE? 能 这 
有 ， 束 说 明 大 家 已 经 做 到 举一反三 了 ， 但 可 惜 的 

o 能 分 为 L” 和 “H”。 如 果 无 论 如 何 

都 要 分 别 取 高 位 或 低位 数据 的 话 ， 就 必须 先 

用 “MOV，AX，SI” 将 SI 的 值 赋 到 AX 中 去 ， 然 后 再 

HAL, AHE. XERRI ntel) 的 设 


计 人 员 的 思维 模式 。 


“ 喂 ， 我 家 的 电脑 是 32 位 的 ， 可 不 是 16 位 。 这 样 就 
能 以 32 位 为 单位 来 处 理 数 据 了 吧 ? ALB QALY) Ay eas 
在 哪儿 呀 ? ”大 家 可 能 会 有 这 样 的 疑问 ， 下 面 笔 者 
就 来 回答 这 个 问题 。 


EAX, ECX, EDX, EBX, ESP, EBP, ESI, EDI 


这 些 就 是 32 位 寄存 器 。 这 次 的 程序 虽然 没有 用 到 它 
们 ， 但 如 果 想 用 也 是 完全 可 以 使 用 的 。 在 16 位 寄存 
器 的 名 字 前 面 加 上 一 个 E 就 是 32 位 寄存 器 的 名 字 
了 。 这 个 字母 E 其 实 还 是 来 源 于 “Extend” (J FE) 
这 个 词 。 在 当时 主流 为 16 位 的 时 代 里 ， 能 扩展 到 32 
位 算是 个 飞跃 了 。 虽 说 EAX 是 个 32 位 寡 存 器 ， 但 其 
实 跟前 面 一 样 ， 它 有 一 部 分 是 与 AX 共 用 的 ，32 位 
中 的 低 16 位 束 是 AX， 而 高 16 位 既 没 有 名 字 ， 世 没 
有 寄存 器 编号 。 也 就 是 说 ， 虽 然 我 们 可 以 把 EAX 作 
为 2 个 16 位 寄存 器 来 用 ， 但 只 有 低 16 位 用 起 来 方 
便 ; 如 果 我 们 要 用 高 16 位 的 话 ， 就 需要 使 用 移 位 命 
令 ， 把 高 16 位 移 到 低 16 位 后 才能 用 。 


这 么 说 来 ， 就 是 32 位 的 CPU 也 只 能 存储 区 区 32 字 
节 ， 存 储 能 力 还 真是 小 得 可 怜 。 


有 的 读者 用 的 电脑 可 能 是 64 位 的 ， 但 我 们 这 次 不 使 


用 64 位 模式 ， 所 以 这 里 也 束 不 再 资 述 了 。 

关于 寄存 器 本 来 笔者 束 想 介绍 到 这 儿 ， 但 是 突然 想 
起 来 ， 还 有 一 个 段 寄存 右 Gat register) ， 上 所 
以 企 这 里 二 rene 绍 一 下 吧 。 这 些 段 寄存 器 都 
Fe LOAM. a AE at 

ES 一 一 附加 段 寄 存 器 (extra segment) 
CS—— {Vig ear feds (code segment) 

SS——tk artes (stack segment) 

DS 一 一 数据 段 寄 存 器 (data segment) 

FS 一 一 没有 名 称 (segment part 2) 

GS 一 一 没有 名 称 (segment part 3) 

关于 上段 寄存 器 的 具体 内 容 ， 我 们 保留 到 明天 再 评 细 
讲解 。 现 在 ， 我 们 暂时 先 在 这 些 寄存 器 里 放 上 0 束 
可 以 了 。 


好 ， 到 这 里 寄存 器 已 经 讲 得 差不多 了 。 


那么 接 下 来 我 们 继续 看 程序 ， 下 一 个 看 个 人 ia A) 
应 该 是 “MOYV SLmsg” 吧 。MOV 是 赋值 ， 意 思 是 
SI=msg， 而 msg 是 下 面 将 会 出 现 的 标号 。 GEER 
值 给 寄存 器 ? 这 到 底 是 怎么 回 事 ? ”为 了 理解 这 个 
谜团 ， 我 们 先 回 到 JMP 指 令 


前 面 我 们 已 经 看 到 了 “JMP entry” 这 个 指令 ， 其 实 把 
它 写成 JMP 0x7c50” 也 完全 没有 问题 。 本 来 JMP 指 
令 的 基本 形式 束 是 跳 转 到 指定 的 内 存 地 址 ， 因 此 这 
个 指令 就 是 让 CPU 去 执行 内 存 地 址 0x7c50 的 程序 。 


之 所 以 可 以 用 “JMP entry” 来 代 蔡 “JMP 0x7c50”， 是 
因为 entry 束 是 0x7c50。 在 汇编 语言 中 ， 所 有 标号 都 
仅仅 是 单纯 的 数字 。 每 个 标号 对 应 的 数字 ， 是 由 汇 
编 语言 编译 右 根 据 ORG 指 令 计算 出 来 的 。 编 译 占 计 
ae 的 “标号 的 地 方 对 应 的 内 存 地 址 ”就 是 那个 标号 


所 以 ， 如 果 我 们 在 这 个 程序 中 写 了 “MOV 
AX,entry”, ASE BS FEOx7c500K A BIAX ATT a 

E, RARA BUA X ATA P Bt eK f FEY 
字 。 大 家 可 不 要 以 为 写 在 “entry” 下 面 的 程序 也 都 被 
储存 了 ， 这 是 不 可 能 的 。 


那么 “MOYV SI,msg” 会 怎么 样 呢 ? 由 于 在 这 里 msg 的 
地 址 是 0x7c74， 所 以 这 个 指令 束 是 把 0x7c74 代 入 到 


Slay fas HS . 
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下 面 我 们 来 看 “MOV AL,[SI1]”。 如 果 这 个 命令 

是 “MOYV AL,SE 的 话 ， 不 用 多 说 大 家 也 都 能 明白 它 
的 意思 ， 可 这 里 用 方 括号 把 SI 括 了 起 来 。 如 果 在 汇 
编 语言 中 出 现 这 个 方 括号 ， 寄 存 器 所 代表 的 意思 束 
pte) ee S 

这 个 记号 代表 “内 存 ”。 如 果 大 家 自己 组 装 过 电脑 ， 
ee 指 的 是 256MB 或 512MB 的 那个 
A o 


内 存 


到 现在 为 止 ， 内 存 这 个 词 我 们 已 经 使 用 了 很 多 次 

了 ， 可 一 直 都 还 没有 正式 讲解 过 ， 那 内 存 到 底 是 什 
AWE? 简单 地 用 一 色 话 来 概括 ， 它 就 是 一 个 超大 规 
模 的 存储 单元 “住宅 区 ”。 用 "住宅 区 ?来 比喻 内 存 再 
合适 不 过 了 ， 它 能 充分 体现 出 存储 单元 案 密 、 整 齐 


地 排列 在 一 起 的 样子 。 英 语 中 memory 是 “记忆 ”的 意 
思 ， 这 里 我 们 把 它 译 成 “内 存 ”。 


通过 对 寄存 器 的 讲解 ， 现 在 大 家 都 知道 了 CPU 的 存 
储 能 力 很 差 ， 如 果 我 们 想 让 CPU 处 理 大 量 信 息 ， 就 
必须 给 它 另 外 准备 一 套用 于 存储 的 电路 。 因 为 即便 
是 32 位 的 CPU， 把 所 有 普通 的 寄存 器 都 加 在 一 起 ， 

最 多 也 只 能 存储 32 个 字 节 的 数据 。 束 算 把 段 寄存 器 
也 全 部 用 上 ， 也 才 只 有 44 字 节 。 这 人 么 小 的 存储 空 

间 ， 就 连 启 动 电脑 所 必需 的 局 动 区 数据 都 放 不 下 。 


现在 大 家 已 经 知道 了 存储 单元 的 必要 性 ， 那 么 我 们 
下 面 就 讲 内 存 。 内 存 并 不 在 CPU 的 内 部 ， 而 是 在 
CPU 的 外 面 。 所 以 对 于 CPU 来 说 ， 内 存 实际 上 是 外 
部 存储 器 。 这 点 很 重要 ， 就 是 说 CPU 要 通过 自己 的 
部 分 管 脚 《引线 ) 回 内 存 发 送 电信 号 ， 告 诉 内 存 
bi: “ 咀 ， 把 5678 号 地 址 的 数据 通过 我 的 管 脚 传 过 
来 “严格 说 来 ，CPU 和 内 存 之 间 还 有 称 为 芯片 
(chipset) 的 控制 单元 ) ! ”CPU 同 内 存 读 写 数据 
时 ， 就 是 这 样 进行 信息 交换 的 。 


CPU 与 内 存 之 间 的 电信 号 交换 ， 并 不 仅仅 是 为 了 存 
取 数 据 。 因 为 从 根本 上 讲 ， 程 序 本 身 也 是 保存 在 内 
存 里 的 。 程 序 一 般 都 大 于 44 字 节 ， 不 可 能 保存 在 寄 
存 器 中 ， 所 以 规定 程序 必须 放 在 内 存 里 。CPU 在 执 
行 机 器 语言 时 ， 必 须 从 内 存 一 个 命令 一 个 命令 地 读 


取 程 序 ， 顺 序 执行 。 


内 存 虽 然 如 此 重要 ， 但 它 的 位 置 却 离 CPU 相当 远 。 
就 算是 只 有 10 厘 米 左右 的 距离 吧 ， 可 这 与 CPU 中 的 
半导体 相 比 已 经 非常 遥远 了 。 所 以 ， 当 CPU 辐 内 存 
请 求 数据 或 者 输出 数据 的 时 候 ， 内 存 需 要 花 很 长 时 
间 才 能 够 完整 无 误 地 实现 CPU 的 要 求 (CPU 运行 速 
度 极 快 ， 所 以 即使 在 10 厘 米 这 么 短 的 距离 内 传送 电 
信号 ， 所 花 的 时 间 都 不 容 忽 视 ) 。 所 以 ， 虽 然 内 存 
比 寄存 器 的 存储 能 力 大 很 多 个 数量 级 ， 但 使 用 内 存 
时 速度 很 慢 。CPU 访 问 内 存 的 速度 比 访问 寄存 器 慢 
很 多 倍 ， 记 住 这 一 点 ， 我 们 才能 开发 出 执行 速度 快 
的 程序 来 。 


寄存 器 内 存 
能 够 计算 出 来 有 很 多 空间 


可 以 放 很 多 东西 
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MOV 指 令 的 数据 传送 源 和 传送 目的 地 不 仅 可 以 是 
寄存 右 或 常数 ， 也 可 以 是 内 存 地 址 。 这 个 时 候 ， 我 
们 就 使 用 方 括 写 〈([ ])〉 来 表示 内 存 地 址 。 另 外 ， 
BYTE、WORD、DWORD 等 英文 词 也 都 是 汇编 语 
言 的 保留 字 ， 下 面 举 个 例子 吧 。 


MOV BYTE [678],123 


这 个 指令 是 要 用 内 存 的 “678” 号 地 址 来 保存 “123” 这 
个 数值 。 虽 然 指 令 里 有 数字 ， 看 起 来 像 那 么 回 事 ， 

但 实际 上 内 存 和 CPU 一 样 ， 根 本 就 没有 什么 数值 的 
概念 。 所 谓 的 “678”， 不 过 就 是 一 大 串 开 CON) 或 
者 关 (OFF) 的 电信 号 而 已 。 当 内 存 收 到 这 一 串 信 
号 时 ， 电 路 中 的 某 8 个 存储 单元 就 会 响应 ， 这 8 个 存 
储 单元 会 记 住 代表 “123” 的 开 CON) 或 关 (OFF) 

的 电信 号 。 为 什么 是 8 位 呢 ? 这 是 因为 指令 里 指定 
了 “BYTE”。 同 样 ， 我 们 还 可 以 写成 : 


MOV WORD [678],123 


在 这 种 情况 下 ， 内 存 地 址 中 的 678 号 和 劳 边 的 679 号 
都 会 做 出 反应 ， 一 共 是 16 位 。 这 时 ，123 被 解释 成 
一 个 16 位 的 数值 ， 也 就 是 0000000001111011， 低 位 
的 01111011 保 存在 678 号 ， 高 位 的 00000000 保 存在 
旁边 的 679 号 。 


像 这 样 在 汇编 语言 里 指定 内 存 地 址 时 ， 要 用 下 面 这 
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数据 大 小 [地 址 ] 


是 一 条 加 是 的 组 谷 ， 如 采 我 们 指定 “数据 大 小 ”为 
BYTE, ABZ EAA Fie ot Re Hk Ag E 

字 节 。 如 果 我 们 指定 “数据 大 小 ?为 WORD， 则 相 邻 
的 一 个 字 节 也 会 成 为 这 个 指令 的 操作 对 象 。 如 果 指 
定 为 DWORD， 则 ea 也 都 
成 为 这 个 指令 的 操作 对 象 〈 共 4 个 字 这 里 所 
说 的 相 邻 ， a 


至 于 内 存 地 址 的 指定 方法 ， 我 们 不 仅 可 以 使 用 常 


数 ， 还 可 以 用 寄存 器 。 比 如 “BYTE [SIU” “WORD 
[BX]” 等 等 。 如 果 SI 中 保存 的 是 987 的 话 ，“BYTE 
[SI]* 就 会 被 解释 成 “BYTE [987]”， 即 指定 地 址 为 
987 的 内 存 。 


虽然 我 们 可 以 用 寄存 器 来 指定 内 存 地 址 ， 但 可 作 此 
用 途 的 寄存 器 非常 有 限 ， 只 有 BX、BP、SI、DI 这 
几 个 。 剩 下 的 AX、CX、DX、SP 不 能 用 来 指定 内 
存 地 址 ， 这 是 因为 CPU 没有 处 理 这 种 指令 的 电路 ， 
或 者 说 没有 表示 这 种 处 理 的 机 器 语言 。 没 有 对 应 的 
机 器 语言 当然 也 就 不 能 进行 这 样 的 处 理 了 ， 如 果 有 
AJILA W5 BAER RRR A ACUTE, CSE) 。 
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DX 内 存 里 的 内 容 赋 值 给 AL 的 时 候 ， 就 会 这 样 写 : 


MOV BX, DX 
MOV AL, BYTE [BX] 
EEHEEHE 


根据 以 上 说 明 我 们 知道 可 以 用 下 面 这 个 指令 将 SI 地 
址 的 1 字 节 内 容 谈 入 到 AL。 


MOV AL, BYTE [ST] 


可 是 MOV 指 令 有 一 个 规则 *， 那 就 是 源 数据 和 目的 
数据 必须 位 数 相 同 。 也 就 是 说 ， 能 癌 AL 里 代入 的 


就 只 有 BYTE， 这 样 一 来 就 可 以 省 略 BYTE， 即 可 以 
写成 : 

MOV AL, [SI] 

1 如 果 违 反 这 一 规则 ， 比 如 写 “MOYV AX,CL” 的 
话 ， 汇 编 语言 就 找 不 到 相对 应 的 机 器 语言 ， 编 译 
时 会 出 错 。 

哦 ， 这 样 就 与 程序 中 的 写法 一 样 了 。 现 在 总 算 把 这 


个 指令 解释 清楚 了 ， 所 以 这 个 指令 的 意思 就 是 “把 
SI 地 址 的 1 个 字 节 的 内 容 访 入 AL 中 ”。 


ADD 是 加 法 指令 。 若 以 C 语 言 的 形式 改写 ADD 
SL12 的 话 ， 残 是 SI=SI+1。“add" 的 英文 原 语 意 

pS hain eae 

CMP 是 比较 指令 。 或 许 有 人 想 ， 比 较 指 令 是 干什么 
的 呢 ? 简 单 说 来 ， 它 是 让 语句 的 一 部 分 。 壁 如 C 语 
言 会 有 这 种 语句 : 

if(a==3){ 处 理 ; } 


即 对 a 和 3 进行 比较 ， 将 其 翻译 成 机 器 语言 时 ， 必 须 
先 写 “CMP a,3”， 告 诉 CPU 比 较 的 对 象 ， 然 后 下 一 


步 再 写 “ 如 果 二 者 相等 ， 需 要 做 什么 ”。 
这 里 是 “CMP AL,0”， 意 思 就 是 将 AL 中 的 值 与 0 进行 


比较 。 这 个 指令 源 目 瑞 文中 的 compare， 意 为 “ 比 
Ae” 


JE ARTES AZ. TATE. mt 
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言 ， 如 朱 比 较 结 末 相等 ， 则 跳 转 到 指定 的 地 址 ;而 
如 果 比 较 结 果 不 等 ， 则 不 跳 转 ， 继 续 执 行 下 一 条 指 
令 。 因 此 ， 


JE fin 
这 两 条 指令 ， 就 相当 于 : 


if (AL == 6) { goto fin; } 


KATO Fe “jump if equal*， 意 思 是 如 果 相 
等 就 跳 转 。 顺 便 说 一 句 ，fin 是 个 标号 ， 它 表示 “ 结 
R” (finish) 的 意思 ， 笔 者 经 党 使 用 。 


INT 是 软件 中 断 指令 。 如 果 现 在 就 讲 中 断 机 制 的 
话 ， 肯 定 会 让 人 头 昏 脑 胀 的 ， 所 以 我 们 暂时 先 把 它 
看 作 一 个 函数 调用 吧 。 这 个 指令 源 自 英 


文 “interrupt"， 征 “中 途 打上 断 ” 的 意思 。 


电脑 里 有 个 名 为 BIOS 的 程序 ， 出 三 时 就 组 装 在 电脑 
主板 上 的 ROM? 单 元 里 。 电 脑 广 家 在 BIOS 中 预先 写 
入 了 操作 系统 开发 人 员 经 常会 用 到 的 一 些 程序 ， 非 
第 方便 。BIOS 是 英文 “basic input output system” 的 
直译 过 来 焉 是 “基本 输入 输出 系统 〈 程 

T) h 
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会 消失 。ROM 是 “read only memory” 的 缩写 。 


最 这 的 BIOS 功 能 非常 多 ， 甚 至 包括 了 电脑 的 设 定 男 
面 ， 不 过 它 的 本 质 正 如 其 名 ， 束 是 为 操作 系统 开 友 
人 员 准 备 的 各 种 函数 的 集合 。 而 INT 束 是 用 来 调用 
这 些 函 数 的 指令 。INTI 的 后 面 是 个 数字 ， 使 用 不 同 
的 数字 可 以 调用 不 同 的 函数 。 这 次 我 们 调用 的 是 
0x10〈 即 16) 号 函数 ， 它 的 功能 是 控制 显卡 。 
虽然 制造 三 家 给 我 们 准备 好 了 BIOS， 但 其 用 法 鲜 为 
人 知 。 不 过 这 些 很 容易 查 到 ， 笔 者 束 做 了 一 个 关于 
BIOS 的 网 页 ， 下 面 给 大 家 介绍 一 下 。 


http://community.osdev.info/?(AT)BIOS 


比如 我 们 现在 想 要 显示 文字 ， 先 假设 一 次 只 显示 一 


个 字 ， 那 么 具体 怎么 做 才能 知 嘎 这 个 功能 的 使 用 方 
法 呢 ? 


首先 ， 既 然 是 要 显示 文字 ， 束 应 该 看 跟 显卡 有 关 的 
函数 。 这 人 么 看 来 ，INT 0x10 好 像 有 点 关系 ， 于 是 在 
上 面 网 页 上 搜索 ， 然 后 就 能 找到 以 下 内 容 〈 网 页 的 
原文 为 日 语 ) 。 


MEAN BN FF 

e AH=0x0e; 

e AL=character code; 
e BH=0; 

e BL=color code; 

。 返回 值 : 无 


e JE: beep、 退 格 (back space) 、CR、LEF 都 会 被 
当做 控制 字符 处 理 


所 以 ， 如 果 大 家 按照 这 里 所 写 的 步骤 ， 往 寄存 器 里 
代入 各 种 值 ， 再 调用 INT 0x10， 就 能 顺利 地 在 屏幕 
上 显示 一 个 字符 出 来 3。 


“因为 这 里 的 BL 中 放 入 了 彩色 字符 码 ， 所 以 一 旦 
这 里 变更 ， 显 示 的 字符 的 颜色 也 应 该 变化 。 但 笔 
者 试 了 试 ， 闫 色 并 没有 变 。 尚 不 清楚 为 什么 只 能 
显示 白色 ， 只 能 推测 现在 这 个 画面 模式 下 ， 不 能 
简单 地 指定 字符 闫 色 。 


最 后 一 个 新 出 现 的 指令 是 HLT。 这 个 指令 很 少 用 ， 

会 让 它 在 第 2 天 的 内 容 里 融 登 台 之 相 的 ， 佑 计 全 世 

界 束 只 有 笔者 了 。 不 过 由 于 笔者 对 它 的 偏好 ， 束 让 
笔者 在 这 里 多 说 两 句 吧 ( 笑 ) 。 


HLT 是 让 CPU 停止 动作 的 指令 ， 不 过 并 不 是 彻底 地 
停止 〈 如 果 要 彻底 停止 CPU 的 动作 ， 只 能 切断 电 
VE) ， 而 是 让 CPU 进入 待机 状态 。 只 要 外 部 发 生变 
化 ， 比 如 按 下 键 各， 或 是 移动 鼠标 ，CPU 就 会 醒 过 
来 ， 继 续 执 行程 序 。 说 到 这 ， 请 大 家 再 仔细 看 看 这 
个 程序 ， 我 们 会 发 现 其 实 不 管 有 没有 HLT 指 令 ， 
JMP fin 都 是 无 限 循环 ， 不 写 HLT 指 令 也 可 以 。 所 以 
很 少 有 人 一 开始 就 同 初 学 者 介绍 HLT 指 令 ， 因 为 这 
样 只 会 让 话 变 得 很 长 。 

然而 笔者 讨厌 让 CPU 宣 无 意义 地 空转 。 如 果 没 有 


HLT 指 令 ， CPU 就 会 不 停 地 全 力 去 执行 JMP 指 令 ， 
这 会 使 CPU 的 负荷 达到 100%， 非 常 费 电 。 这 多 浪费 


就 能 让 CPU 基本 
Fey ied T 即便 是 初学 者 ， 最 好 
也 要 一 开始 就 养 成 待机 时 使 用 HLT 指 令 的 习惯 。 或 
者 说 ， 恰 恰 应 该 在 初学 阶段 ， 就 养 成 这 样 的 好 习 
惯 。 这 样 既 节 能 环保 ， 叉 节约 电费 ， 或 许 还 能 延长 
电脑 的 使 用 寿命 呢 。 


对 了 ，HLT 指 令 源 日 英文 “halt*， 意 思 是 “停止 ”。 


说 了 这 么 多 ， 终 于 把 这 个 程序 从 头 到 尾 都 讲 完 了 。 
忌 结 一 下 就 是 这 样 的 : 


用 C 语 言 改 写 后 的 helloos.nas 程 序 节 选 


= ð; 
SS = AX; 
SP = @x7c0@; 
DS = AX; 
ES = AX; 
SI = msg; 
putloop 
AL = BYTE [STI]; 
SI = SI + 1; 
if (AL == @) { goto fin; } 
AH = @x@e; 


INT 6x16; 

goto putloop; 
fin: 

HLT; 

goto fin; 


Wea SxS Fey, RIII fek HEmsg E5 ee 
据 ， 一 个 字符 一 个 字符 地 显示 出 来 ， 并 且 数 据 变 成 
0 以 后 ，HLT 指 令 束 会 让 程序 进入 无 限 循环 。“hello， 
world” 束 是 这 样 显示 出 来 的 。 


对 了 ， 我 们 还 没有 说 ORG 的 0x7c00 是 怎么 回 事 呢 。 
ORG 指 令 本 身 刚 才 已 经 讲 过 ， 束 不 再 重复 了 ， 但 这 
个 0x7c00 又 是 从 哪儿 冒 出 来 的 呢 ? 换 成 1234 是 不 是 
就 不 行 啊 ? 嗯 ， 还 真是 不 行 ， 我 们 要 是 把 它 换 成 
1234 的 话 ， 程 序 马 上 就 不 动 了 。 


大 家 所 用 的 电脑 里 配置 的 ， 大 概 都 是 64MB， 甚 至 
512MB 这 样 非常 大 的 内 存 。 那 是 不 是 这 些 内 存 我 们 
想 怎 么 用 就 能 怎么 用 呢 ? 也 不 是 这 样 的 。 比 如 说 ， 
内 存 的 0 号 地 址 ， 也 就 是 最 开始 的 部 分 ， 是 BIOS 程 
序 用 来 实现 各 种 不 同 功能 的 地 方 ， 如 果 我 们 随便 使 
用 的 话 ， 就 会 与 BIOS 发 生 冲 突 ， 结 果 不 只 是 BIOS 
会 出 错 ， 而 且 我 们 的 程序 也 肯定 会 问题 百出 。 男 

外 ， 在 内 存 的 0xf0000 号 地 址 附近 ， 还 存放 着 BIOS 


程序 本 身 ， 那 里 我 们 也 不 能 使 用 。 


内 存 里 还 有 其 他 不 少 地 方 也 是 不 能 用 的 ， 所 以 我 们 
作为 操作 系统 开发 者 ， 不 得 不 注意 这 一 点 。 在 我 们 
作为 一 般 用 户 使 用 Windows 或 Linux 时 ， 不 用 想 这 些 
肪 烦 事 ， 因 为 操作 系统 已 经 都 处 理 好 了 ， 而 现在 ， 
我 们 成 了 操作 系统 开发 者 ， 束 需要 为 用 户 来 考虑 这 
些 问 题 了 。 只 用 语言 文字 来 讲解 内 存 哪 个 部 分 不 能 
用 的 话 ， 不 够 清楚 直观 ， 所 以 还 是 要 男 张 地 图 。 正 
好 这 里 就 有 一 张 内 存 分 布 图 ， 让 我 们 一 起 来 看 看 。 


http://community.osdev.info/?(AT)memorymap 


虽然 称 之 为 地 图 ， 可 实际 上 根本 惑 不 像 地 图 ， 网 页 
的 作者 也 大 会 偷工减料 了 吧 。 话 说 这 个 网 页 的 作 

a, ASHE BAAN, DERE. KAR BE 
细 看 的 话 ， 会 发 现 其 中 很 多 东西 部 是 不 知 所 云 〈“ 痢 
是 笔 者 不 好 ， 真 是 对 不 起 ) ， 不 过 在 “软件 用 途 分 
II 


0x00007c00-0xX00007dff : 启动 区 内 容 的 装载 
地 址 


程序 中 ORG 指 令 的 值 就 是 这 个 数字 。 而 且 正 是 因为 
我 们 使 用 的 是 这 个 同样 的 数字 ， 所 以 程序 才能 正常 


运行 。 


看 到 这 ， 大 家 可 能 会 问 :“ 为 什么 是 0x7c00 呢 ? 
0x7000 不 是 更 简单 、 好 记 吗 ? ”其 实 笔者 也 是 这 人 么 
想 的 ， 不 过 没 办 法 ， 当 初 规定 的 就 是 0x7c00。 做 出 
这 个 规定 的 应 该 是 IBM 的 大 叔 们 ， 不 过 估计 他 们 现 
在 都 成 爷爷 了 。 


一 旦 有 了 规定 ， 人 们 就 会 以 此 为 前 提 开 发 各 种 操作 
系统 ， 因 此 以 后 就 算 有 人 说 “现在 地 址 变 成 0x7000- 
0x71ff 了 ， 请 大 家 跟着 改 一 下 ， 也 只 是 空 口 号 ,不 
可 能 实现 。 因 为 硬 要 这 么 做 的 话 ， 那 现 有 的 操作 系 
统 束 必 须 全 部 加 以 改造 才能 在 这 人 台新 电脑 上 运行 ， 

这 样 的 电脑 兼容 性 不 好 ， 根 本 束 卖 不 出 去 。 


今后 也 许 大 家 还 会 提出 很 多 疑问 :“ 为 什么 是 这 样 
呢 ? ”这 些 都 是 当年 IBM 和 英特尔 的 大 叔 们 规定 
的 。 如 末 非 要 深 完 的 话 ， 我 们 倒是 也 能 找到 一 些 当 
时 时 代 背 景 下 的 原因 ， 不 过 要 把 这 些 都 说 清楚 的 
th, A ORE IE ft, Are Pak ee ll 
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3 ” 先 制 作 局 动 区 


考虑 到 以 后 的 开 友 ， 我 们 不 要 一 下 子 残 用 nask 来 做 
整个 磁盘 映像 ， 而 是 和 完 只 用 它 来 制作 512 字 市 的 局 
动 区 ， 剩 下 的 部 分 我 们 用 磁盘 映像 管理 工具 来 做 ， 
这 样 以 后 用 起 来 就 方便 了 。 


如 此 一 来 ， 我 们 就 有 了 projects/02_day 的 helloos4 这 
"> Cs 


首先 我 们 把 heloos.nas 的 后 半 部 分 截 挥 了 ， 这 是 因为 
局 动 区 只 需要 最 初 的 512 字 市 。 现 在 这 个 程序 就 仅 
仅 是 用 来 制作 局 动 区 的 ， 所 以 我 们 把 文件 名 也 改 为 


ipl.nas 。 


然后 我 们 来 改造 asm.bat， 将 输出 的 文件 名 改 成 
ipl.bin。 另 外 ， 也 顺便 输出 列表 文件 ip].lst。 这 是 一 
个 文本 文件 ， 可 以 用 来 简单 地 确认 每 个 指令 是 怎样 
翻译 成 机 器 语言 的 。 到 目前 为 止 我 们 都 没有 输出 过 
这 个 文件 ， 那 是 因为 1440KB 的 列表 文件 实在 太 大 
了 ， 而 这 次 只 需要 输出 512 字 节 ， 所 以 没什么 问 
题 。 


另外 我 们 还 增加 了 一 个 makeimg.bat。 它 是 以 ipl.bin 
为 基础 ， 制 作 磁 盘 映 像 文 件 helloos.img 的 批 处 理 文 


件 。 它 利用 笔者 自己 开发 的 磁盘 映像 泄 理工 具 
edimg.exe， 先 谈 入 一 个 空白 的 磁盘 映像 文件 ， 然 后 
在 开头 写 入 ipl.bin 的 内 容 ， 最 后 将 结果 输出 为 名 为 
helloos.img 的 磁盘 映像 文件 。 详 情 请 参考 
makeimg.bat 的 内 容 。 


这 样 ， 从 纺 诺 到 测试 的 步骤 就 变 得 非常 简单 了 ， 我 


们 只 要 双击 !cons， 然 后 在 命令 行 窗 口中 按 顺序 输入 
asm > makeimg run 这 3 个 命令 就 完成 了 。 


4 Makefile |] 


到 helloos4 为 止 ， 做 出 来 的 程序 与 笔者 最 初 开 发 时 
所 写 的 源 程序 是 完全 一 样 的 。 在 开发 的 过 程 中 ， 笔 
者 使 用 了 一 个 名 为 Makefile 的 东西 ， 在 这 里 给 大 家 


介绍 一 下 。 


Makefile 就 像 是 一 个 非常 聪明 的 批 处 理 文 件 。 


Makefile 的 写法 相当 简单 。 背 先生 成 一 个 不 之 扩展 
名 的 文件 Makefile， 然 后 再 用 文本 编辑 占 写 入 以 下 
内 容 。 


# 文 件 生成 规则 


ipl.bin : ipl.nas Makefile 
../z tools/nask.exe ipl.nas ipl.bin ipl.lst 


helloos.img : ipl.bin Makefile 
../z_tools/edimg.exe 
imgin:../z_tools/fdimg@at.tek \ 
wbinimg src:ipl.bin len:512 from:0 to:@ 
imgout:helloos.img 


# 写 表示 注释 。 下 一 行 “pl.bin : ipl.nas Makefile” 的 意 
思 是 ， 如 果 想 要 制作 文件 ipl.bin， 束 先 检查 一 下 


iplnas 和 Makefile 这 两 个 文件 是 否 都 准备 好 了 。 如 末 
这 两 个 文件 都 有 了 ，Make 工 具 束 会 目 动 执行 
Makefile 的 下 一 行 。 


至 于 helloos.img，Makefile 的 写法 也 是 完全 一 样 
的 。 其 中 的 “是 续 行 人 符号， 表示 这 一 行 太 长 写 不 
下 ， 跳 转 到 下 一 行 继续 写 。 


我 们 需要 调用 make.exe 来 让 这 个 Makefile 发 挥 作 
用 。 为 了 能 更 方便 地 从 命令 行 窗 口 运行 这 个 工具 ， 
我 们 来 做 个 make.bat。make.bat 就 放 在 tolset 的 
z_new_w 文 件 夹 中 ， 可 以 直接 把 它 复 制 过 来 用 。 


做 好 以 上 这 些 准 备 后 ， 用 !cons 打 开 一 个 命令 行 窗口 

(console)， 然 后 输入 “make -r ipl.bin”。 这 样 
make.exe 束 会 启动 了 ， 它 首先 读 取 Makefile 交 件 ， 
寻找 制作 ipl.bin 的 方法 。 因 为 ipl.bin 的 做 法 就 写 在 
Makefile 里 ，make.exe 找 到 了 这 一 行 就 去 执行 其 中 
的 命令 ， 顺 利生 成 ipl.bin。 然 后 我 们 再 输入 “make -r 
helloos.img” 看 看 ， 果 然 它 还 是 会 启动 make.exe， 并 
按照 Makefile 指 定 的 方法 来 执行 。 


到 此 为 止 好 像 也 没什么 特别 的 ， 我 们 再 答 试 一 下 把 
helloos.img 和 和 ipl.bin 都 删除 后 ， 再 输入 “make -r 


helloos.img” 命 令 。make 首先 很 听话 地 试图 生成 
helloos.img， 但 它 会 发 现 所 需要 的 ipl.bin 还 不 存在 。 
于 是 就 去 Makefile 里 寻找 ipl.bin 的 生成 方法 ， 找 到 后 
先生 成 ipl.bin， 在 确认 ipl.bin 顺 利生 成 以 后 ， 就 回来 
继续 生成 helloos.img。 它 很 聪明 吧 。 


下 面 ， 我 们 不 删除 文件 ， 再 输入 命令 “make -r 
helloos.img” 执 行 一 次 的 话 ， 吏 会 发 现 ， 仅 仅 输出 一 
行 “helloos.img' 已 是 最 新 版 本 (‘helloos.img’is up to 
date) ”的 信息 ， 什 么 命令 都 不 执行 。 也 残 是 说 ， 
make 知 道 helloos.img 已 经 存在 ， 没 必要 特意 重新 再 
做 一 次 了 。 它 越 来 越 陪 明了 吧 。 


让 我 们 再 考验 考验 make.exe。 我 们 来 编辑 ipl.nas 中 
的 输出 信息 ， 把 它 改 成 “How are you?” 并 保存 起 

来 。 而 ipl.bin 和 helloos.img 保 持 刚 才 的 样子 不 删 
除 ， 在 这 种 情况 下 我 们 再 来 执行 一 次 “make-r 
helloos.img”。 本 以 为 这 次 它 还 会 说 没 必要 再 生成 一 
次 呢 ， 结 果 我 们 发 现 ，make.exe 义 从 ipl.bin 开 始 重 
新 生成 输出 文件 。 这 也 融 是 说 ，make.exe 不 仅仅 判 
浙 输 入 文件 是 否 存 在 ， 还 会 判断 文件 的 更 新 日 期 ， 
2 真是 太 
万 害 I 


现在 大 家 知道 了 Makefile 比 批 处 理 文件 高 明 ， 但 每 
次 都 输入 “make -helloos.img” 的 话 也 很 麻烦 ， 其 实 
有 个 可 以 省 事 的 窗 门 。 当 然 ， 可 以 将 “make -r 
helloos.img” 这 个 命令 写成 makeimg.bat， 但 这 么 做 


还 是 离 不 开 批 处 理 文件 ， 所 以 我 们 换个 别 的 方法 ， 
在 Makefile 里 增加 如 下 内 容 。 


../z_tools/make.exe -r helloos.img 


修改 之 后 ， 我 们 只 要 输入 “make img”, Wher TI 
与 “make -Thelloos.imng” 一 样 的 效果 。 这 样 就 省 事 多 
了 。makeimg.bat 已 经 没 用 了 ， 把 它 删 摊 。 另 外 顺便 
把 下 面 内 容 也 一 并 加 进去 吧 。 


../z_tools/make.exe -r ipl.bin 


../z_tools/make.exe img 


copy helloos.img ..\z_tools\qemu\fdimage®@. bin 
../z_tools/make.exe -C ../z_tools/qemu 


install : 
../z_tools/make.exe img 
../z_tools/imgtol.com w a: helloos.img 


这 样 一 来 ,，“run.bat”、“install.bat” 也 都 用 不 着 了 。 
不 但 用 不 看 ， 现 在 还 更 方便 了 呢 。 比 如 只 要 输 


入 “make run”， 它 会 首先 执行 “make imng”， 然 后 再 
FADER AR o 


到 目前 为 止 ， 我 们 为 了 节约 时 间 ， 避 免 每 次 都 从 汇 
编 语言 的 编译 开始 重新 生成 已 有 的 输出 文件 ， 特 总 
把 批 处 理 文 件 分 成 了 几 个 小 块 。 而 现在 有 了 
Makefile， 它 会 自动 跳 过 没有 必要 的 命令 ， 这 样 不 
管 任何 时 候 ， 我 们 都 可 以 放心 地 去 执行 “make 
img” 了 。 而 且 就 算 直 接 “make run” 也 可 以 顺利 运 
行 。“make install*” 也 是 一 样 ， 只 要 把 磁盘 装 到 驱动 
器 里 ， 这 个 命令 束 会 目 动 作出 判断 ， 如 果 已 经 有 了 
最 新 的 helloos.img 就 直接 安 狼 ,没有 的 话 束 先 目 动 
生成 新 的 helloos.img， 然 后 安装 。 


笔者 把 以 上 这 些 都 总 结 在 projects/02_day 下 的 
helloos5 文 件 夹 里 了 ， 顺 便 又 另外 添 加 了 几 个 命 

令 。 一 个 命令 是 “make clean”， 它 可 以 删除 掉 最 终 
成 果 〈 这 里 是 helloos.imng) 以 外 的 所 有 中 间 生 成 文 
F, ERRER; 还 有 一 个 命令 是 “make 
src_only”， 它 可 以 把 源 程 序 以 外 的 文件 全 都 删除 干 
净 。 另 外 ， 笔 者 还 增加 了 make 命 令 的 默认 动作 ， 当 
执行 不 市 参数 的 make 时 ， 束 相当 于 执行 “make 
img” 人 命令 〈 默 认 动 作 写 在 Makefile 的 最 前 头 ) 。 


功能 增加 了 这 么 多 ， 而 文件 数量 却 减少 到 5 个 ， 看 
上 去 清 丈 多 了 吧 。 像 源 文件 这 种 真 的 必 不 可 少 的 文 
件 ， 多 几 个 倒 也 没什么 不 好 ， 但 像 批 处 理 文件 这 种 
堆 在 那里 乱糟糟 的 残 会 让 人 
IRA RT HR o 


a 我 们 以 后 的 开发 工作 就 会 更 加 轻松 
愉快 了 。 


啊 ， 有 一 点 态 了 告诉 大 家 ， 这 个 make.exe 是 GNU 项 
目 组 的 人 开发 的 ， 公 开 供 大 家 免费 使 用 的 一 球 软 
件 。gcc 的 作者 也 是 这 个 GNU 项 目 组 。 真 是 太 感 谢 
T! 


按照 现在 的 速度 真 的 能 在 一 个 月 后 开发 出 一 个 操作 
ASS? 笔者 也 有 点 担心 。 不 过 应 该 没 问 题 ， 虽 说 
现在 的 进展 比 当 初 的 计划 稍 慢 一 些 ， 不 过 刚 开 始 的 
时 候 说 明 肯 定 会 多 一 些 ， 等 到 后 面 用 C 语 言 来 开 及 
HIS (ee, GRRE RABE So HA, MWER... EA 
满怀 希望 地 自 言 自 语 中 《和 兰 笑 ) 。 那 么 我 们 明天 
见 ! 


COLUMN-1 数据 也 能 “执行 2 四 ? 机 器 语言 


全 
能 < 显示 ” 吗 ? 


在 helloos5 中 ， 如 果 我 们 把 最 开始 的 JMP entry 5 
成 JMP msg, FJES BERIE? .…… 


首先 ， 可 不 可 以 这 么 写 昵 ? 完全 可 以 ! nask 不 会 
报错 ， 别 的 汇编 语言 也 不 会 报错 。 在 汇编 语言 
里 ， 标 号 归根 到 后 不 过 就 是 一 个 表示 内 存 地 址 的 
数字 而 已 ， 宇 于 JMP 跳 转 的 地 方 是 机 器 语言 还 是 
字符 编码 ， 汇 编 语 言 中 不 考虑 这 些 问题 。 


那么 如 果 执 行 这 个 程序 ，CPU 会 怎么 样 呢 ? 首先 
最 初 的 命令 是 0A 0A， 意 思 是 “OR CL,[BP+ST]”， 
也 就 是 把 CL 寄存 器 的 内 容 和 BP+SI 内 存 地 址 的 内 
容 做 逻辑 或 COR) 运算 (过 几 天 会 出 现 这 个 命 
令 ) ， 结 果 放 入 CL 寄存 器 。 接 着 的 命令 是 68 65 
6C， 也 就 是 PUSH 0x6c65 的 意思 (过 几 天 这 个 命 
令 也 会 出 现 ) ， 它 将 0x6c65 储 存 进 栈 。...... 就 这 
样 ， CPU 执行 的 命令 很 混乱 ， 但 CPU 只 能 按照 电 
信号 的 指令 来 进行 处 理 ， 所 以 即使 不 明 其 意 ， 也 
会 一 板 一 眼 地 照 单 执行 。 


结果 ， 要 么 画面 上 出 现 怪异 的 了 字符， 要 么 软盘 或 
便 检 上 的 数据 突然 被 履 盖 。 昌 然 电 脑 并 没有 坏 挥 
(因为 CPU 还 在 全 速 执行 指令 ) ， 但 看 上 去 却 像 
十 了 一 样 。 所 以 大 家 一 定 不 要 和 演 试 这 样 做 。 


DIAEA, Fa MAS BORE, PaE 


糊涂 之 下 就 将 本 应 写 entry 的 地 方 ， 错 写成 了 

msg， 这 也 不 是 不 可 能 发 生 。 要 是 因为 这 而 丢失 
了 重要 文件 ， 可 残损 失 惨 重 了 ， 所 以 CPU 具有 预 
防 这 种 事故 的 功能 。 但 是 这 种 功能 只 有 在 操作 系 
统 做 了 各 种 相应 设置 后 才 会 起 作用 ( 几 天 后 也 会 
讲 到 ) 。 所 以 ， 在 开发 操作 系统 的 阶段 ， 我 们 还 
不 能 指望 这 种 保护 功能 。 从 某 种 程度 上 来 说 ， 我 
1 吊 胆 地 做 开 


那么 反 过 来 会 怎样 呢 ? 也 就 是 假设 要 把 机 器 语言 
当 作 文字 来 显示 ， 会 出 现 什么 结果 呢 ? 程序 里 有 
一 句 是 “MOYV SLmsg”， 我 们 把 它 写成 <MOV 
SLentry” 看 看 。 首 先 画 面 上 会 显示 一 个 编 但 是 B8 
的 字符 〈 估 计 是 个 表情 符号 或 者 别 的 什么 符 

号 ) ， 下 一 个 字符 页 巧 是 00， 所 以 显示 束 到 此 结 
束 了 。 这 种 情况 不 会 出 现 恶 劣 的 后 果 ， 大 家 试 一 
试 也 无 妨 。 


通过 以 上 的 尝试 ， 最 终 证 明 ， 不 管 是 CPU 还 是 内 
存 ， 它 们 根本 融 不 关心 所 处 理 的 电信 号 到 底 代 表 
什么 意思 。 这 系 一 来 ， 说 不 定 我 们 拿 数 码 相 机 提 
一 幅 风 景 照 ， 把 它 作 为 磁盘 映像 文件 保存 到 磁盘 
里 ， 就 能 成 为 世界 上 最 优秀 的 操作 系统 ! 这 看 似 
元 恋 的 情况 也 是 有 可 能 及 生 的 。 但 从 钟 识 来 看 ， 
这 样 做 成 的 东西 肯定 会 故障 百出 。 有 反之， 我 们 把 


做 出 的 可 执行 文件 作为 一 幅 男 来 看 ， 也 没准 能 成 
为 世界 上 最 局 水 准 的 艺术 品 。 不 过 可 以 想象 的 
是， 要 么 文件 格式 有 错 ， 要 么 显示 出 来 的 图 是 乱 
E/I 


第 3 天 进入 32 位 模式 并 导入 C 语 言 


。 制 作 真 正 的 IPL 

。 试 错 

。 读 到 18 扇 区 

。 读 入 10 个 柱 面 

© BH KREMER 

。 从 启动 区 执行 操作 系统 

。 确 认 操 作 系 统 的 执行 情况 
。32 位 模式 前 期 准备 

。 开 始 导 入 C 语 言 

。 实 现 HLT Charib00j ) 


1 制作 真正 的 IPL 


到 昨天 为 止 我 们 讲 到 的 启动 区 ， 虽 然 也 称 为 

IPL (Initial Program Loader, JASJE IREA) > 
但 它 实 质 上 并 没有 装载 任何 程序 。 而 从 今天 起 ， 我 
IERA ERRIENT S -o 


把 我 们 的 操作 系统 叫 作 hello-os 很 不 给 劲 ， 干 脆 改 个 
名 字 吧 。 我 们 就 叫 它 “ 纸 娃 娃 操 作 系 统 ”?。 所 谓 纸 娃 
娃 ， 意 思 就 是 说 那 是 用 纸 糊 起 来 的 ， 虚 有 其 表 ， 不 
是 真 娃 娃 ， 就 像 拍 电影 时 用 的 岩石 等 道具 ， 其 实 痢 
是 中 间 空 空 的 冒牌 货 。 也 就 是 说 我 们 现在 要 开发 的 
操作 系统 ， 只 是 看 上 去 像 操作 系统 ， 而 其 实 是 个 没 
有 内 容 的 纸 娃 娃 ， 所 以 大 家 不 用 想 得 太 困难 ， 轻 轻 
松 松 来 做 就 好 了 。 


虽然 今后 我 们 要 一 直 称 它 为 “ 纸 娃 娃 操 作 系 统 ”， 而 
且 在 相当 长 的 一 段 时 间 里 也 只 是 把 它 当 作 一 种 演示 
程序 ， 但 到 最 后 我 们 肯定 能 开 友 出 一 个 像 模 像 样 的 
操作 系统 ， 这 一 点 请 大 家 放心 。 


稍微 扯 远 点 ， 其 实 仔 细 想 一 想 ， 这 种 虚 有 其 表 
的 “ 纸 娃娃 ”又 何止 是 操作 系统 呢 。 束 说 CPU 吧 ， 
其 实 它 根本 束 不 懂 什 么 “ 数 ” 的 概念 ， 只 是 我 们 设 
计 了 一 个 电路 ， 只 要 同时 传 给 它 电信 号 0011 和 


0110， 它 就 能 输出 结果 为 1001 的 电信 号 ， 而 这 种 
电路 我 们 就 称 之 为 加 法 电路 。 只 有 人 才 会 把 这 个 
结果 解读 为 3+6=9，CPU 只 是 处 理 这 些 电信 和 号 。 
换 句 话说 ， 虽 然 CPU 根 本 束 不 异 什 么 数字 ， 但 却 
能 给 出 正确 的 计算 结果 ， 这 就 是 笔者 所 谓 的 “ 纸 娃 
Wes 


Fe ACL He Ree HAMZA, EURE 
机 下 象棋 的 时 候 ， 可 能 会 沉 得 计算 机 水 平 很 高 ， 

但 实际 上 计算 机 对 象棋 规则 一 罕 不 通 ， 仅 仅 是 在 
执行 一 个 程序 而 已 。 就 算计 算 机 走出 了 一 者 妙 

棋 ， 也 根本 不 是 因为 它 下手 坚 不 留情 啊 ， 或 者 聪 
明 啊 ， 或 者 求 胜 心切 什么 的 ， 这 些 都 是 表象 ， 其 
实 它 只 是 按部就班 地 执行 程序 而 已 。 也 就 古 说 它 
本 身 没有 内 涵 ， 只 有 一 个 距 人 的 外 壳 ， 所 以 才 

叫 “ 纸 娃娃 ”。“ 纸 娃娃 ” 太 厉 害 了 ! ...... 操作 系统 
就 算是 虚 有 其 表 、 虚 张 声 势 叉 怎样 ? 没什么 不 好 
的 ， 这 样 束 可 以 了 ! 


那么 我 们 先 从 简单 的 程序 开始 吧 。 因 为 磁盘 最 初 的 
512 字 闻 是 局 动 区 ， 所 以 要 装载 下 一 个 512 字 市 的 内 
容 。 我 们 来 修改 一 下 程序 。 改 好 的 程序 就 古 
projects/03_day 下 的 harib00al， 像 以 前 一 样 ， 我 们 把 
它 复制 到 tolset 里 来 。 


1 harib 是 日 语 中 haribote( 纸 娃娃 ) 的 前 面 几 个 字 
: 译 者 注 


这 次 添加 的 内 容 大 致 如 下 。 
本 次 添加 的 部 分 


AX, 0x0820 

ES, AX 

CH,6 ; 柱 面 6 
DH ,6 ; ko 
CL,2 ; X2 


AH, @x@2 ; AH=6x62 : 读 盘 
AL,1 ; 1 个 而 区 

BX,6 

DL ,6x66 ; Aka as 

0x13 ; 调用 磁盘 BIOS 


error 


新 出 现 的 指令 只 有 JC。 真 好 ， 讲 起 来 也 轻松 了 。 所 
谓 JC， 是 “jump if carry” 的 缩写 ， 意思 十 如 末 进 位 标 
m= (carry flag)〉 是 1 的 话 ， 束 跳 转 。 这 里 突然 冒 出 
来 “进位 标志 ”这 么 个 新 词 ， 不 过 大 家 不 用 担心 ， 很 
快 就 会 明日 的 。 


至 于 “INT 0x13” 这 个 指令 ， 我 们 虽然 知道 这 是 要 调 
用 BIOS 的 0x13 号 函 数 但 还 不 明白 它 到 底 是 干什么 


用 的 ， 那 就 来 查 一 下 吧 。 当 然 还 是 来 看 下 面 这 个 
(AT) BIOS 网 页 ， 


http://community.osdev.info/?(AT)BIOS 
我 们 可 以 找到 如 下 的 内 容 : 


。 Wei. 5, XR (verify) ， 以 及 寻 道 
(seek) 


o AH=0x02; GZA) 


o AH=0x03; (5%) 


O 


AH=0x04:( 校 验 ) 
AH=0x0c; (iH) 


AL= 处 理 对 象 的 扇 区 数 ; (只 能 同时 处 理 连 续 
的 肩 区 ) 


CH= 柱 面 写 &Oxff; 


O 


O 


O 


O 


CL= Xs (0-50) | GEME &0x300) * * 
2; 


o DH= h 5; 


o DL= 驱 动 器 号 ; 

o ES:BX= 缓 冲 地 址 ; ( 校 验 及 寻 道 时 不 使 用 ) 
o 返回 值 : 

o FLACS.CF==0: 没有 错误 ，AH==0 


o FLAGS.CF==1: 有 和 错误， 错误 号 人 码 存 入 AH 
内 (与 重 置 (reset) 功能 一 样 ) 


我 们 这 次 用 的 是 AH=0x02， 哦 ， 原 来 是 “ 读 盘 ”的 意 
H O 


返回 值 那 一 栏 里 的 FLAGS.CEF 又 是 什么 意思 有 呢 ? 这 
就 是 我 们 刚才 讲 到 的 进位 标志 。 也 就 是 说 ， 调 用 这 
个 函数 之 后 ， 如 果 没 有 错 ， 进 位 标志 就 是 0; 如 果 
有 和 错 ， 进 位 标志 就 是 1。 这 样 我 们 就 能 明白 刚才 为 
什么 要 用 JC 指 令 了 。 


进位 标志 是 一 个 只 能 存储 1 位 信息 的 寄存 器 ， 除 此 
之 外 ，CPU 还 有 其 他 几 个 只 有 1 位 的 寄存器。 像 这 
Pid Ar ay AF as ECM I RL APD I 标志 在 英文 中 为 
flag， 是 旗帜 的 意思 。 标 志 之 所 以 叫 flag 是 因为 它 的 
J 


押 谓 进位 标志 ， 本 来 是 用 来 表示 有 没有 进位 
Ccarry) 的 ， 但 在 CPU 的 标志 中 ， 它 是 最 简单 多 用 
的 ， 所 以 在 其 他 地 方 也 经 常用 到 。 这 次 束 是 用 来 报 
TT BIOS RK OH H z BA H o 


其 他 几 个 寄存 器 我 们 也 来 依次 看 一 下 吧 。CH、 
CL. DH, DLA AEE S. KS. Beek Ss. SR 
动 器 号 ， 一 定 不 要 摘 错 。 在 上 面 的 程序 中 ， 柱 面 号 
720, HEALS HO, HKEE, WS EO. 


FER BS ARTE RS) as IN ER, Fn SN aS ORT 
定 从 哪个 驱动 器 的 软盘 上 读 取 数 据 。 现 在 的 电脑 ， 
基本 祁 只 有 1 个 软盘 驱动 器 ， 而 以 前 一 般 都 是 2 个 。 
既然 现在 只 有 一 个 ， 那 不 用 多 想 ， 指 定 0 号 融 行 
To 


KÉ F MAER a EB RTE 
看 从 那个 软盘 的 什么 地 方 来 读 取 数 据 。 


柱 面 中 有 局 区 读 取 用 


磁头 0 (正面 用 ) 。 yje aaa 
0 号 一 79 号 ) 
AEEA ORRE 
(] 号 一 18 号 ) 


1 
a 
v 
// 
f 


读 取 用 
磁头 1 (反面 用 ) 


m6 mS 


么 办 呢 ? 


如 果 手 头 有 不 用 的 软盘 ， 
看 。 拆 开 后 可 以 看 到 ， 中 间 有 一 个 8 厘米 的 黑色 

那 是 一 层 薄 薄 的 磁性 胶 厂 。 从 外 同 内 ， a 
圈 圆 环 状 的 区 域 ， 分 别称 为 柱 面 0， 柱 面 1，.…… , 
柱 面 79。 一 共有 80 个 柱 面 。 这 并 不 是 说 工厂 就 是 这 
样 一 图 一 圈 地 生产 软盘 的 ， 只 是 我 们 将 它 作 为 一 个 
数据 存储 媒体 ， 是 这 样 组 织 它 的 数据 存储 方式 的 。 


柱 面 在 英文 中 是 cylinder， 原 意 是 圆 简 。 磁 盘 的 柱 
面 ， 尽 管 高 度 非常 低 ， 但 我 们 可 以 把 它 看 成 是 一 个 
套 一 个 的 同心 圆 篇 ， 它 正 是 因此 得 名 的 。 


下 面 讲 一 下 和 磁头。 磁头 是 个 针 状 的 磁性 设备 ， 既 可 
以 从 软盘 正面 接触 磁盘 ， 也 可 以 从 软盘 背面 接触 磁 
盘 。 与 光盘 不 同 ， 软 盘 倒 盘 是 两 面 都 能 记录 数据 
的 。 因 此 我 们 有 正面 和 反面 两 个 磁头 ， 分 别 是 磁头 
0 号 和 磁头 1 号 。 


KERIA FAK. fare SHAM Ka, EE 
熏 的 这 个 圆 环 上 上， 还 能 记录 很 多 位 信息 ， 按 照 整个 
圆 环 为 单位 读 写 的 话 ， 实 在 有 点 多 ， 所 以 我 们 又 把 
这 个 圆 环 均等 地 分 成 了 几 份 。 软 盘 分 为 18 份 ， 每 一 
份 称 为 一 个 局 区 。 一 个 圆 环 有 18 个 届 区 ， 分 别称 为 
而 区 1、 届 区 2、.…… W X18. by X ERC HE 
sector, MER. IIe. 


综 上 所 述 ，1 张 软盘 有 80 个 柱 面 ，2 个 磁头 ，18 个 局 
区 ， 且 一 个 扇 区 有 512 字 节 。 所 以 ， 一 张 软盘 的 容 


E HE 
EJE: 


80x2x18x512 = 1 474 560 Byte = 1 440KB 


含有 IPL 的 启动 区 ， 位 于 C0-H0-S1( 柱 面 0， 磁 头 
0， 启 区 1 的 缩写 ) ， 下 一 个 扇 区 是 C0-H0-S2。 这 次 


RA TAE BEARS aC LP HTL RE TK PS id Xo 
COLI 


Fl PA KARA AB A Ee eK hE IE. E 
个 内 存 地 址 ， 表 明 我 们 要 把 从 软盘 上 读 出 的 数据 装 
载 到 内 存 的 哪个 位 置 。 一 般 说 来 ， 如 果 能 用 一 个 寄 
存 器 来 表示 内 存 地 址 的 话 ， 当 然 会 很 方便 ， 但 一 个 
BX 只 能 表示 0 一 0xffff 的 值 ， 也 束 是 只 有 0 一 65535， 
最 大 才 64K。 大 家 的 电脑 起 码 也 都 有 64M 内 存 ， 或 
者 更 多 ， 只 用 一 个 寄存 器 来 表示 内 存 地 址 的 话 ， 束 
只 能 用 64K 的 内 存 ， 这 太 可 惜 了 。 


于 是 为 了 解决 这 个 问题 ， 就 增加 了 一 个 叫 EBX 的 寄 
存 右 ， 这 样 束 能 处 理 4G 内 存 了。 这 是 CPU 能 处 理 的 
最 大 内 存量 ， 没 有 任何 问题 。 但 EBX 的 导入 是 很 久 
以 后 的 事情 ， 在 设计 BIOS 的 时 代 ，CPU 甚 至 还 没有 
32 位 寄存 妖 ， 所 以 当时 只 好 设计 了 一 个 起 辅助 作用 
的 段 寄存 器 (segment register) 。 在 指定 内 存 地 址 
的 时 候 ， 可 以 使 用 这 个 段 寄存 器 。 


我 们 使 用 段 寄 存 器 时 ， 以 ES:BX 这 种 方式 来 表示 地 
址 ， 写 成 “MOYV AL,[ES:BX]”， 它 代表 ESx16+BX 的 
内 存 地 址 。 我 们 可 以 把 它 理解 成 先 用 ES 寄存 器 指定 
一 个 大 致 的 地 址 ， 然 后 再 用 BX 来 指定 其 中 一 个 县 

体 地 址 。 


一 一 一 


这 样 如 果 在 ES 里 代入 0xffff， 在 BX 里 也 代入 Oxffff， 

就 是 1114 095 字 节 ， 也 就 是 说 可 以 指定 1M 以 内 的 

内 存 地 址 了 。 虽 然 这 也 还 是 远 远 不 到 64M， 但 当时 
殉 特 尔 公 司 的 大 叔 们 ， 好 像 沉 得 这 惑 足够 卫 。 在 最 
初 设 计 BIOS 的 时 代 ， 这 种 配置 已 经 很 能 满足 当时 的 
需要 了 ， 所 以 我 们 现在 也 还 是 要 遵从 这 一 规则 。 
此 ， 大 家 就 先 妨 而 一 下 这 1MB 内 存 的 限制 吧 。 


这 次 ， 我 们 指定 了 ES=0x0820，BX=0， 所 以 软盘 的 
数据 将 被 装载 到 内 存 中 0x8200 到 0x83ff 的 地 方 。 可 
能 有 人 会 想 ， 怎 么 也 不 弄 个 整 点 的 数 ， 比 如 0x8000 
什么 的 ， 那 多 好 。 但 0x8000 一 0x81ff 这 512 字 节 是 留 
给 启动 区 的 ， 要 将 启动 区 的 内 容 读 到 那里 ， 所 以 就 
这 样 吧 。 


那 为 什么 使 用 0x8000 以 后 的 内 存 呢 ?这 倒 也 没什么 
特别 的 理由 ， 只 是 因为 从 内 存 分 布 图 上 看 ， 这 一 块 
领域 没 人 使 用 ， 于 是 笔者 就 决定 将 我 们 的 “ 纸 娃 娃 
操作 系统 ”装载 到 这 一 区 域 。 0x7c00 一 0x7dff 用 于 
启动 区 ，0x7e00 以 后 直到 0x9fbff 为 止 的 区 域 都 没有 
特别 的 用 途 ， 操 作 系 统 可 以 随便 使 用 。 


到 目前 为 止 我 们 开 友 的 程序 完全 没有 考虑 段 寄 存 
a BEKE, PERII E ANTIKT A RhE, 


都 必须 同时 指定 段 寄 存 器 ， 这 是 规定 。 一 般 如 果 省 
略 的 话 就 会 把 <*DS:” 作 为 默认 的 段 寄 存 器 。 


以 前 我 们 用 的 “MOYV CX,[1234]”， 其 实 是 “MOV 
CX,[DS:1234]* 的 意思 。“MOYV AL [SI”, that 

是 “MOYV AL,[DS:SU” 的 意思 。 在 汇编 语言 中 ， 如 果 
每 回 都 这 样 写 束 太 麻烦 了 ， 所 以 可 以 省 略 默 认 的 段 
寄存 器 DS。 


因为 有 这 样 的 规则 ， 所 以 DS 必须 预先 指定 为 0， 否 
则 地 址 的 值 就 要 加 上 这 个 数 的 16 倍 ， 束 会 读 写 到 其 


ision: 1.110 $ $Date: 2004/05/31 13:11:27 $ 
_ATAPI-4 CD-Rom/DVD-Rom 


非 第 成 功 
好 ， 我 们 来 执行 这 个 程序 看 看 吧 。 如 来 程序 有 什么 


音 ， 它 就 会 显示 错误 信息 。 但 估计 不 会 出 什么 问题 


吧 。 没 错 的 话 ， 它 就 什么 都 不 做 〈 笑 ) 。 所 以 ， 如 
果 屏 幕 上 不 显示 任何 错误 信息 的 话 ， 我 们 就 成 功 
ie 

哎呀 ， 有 件 事 差 点 忘 了 ，Makefile 中 可 以 使 用 简单 
的 变量 ， 于 是 笔者 用 变量 改写 了 这 次 的 Maketfile。 
怎么 样 ， 是 不 是 比 之 前 稍微 容易 理解 一 些 ? 


2 wth 


软盘 这 东西 很 不 可 靠 ， 有 时 会 发 生 不 能 读数 据 的 状 
况 ， 这 时 候 重 新 再 读 一 次 融 行 了 。 所 以 即使 出 那么 
一 、 两 次 错 ， 也 不 要 轻易 放 径 ， 应 该 让 它 再 试 几 

次 。 当 然 如 果 让 它 一 直 重 试 下 去 的 话 ， 要 是 磁盘 真 
的 坏 了 ， 程 序 就 会 陷入 死人 循 坏 ， 所 以 我 们 决定 重 试 


5 次 ， 再 不 行 的 话 束 真正 放弃 。 改 展 后 的 程序 就 是 
projects/03_day 下 的 harib00b。 


本 次 添加 的 部 分 
3 ea 
MOV AX, 0x0820 
MOV ES,AX 
MOV CH,6 ; 柱 面 6 
MOV DH ,6 ; Lo 
MOV CL,2 ; 局 区 2 
MOV SI,0 ; 记录 失败 次 数 的 寄存 器 
retry: 
MOV AH, @x@2 ; AH=0x02 : 读 入 磁盘 
MOV AL ,1 ; 1 个 而 区 
MOV BX,6 
MOV DL ,6Xx66 ; Alka at 
INT 0x13 ; 调用 磁盘 BIOS 
JNC fin ; 没 出 错 的 话 跳 转 到 fin 
ADD SI,1 ; 往 SI 加 1 
CMP SI,5 ;比较 SI 与 5 


JAE error ; SI >= 5 时 ， 跳 转 到 error 


MOV AH,6x66 

MOV DL,@xee ; A 驱动 器 
INT 0x13 ; HAA 
JMP retry 


还 是 从 新 出 现 的 指令 开始 讲 吧 。JNC 是 男 一 个 条 件 
跳 转 指令 ， 是 “Jump if not carry” 的 缩写 。 也 就 是 说 


进位 标志 是 0 的 话 束 跳 转 。JAE 也 是 条 件 跳 转 ， 
是 “Jump if above or equal 的 缩写 ， 意 思 是 大 于 或 等 


于 时 跳 转 。 


现在 说 说 出 错时 的 处 理 。 重 新 读 盘 之 前 ， 我 们 做 了 
以 下 的 处 理 ，AH=0x00，DL=0x00，INT 0x13。 通 
过 前 面 介绍 的 (AT)〉 BIOS 的 网 页 我 们 知道 ， 这 
是 “系统 复位 ”。 它 的 功能 是 复位 软盘 状态 ， 再 读 一 
5 剩 下 的 内 容 都 很 简单 ， 只 要 读 一 恋 程 序 就 能 
hE. 


虽 ， 今 天 进展 不 错 ， 继 续 努 力 吧 。 


3 i B18 by K 


我 们 趁 看 现在 这 劲头 ， 再 往 后 多 读 几 个 届 区 吧 。 下 
面 来 看 看 projects/03_day 下 的 harib00c。 


本 次 添加 的 部 分 


; 读 磁 盘 


MOV 
MOV 
MOV 
MOV 
MOV 
readloop: 
MOV 
retry: 
MOV 
MOV 
MOV 
MOV 
INT 
JNC 
ADD 
CMP 
JAE 
MOV 
MOV 
INT 
JMP 
next: 
MOV 


AX , 0x0820 


ES, AX 
CH,@ 
DH, @ 
CL,2 


ve 


Wwe Le Le Le Le we 


ve 


ve 


ve 


柱 面 6 
Riko 
jy X2 


记录 失败 次 数 的 寄存 器 


AH=6x62 : 读 入 磁盘 
1 个 局 区 


ALKA at 

调用 磁盘 BIOS 

没 出 错时 跳 转 到 next 

往 SI 加 1 

比较 SI 与 5 

SI >= 5 时 ， 跳 转 到 error 


ALKA ait 
E BIK) ae 


把 内 存 地 址 后 移 9ox266 


ADD AX , 0x0020 


MOV ES, AX ; 因为 没有 ADD ES,6x626 指 
令 ， 所 以 这 里 稍微 绕 个 弯 

ADD CL,1 ; 往 CL 里 加 1 

CMP CL,18 ; 比较 CL 与 18 

JBE readloop ; 如 果 CL <= 18 跳 转 至 
readloop 


新 出 现 的 指令 是 JBE。 这 也 是 个 条 件 跳 转 指令 ， 


ye “jump if below or equal” 的 缩写 ， 意 思 是 小 于 等 于 


则 跳 转 。 


程序 做 的 事情 很 简单 ， 只 要 读 一 读 程 序 大 家 马上 会 
明白 。 要 读 下 一 个 局 区 ， 只 需 给 CL 加 1， 给 ES 加 上 
0x20 就 行 了 。CL 是 面 区 号 ，ES 指 定 恋 入 地 址 。 
0x20 是 十 六 进 制 下 512 除 以 16 的 结果 ， 如 果 写 

成 “ADD AX,512/16” 或 许 更 好 异 。 (笔者 在 写 的 时 
候 ， 直 接 在 头脑 中 换算 成 了 0x20， 当 然 写 成 512/16 
也 一 样 。) 可 能 有 人 会 说 : 往 BX 里 加 上 512 不 是 更 
简单 吗 ? 说 来 也 是 。 不 过 这 次 我 们 想 练习 一 下 往 ES 
里 做 加 法 的 方法 ， 所 以 这 段 程序 就 留 在 这 儿 吧 。 


可 能 有 人 会 想 ， 这 里 为 什么 要 用 循环 呢 ? 这 个 问题 
很 好 。 的 确 ， 这 里 不 是 非 要 用 循环 才 行 ， 在 调用 读 
檬 函数 的 INT 0x13 的 地 方 ， 只 要 将 AL 的 值 设 置 成 17 
束 行 了 。 这 样 ， 程 序 一 下 子 束 能 将 届 区 2~18 共 17 
个 情 区 的 数据 完整 地 读 进来 。 之 所 以 将 这 部 分 做 成 
循环 是 因为 笔者 注意 到 了 磁盘 BIOS 读 盘 了 水 数 说 明 


的 “补充 说 明 ” 部 分 。 这 个 部 分 内 容 摘 要 如 下 : 


。 指定 处 理 的 忆 区 数 ， 范 围 在 0x01~0xff〈 指 定 
0x02 以 上 的 数值 时 ， 要 特别 注意 能 够 连续 处 理 
多 个 而 区 的 条 件 。 如 果 是 ED 的 话 ， 似 乎 不 能 路 
越 多 个 磁道 ， 也 不 能 超过 64KB 的 界限 。) 


这 些 内 容 看 起 来 很 复杂 。 因 为 很 难 一 两 句 话说 清 

楚 ， 这 里 暂 不 详细 解释 ， 束 结果 而 言 ， 这 些 注意 事 
项 目前 跟 我 们 还 没有 关系 ， 就 是 写成 AL=17 结 果 也 
是 完全 一 样 的 。 但 这 样 的 方式 在 下 一 次 的 程序 中 ， 

就 会 成 为 问题 ， 因 此 为 了 能 够 人 循序渐进， 这 里 特意 
用 循环 来 一 个 司 区 一 个 司 区 地 读 檀 。 


虽然 显示 的 画面 没什么 变化 ， 但 我 们 已 经 把 磁盘 上 
C0-H0-S2 到 C0-H0-S18 的 512x17=8 704 字 节 的 内 
容 ， 装 载 到 了 内 存 的 0x8200 一 0xa3ff 处 。 


4 读 入 10 个 柱 面 


趁 热 打 铁 ， 我 们 继续 学 习 下 面 的 内 容 。C0-H0-S18 
局 区 的 下 一 局 区 ， 是 人 磁 稚 反面 的 C0-H1-S1， 这 次 也 
从 0xa400 访 入 吧 。 按 顺序 读 到 C0-H1-S18 后 ， 接 着 
读 下 一 个 柱 面 C1-H0-S1。 我 们 保持 这 个 势头 ， 一 直 
读 到 C9-H1-S18 好 了 。 现 在 我 们 融 来 看 一 看 
projects/03_day 下 的 harib00d 内 容 。 


AS URS IND BB o> 


; 读 磁 各 


MOV 
MOV 
MOV 
MOV 
MOV 
readloop: 
MOV 
retry: 
MOV 
MOV 
MOV 
MOV 
INT 
JNC 
ADD 
CMP 
JAE 


AX, 0x0820 
ES, AX 
CH,0 

DH,0 

CL,2 


SI,0 


AH, Ox02 
AL,1 
BX,@ 
DL,@x00 
OX13 
next 
SI,1 
SI,5 
error 


Wwe Wwe Wwe 


Wwe 


Wwe 


Wwe 


Wwe We Le Le Wwe we 


柱 面 6 
Riko 
py X2 


记录 失败 次 数 的 寄存 器 


AH=6x62 : 读 入 磁盘 
1 个 而 区 


ALK at 

Val H 2 BIOS 

没 出 错时 跳 转 到 next 
SI 加 1 

比较 SI 与 5 

SI >= 5 时 ， 跳 转 到 error 


MOV AH , 0x00 

MOV DL, 0x00 

INT 0x13 

JMP retry 
next: 

MOV AX,ES 

ADD AX, 0x0020 

MOV ES,AX 
令 ， 所 以 这 里 稍微 绕 个 弯 

ADD CL,1 

CMP CL,18 

JBE readloop 
readloop 

MOV CL,1 

ADD DH,1 

CMP DH, 2 

JB readloop 
readloop 

MOV DH,@ 

ADD CH,1 

CMP CH,CYLS 

JB readloop 


we 


Wwe 


Wwe Wwe Wwe Wwe 


Wwe 


Wwe 


AJK ZJ ait 
E BIK) ae 


把 内 存 地 址 后 移 9ox266 
因为 没有 ADD ES ,6x626 指 
CL 加 1 


比较 CL 与 18 
如 果 CL <= 18， 则 跳 转 至 


WDH < 2， 则 跳 转 到 


; WCH < CYLS， 则 跳 转 到 


3 


首先 还 是 说 说 新 出 现 的 指令 JB。 这 也 是 条 件 跳 转 指 
令 ， 是 “jump if below” 的 缩写 。 翻 译 过 来 就 是 : “如 
果 小 于 的 话 ， 束 跳 转 。” 还 有 一 个 新 指令 ， 就 是 在 


程序 开头 使 用 的 EQU 指 令 。 这 相当 于 C 语 言 的 


#define 命 令 ， 用 来 声明 常数 。“CYLS EQU 10” 意 思 
PINS. ABE 


是 “CYLS = 10”. EQU 


te “equa 


义 成 常数 是 因为 以 后 我 们 可 能 修改 这 个 数字 。 现 在 


我 们 先 随意 定义 成 10 个 柱 面 ， 以 后 再 对 它 进行 调整 
(CYLS 代 表 cylinders) 。 


现在 启动 区 程序 已 经 写 得 差不多 了 。 如 果 算 上 系统 
加 载 时 自动 装载 的 局 动 届 区 ， 那 现在 我 们 已 经 能 够 
把 软盘 最 初 的 10 x 2 x 18 x 512 = 184 320 
byte=180KB 内 容 完整 无 误 地 装载 到 内 存 里 了 。 如 果 
运行 “make install*， 把 程序 安装 到 磁盘 上 ， 然 后 用 
它 来 局 动 电脑 的 话 ， 我 们 会 发 现 装载 过 程 还 是 挺 花 
时 则 的 。 这 证 明 我 们 的 程序 运行 下 第 。 男 而 显示 依 
然 没 什么 变化 ， 但 这 个 程序 已 经 用 从 软盘 读 取 的 数 
据 填 满 了 内 存 0x08200~ 0x34fff 的 地 方 。 


5 看 手 开 友 操 作 系 统 


总 算 写 到 这 个 题目 了 ， 这 代表 我 们 终于 完成 了 局 动 
区 的 制作 。 

下 面 ， 我 们 先 来 编写 一 个 非常 短小 的 程序 ， 就 只 让 
它 HLT。 

最 简单 的 操作 系统 ? 

fin: 


HLT 
JMP fin 


将 以 上 内 容 保存 为 haribote.nas， 用 nask 编 译 ， 输 出 
成 hanbote.sys。 到 这 里 没什么 难 的 。 


接 下 来 ， 将 这 个 文件 保存 到 磁盘 映像 haribote.img 
里 。 可 能 有 人 不 明日 什么 叫 保存 到 映像 里 ， 其 实 束 
是 像 下 面 这 样 操 作 : 


。 使 用 make install 指 令 ， 将 磁盘 映像 文件 写 入 磁 
o 


。 在 Windows 里 打开 那个 人 磁盘， 把 haribote.sys 保 存 
Bll eke Eo 


o 使 用 工具 将 磁盘 备份 为 磁盘 映像 。 


大 家 仔细 看 ， 以 上 操作 以 磁盘 映像 文件 开始 ， 最 终 
也 是 以 磁盘 映像 文件 结束 。 我 们 再 来 想像 一 下 ， 如 
果 不 用 借助 磁盘 和 Windows 就 可 以 得 到 磁盘 映像 和 
文件 ， 那 多 方便 啊 。 这 就 是 “保存 到 磁盘 映像 里 ”的 
= 图 


/CN JL O 


能 够 完成 这 些 工 作 的 工具 其 实 有 很 多 ， 我 们 曾经 使 
用 过 的 edimg.exe 就 是 其 中 之 一 。 所 以 ， 这 次 还 用 这 
IN 

pall = es 


AB HIS TS LYE FE SEA TAR Lhe? 我 们 先 做 做 看 ， 
然后 再 说 明 。.……. 笔者 对 程序 作 了 修改 ， 得 到 了 
projects/03_day 下 的 harib00e。 当 然 对 Makefile 也 相 
应 做 了 改动 。 


接 下 来 用 “make img” 指 令 来 做 个 映像 文件 。 执 行 完 
命令 ， 映 像 文 件 也 就 做 成 了 。 然 后 我 们 用 二 进 制 编 
辑 堪 打开 了 刚 做 成 的 映像 文件 haribote.img”， 看 一 
看 “haribote.sys” 文 件 在 磁盘 中 是 什么 样 的 。 


最 先 注意 到 的 地 方 是 0x002600 附 近 ， 磁 盘 的 这 个 位 
置 好 像 你 存 着 文件 名 。 


File Edit View ame Tools | Help 
Sax Ss ea|\ooeol Mie OFS 
many Only 9 
WU UW 00 00 00 00 00 00-00 00 00 00 00 00 00 00 


00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 
48 41 52 49 42 4F 54 45-53 59 53 20 00 00 00 00 ice an 
brn 


00 00 00 00 00 00 89 26-6D 32 QO 00 00 00 00 00 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00-00 0 00 00 00 00 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 .............. 


Toggle Read-only mode [1,689,695 bytes [ASCII [OVR » 


0x002600 附 近 的 样子 


再 往 下 看 ， 找 到 0x004200 那 里 ， 可 以 看 到 “F4 EB 
FD”. 


ia = = 
BZ - haribote.img 
File Edit View Jump Tools Help 


Lh @poeaol mle ors 
+12 B44 HO 47 +8 19 ABO WD EF 0123456789ABCDEF ~ 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 


F4 EB FD WW 00 00 00 00-00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00 


m 


(0000:4203: 0x00 (0) = [1,689,695 bytes 


0x004200 附 近 的 样子 


这 是 什么 昵 ? 这 就 是 haribote.sys 的 内 容 。 因 为 我 们 
用 二 进 制 编辑 器 看 haribote.sys， 它 恰好 也 就 是 这 三 
个 字 节 。 好 入 没 用 的 二 进 制 编 辑 堪 这 次 又 大 显 映 手 
e 


以 上 内 容 可 以 总 结 为 : 一 般 同一 个 空 软盘 你 存 文件 
时 ， 


1. 文件 名 会 写 在 0x002600 以 后 的 地 方 ; 

2. 文件 的 内 容 会 写 在 0x004200 以 后 的 地 方 。 

这 就 是 我 们 一 直 想 知道 的 东西 。 

了 解 了 这 一 点 ， 下 面 要 做 的 事 就 简单 了 。 我 们 将 操 
作 系 统 本 丑 的 内 容 写 到 名 为 haribote.sys 文 件 中 ， 再 


把 它 保 存 到 磁盘 映像 里 ， 然 后 我 们 从 启动 区 执行 这 
个 haribote.sys 训 行 了 。 接 下 来 我 们 就 来 做 这 件 事 。 


6 从 局 动 区 执行 操作 系统 


那么 ， 要 怎样 才能 执行 磁盘 映像 上 位 于 0x004200 号 
地 址 的 程序 呢 ?” 现 在 的 程序 是 从 启动 区 开始 ， 把 人 磁 
盘 上 的 内 容 装 载 到 内 存 0x8000 号 地 址 ， 所 以 磁盘 
0x4200 处 的 内 容 束 应 该 位 于 内 存 
0x8000+0x4200=0xc200 号 地 址 。 


这 样 的 话 ， 我 们 就 往 haribote.nas 里 加 上 ORG 
0xc200， 然 后 在 ipl.nas 处 理 的 最 后 加 上 JMP 
0xc200 这 个 指令 。 这 样 修改 后 ， 得 到 的 就 
是 “projects/03_day” 下 的 harib00f。 


赶紧 运行 “make run”， 目 前 什么 都 没 发 生 。 那 么 程 
序 到 底 有 没有 执行 haribote.sys 呢 ?大 家 可 能 会 有 点 
担心 。 所 以 ， 下 面 我 们 让 haribote.sys 跳 出 来 表现 一 
下 。 


7 确认 操作 系统 的 执行 情况 


怎么 让 和 它 表 现 呢 ? 如 果 还 只 是 输出 一 条 信息 的 话 吏 
大 没意思 了 了。 考虑 到 将 来 我 们 肯定 要 做 成 Windows 
那样 的 画面 ， 所 以 这 次 束 来 切换 一 下 画面 模式 。 我 
们 这 次 做 成 的 文件 ， 就 是 projects/03_day 下 的 
harib00g。 


本 次 的 haribote.nas 


s haribote-os 
3 TAB=4 


@xc20@ ; 这 个 程序 将 要 被 装载 到 内 


ORG 
存 的 什么 地 方 呢 ? 


MOV AL ,9x13 ; VGA 显 卡 ，326x266x8 位 彩 


MOV AH, 0x00 
INT 0x10 


HLT 
JMP 


设 定 AH=0x00 后 ， 调 用 显卡 BIOS 的 函数 ， 这 样 就 可 
以 切换 显示 模式 了 。 我 们 还 可 以 在 文 持 网 页 
(AT) BIOS 里 看 看 。 


设置 显卡 模式 (video mode) 


。AH=0x00; 
。AL= 模 式 : 省略 了 一 些 不 重要 的 画面 模式 ) 


0x03: 16 色 字符 模式 ，80 x 25 


O 


0x12: VGA 图 形 模式 ，640 x 480 x 4 位 彩色 
模式 ， 独 特 的 4 面 存储 模式 


0x13: VGA 图 形 模 式 ，320 x 200 x 8 位 彩色 
模式 ， 调 色 板 模式 


0x6a: 扩展 VGA 图 形 模式 ，800 x 600 x 4 位 
彩色 模式 ， 独 特 的 4 面 存储 模式 (有 的 显卡 
不 文 持 这 个 模式 ) 


。 RMA: 无 


参照 以 上 说 明 ， 我 们 暂且 选择 0x13 画 和 面 模式 ， 因 为 
8 位 彩色 模式 可 以 使 用 256 种 颜色 ， 这 一 点 看 来 不 


fE o 


如 果 男 面 模 式 切 换 正 第 ， 男 面 应 该 会 变 为 一 厂 漆 
黑 。 也 束 是 说 ， 因 为 可 以 看 到 画面 的 变化 ， 所 以 能 
判断 程序 是 否 运 行 正常 。 由 于 变 成 了 图 形 模 式 ， 
此 光标 会 消失 。 


O 


O 


O 


另外 ， 这 次 还 顺便 修改 了 其 他 一 些 地 方 。 首 先 将 
ipl.nas 的 文件 名 变 成 了 ipl10.nas。 SEA 了 提醒 大 家 
这 个 程序 只 能 谈 入 10 个 柱 面 。 另 外 ， 想 要 把 三 盘 装 
载 内 容 的 结束 地 址 告诉 给 haribote. sys» 所 以 我 们 

在 “JMP 0xc200” 之 前 ， 加 入 了 一 行 命令 ， 将 CYLS 
的 值 写 到 内 存 地 址 0x0ff0 中 。 这 样 启动 区 程序 就 算 
完成 了 。 


成 功 地 出 现 全 黑 画 面 
赶紧 “make run” 看 看 。 
BRR, mA- ARE. SIA 真是 太 好 了 ! 


有 一 点 要 先 说 明 一 下 ， 现 在 我 们 把 局 动 区 里 与 
haribote.sys 没 有 关系 的 前 后 部 分 也 读 了 进来 ， 所 以 


局 动 时 很 慢 。 可 能 会 有 人 和 觉得 这 样 做 很 浪费 时 间 ， 
但 对 于 我 们 的 纸 娃 娃 操 作 系 统 来 说 ， 沪 载 局 动 区 这 
些 部 分 ， 以 后 会 起 大 作用 的 ， 所 以 暂时 先 妨 耐 一 下 
吧 。 


8 32 位 模式 六 期 准备 
今天 还 有 些 时 间 ， 再 往 下 讲 一 点 吧 。 


现在 ， 汇 编 语言 的 开发 告 一 段 洲 ， 我 们 要 开始 以 C 
语言 为 主 进 行 开 及 了 ， 这 有 是 我 们 当前 的 目标 。 


笔者 准备 的 C 编 译 器 ， 只 能 生成 32 位 模式 的 机 器 语 
言 。 如 果 一 定 要 生成 16 位 模式 机 器 语言 ， 虽 然 也 不 
是 做 不 到 ， 但 是 很 费事 ， 还 没什么 好 处 ， 所 以 就 用 
32 位 模式 吧 。 


所 谓 32 位 模式 ， 指 的 是 CPU 的 模式 。CPU 有 16 位 和 
32 位 两 种 模式 。 如 果 以 16 位 模式 启动 的 话 ， 用 AX 
和 CX 等 16 位 寄存 右 会 非常 方便 ， 但 反 过 来 ， 像 
EAX 和 ECX 等 32 位 的 寄存 器 ， 使 用 起 来 就 很 且 烦 。 
男 外 ，16 位 模式 和 32 位 模式 中 ， 机 恬 语 言 的 命令 代 
码 不 一 样 。 同 样 的 机 器 语言 ， 解 释 的 方法 也 不 一 
样 ， 所 以 16 位 模式 的 机 器 语言 在 32 位 模式 下 不 能 运 
47, J NS 


32 位 模式 下 可 以 使 用 的 内 存 容量 远 远 大 于 1MB。 败 
外 ，CPU 的 自我 保护 功能 (识别 出 可 疑 的 机 器 语言 
并 进行 屏蔽 ， 以 免 破 坏 系 统 ) 在 16 位 下 不 能 用 ， 但 
32 位 下 能 用 。 既 然 有 这 么 多 优点 ， 当 然 要 使 用 32 位 


模式 了 了 。 
TT 


可 是 ， 如 果 用 32 位 模式 就 不 能 调用 BIOS 功 能 了 。 这 
是 因为 BIOS 是 用 16 位 机 器 语言 写 的 。 如 果 我 们 有 什 
么 事情 想 用 BIOS 来 做 ， 那 就 全 部 都 放 在 开头 先 做 ， 
因为 一 旦 进入 32 位 模式 就 不 能 调用 BIOS 也 数 了 。 
当然， 也 有 从 32 位 返回 到 16 位 的 方法 ， 但 是 非常 
BLK, PUABA PAR. ) 


再 回头 说 说 要 使 用 BIOS 做 的 事情 。 男 面 模式 的 设 定 
已 经 做 完了 ， 接 下 来 还 想 从 BIOS 得 到 键盘 状态 。 所 
谓 键盘 状态 ， 是 指 NumLock 是 ON 还 是 OFF 等 这 些 


状态 。 


所 以 ， 我 们 这 次 只 修改 了 haribote.nas。 修 改 后 的 程 
Fe ait x projects/03_day F 的 harib00h。 


本 次 的 haribote.nas 


s haribote-os 
3 TAB=4 


; 有 关 BOOT_INFO 


CYLS EQU exeffe ; 设 定 启动 区 
LEDS EQU @xeff1 
VMODE EQU Oxeff2 ; 关于 颜色 数目 的 信息 。 颜 


色 的 位 数 。 


SCRNX EQU @xeff4 ; 分 辩 率 的 X (screen x) 
SCRNY EQU 0Xx6ff6 ; 分 辨 率 的 Y (screen y) 
VRAM EQU oxeff8 ; 图 像 缓 冲 区 的 开始 地 址 

ORG 9xc266 ; 这 个 程序 将 要 被 装载 到 内 
存 的 什么 地 方 呢 ? 

MOV AL,0x13 ; VGA 显卡 ，326x266x8 位 
彩 

MOV AH, 0x00 

INT 0x10 

MOV BYTE [VMODE],8 ; 记录 画面 模式 

MOV WORD [SCRNX] ,326 

MOV WORD [SCRNY] ,266 

MOV DWORD [VRAM] ,0x000a0000 


;用 BIOS 取 得 键盘 上 各 种 LED 指 示 灯 的 状态 


MOV AH, Ox02 
INT 0x16 ; keyboard BIOS 
MOV [LEDS], AL 


A— PrerrstieVia, Weems a, HHEH 


面 模式 的 信息 保存 在 了 内 存 里 。 这 是 因为 ， 以 后 我 
们 可 能 要 支持 各 种 不 同 的 画面 模式 ， 这 就 需要 把 现 
在 的 设置 信息 保存 起 来 以 备 后 用 。 我 们 暂且 将 局 动 
时 的 信息 称 为 BOOT_INFO。INFO 是 英文 
information (信息 〉 的 缩写 。 


[VRAM] 里 保存 的 是 0xa0000。 在 电脑 的 世界 里 ， 
VRAM 指 的 是 显卡 内 存 (video RAM) ， 也 就 是 用 
来 显示 画面 的 内 存 。 这 一 块 内 存 当然 可 以 像 一 般 的 
内 存 一 样 存储 数据 ， 但 VRAM 的 功能 不 仅 限 于 此 ， 
它 的 各 个 地 址 都 对 应 着 画面 上 的 像素 ， 可 以 利用 这 
一 机 制 在 画面 上 绘制 出 五 彩 绽 纷 的 图 和 案 。 


其 实 VRAM 分 布 在 内 存 分布 图 上 好 几 个 不 同 的 地 
方 。 这 是 因为 ,不同 画 面 模式 的 像素 数 也 不 一 样 。 
当 画 面 模 式 为 Ox 时 使 用 这 个 VRAM; 而 画面 模式 
为 信人 入 时 可 能 使 用 那个 VRAM， 像 这 样 ， 不 同 画 面 
模式 可 以 使 用 的 内 存 也 不 一 样 。 所 以 我 们 就 预先 把 
要 使 用 的 VRAM 地 址 保存 在 BOOT_INFO 里 以 备 后 
用 。 


这 次 VRAM 的 值 是 0xa0000。 这 个 值 又 是 从 哪儿 得 
来 的 呢 ? 还 是 来 看 看 我 们 每 次 都 参考 的 CAT) 
BIOS 支 持 网 页 。 在 INT 0x10 的 说 明 的 最 后 写 着 ， 这 
种 画面 模式 下 “VRAM 是 0xa0000~0xaffff 的 
64KB”. 


HAR RIDERR MEZ, DRM 
BIOS 取 得 的 键盘 信息 都 保存 了 起 来 。 保 存 位 置 是 在 
内 存 0x0ff0 附 近 。 从 内 存 分 布 图 上 看 ， 这 一 块 并 没 
被 使 用 ， 所 以 应 该 没 问题 。 
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后 运行 用 C 语 言 写 的 程序 。 这 就 是 projects/03_day 下 
的 harib00i。 


程序 里 添加 和 修改 了 很 多 内 容 。 首 先是 
haribote.sys， 它 的 前 半 部 分 是 用 汇编 语言 编写 的 ， 
而 后 半 部 分 则 是 用 C 语 言 编 号 的 。 所 以 以 前 的 文件 
名 haribote.nas 也 随 之 改 成 了 asmhead.nas。 并 且 ， 为 
SWABS SWF, YIN £10077 A ANIL 
AY. 
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学 一 点 ， 再 回 过 头 来 仔细 讲解 这 段 程序 。 其 实 笔者 
多 次 对 这 一 部 分 进行 次 明 ， 但 每 次 都 写 得 很 长 很 
FR, TARZIE. FIE KAEN 
内 容 多 了 ， 这 一 部 分 再 理解 起 来 也 就 轻松 了 ， 所 以 
暂时 和 完 不 做 说 明了 。 


下 面 讲 C 语 言 部 分 。 文 件 名 是 bootpack.c。 为 什么 要 
起 这 样 的 名 字 呢 ? 因为 以 后 为 了 局 动 操作 系统 ， 还 
要 写 各 种 其 他 的 处 理 ， 我 们 想 要 把 这 些 处 理 打 成 一 
个 包 Cpack) ， 所 以 束 起 了 这 么 一 个 名 字 。 最 重要 


的 核心 内 容 非 党 非常 得， 如 下 所 示 : 


本 次 的 bootpack.c 


void HariMain(void) 


{ 


fin: 


/* 这 里 想 写 上 HLT， 但 c 语 言 中 不 能 用 HLT!*/ 
goto fin; 


这 个 程序 第 一 行 的 意思 是 : DBRS, KA 
名 字 叫 HariMain， 而 且 不 带 参 数 (void) ， 不 返回 
任何 值 。“{}” 括 起 来 的 部 分 惑 是 函数 的 处 理 内 容 。 


C 语 言 中 所 说 的 函数 是 指 一 块 程 序 ， 在 某 种 程度 上 
可 以 看 作 数 学 中 的 函数 一 般 ， 即 从 变量 x 取得 值 ， 
将 处 理 结果 送 给 y。 而 上 面 情况 下 ， 既 不 从 变量 取 
得 值 ， 也 不 返回 任何 值 ， 不 太 像 数学 中 的 函数 ， 但 
在 C 语 言 中 这 也 是 函数 。 

goto 指 令 是 新 出 现 的 ， 相 当 于 汇编 语言 中 的 JMP， 
实际 上 也 是 被 编译 成 JMP 指 令 。 

由 x*” 和 “*/” 括 起 来 的 部 分 是 注释 ， 正 如 这 里 所 写 
的 那样 ，C 语 言 中 不 能 使 用 HLT， 也 没有 相当 于 DB 
的 命令 ， 所 以 不 能 用 DB 来 放 一 句 HLT 语 句 。 这 让 


喜欢 HTIL 语 句 的 笔者 感觉 很 是 可 异 。 


a 


EENEN 
那么 ， 这 个 bootpack.c 是 怎样 变 成 机 器 语言 的 呢 ? 
如 果 不 能 变 成 机 器 语言 ， 束 是 说 得 再 多 也 没有 意 
义 。 这 个 步 又 很 长 ， 让 我 们 看 一 看 。 

。 首 先 ， 使 用 ccl.exe 从 bootpack.c 生 成 


bootpack.gas. 


。 第 二 步 ， 使 用 gas2nask.exe 从 bootpack.gas 生 成 
bootpack.nas. 


。 第 三 步 ， 使 用 nask.exe 从 bootpack.nas 生 成 
bootpack.obj. 


。 第 四 步 ， 使 用 obi2bim.exe 从 bootpack.obj 生 成 
bootpack.bim 。 


。 最 后， 使 用 bim2hrb.exe 从 bootpack.bim 生 成 
bootpack.hrb. 


。 这 样 就 做 成 了 机 器 语言 ， 再 使 用 copy 指 令 将 
asmhead.bin-+9bootpack.hrb #2. Ai 45 4 BEE, 
成 J haribote.sys. 


来 来 去 去 摘出 了 这 么 多 种 类 的 文件 ， 那 么 下 面 束 简 
EP ea — Pie 


ccl1 是 C 编 译 器 ， 可 以 将 C 语 言 程序 编译 成 汇编 语言 
源 程 序 。 但 这 个 C 编 译 吉 是 笔者 从 名 为 gcc 的 编译 器 
改造 而 来 ， 而 gcc 又 是 以 gas 汇 编 语 言 为 基础 ， 输 出 
的 是 gas 用 的 源 程序 。 它 不 能 翻译 成 nask。 


所 以 我 们 需要 把 gas 变 换 成 nask 能 翻译 的 语法 ， 这 整 
是 gas2nask。 解 释 一 下 这 个 名 字 。 闫 语 中 的 “从 A 到 
B” 说 成 “from A to B”， 省 略 一 下 ， 束 是 “A to B”. 
这 里 把 “to” 写 成 “2”， 世 界 上 开发 工具 的 人 有 时 会 这 
么 写 〈 这 是 英语 中 的 谐 首 ，2 与 to 同 首 〉。 所 以 ， 
gas2nask 的 意思 残 是 “把 gas 文 件 转换 成 nask 文 件 的 程 
Te 


一 旦 转换 成 nas 文 件 ， 它 可 就 是 我 们 的 掌中 之 物 
Ty 只 要 用 nask 翻 详 一 下 ， 就 能 变 成 机 器 语言 了 。 
实际 上 也 正 是 那样 ， 首 先 用 nask 制 作 obj 文 件 。obj 
SE MK A SCE, VEE SCH “object”, that 
目标 的 意思 。 程 序 是 用 C 语 言 写 的 ， 而 我 们 的 目标 
~a 所 以 这 就 是 “目标 文件 ”这 一 名 称 的 由 


可 能 会 有 人 和 想 ， 既 然 已 经 做 成 了 机 器 语言 ， 那 只 


本 
女 
把 它 写 进 映像 文件 里 就 万 事 大 言 了 。 但 很 遗憾 ， 这 


还 不 行 ， 事 实 上 这 也 正 是 使 用 C 语 言 的 不 便 之 处 。 
目标 文件 是 一 种 特殊 的 机 器 语言 文件 ， 必 须 与 其 他 
文件 链接 Cink) 后 才能 变 成 真正 可 以 执行 的 机 痪 
语言 。 链 接 是 什么 意思 呢 ? 实际 上 C 语 言 的 作者 已 
经 认识 到 ，C 语 言 有 它 的 局 限 性 ， 不 可 能 只 用 C 语 
言 来 编写 所 有 的 程序 ， 所 以 其 中 有 一 部 分 必须 用 汇 
编 来 写 ， 然 后 链接 到 C 语 言 写 的 程序 上 。 


现在 为 止 ， 都 只 有 一 个 源 程序 ， 由 它 来 直接 生成 
机 器 语 言 义 件 ， 这 好 像 是 理所当然 的 ， 完 全 不 用 
考虑 什么 目标 文件 的 链接 。 但 是 这 个 问题 以 后 要 
考虑 了。 下 面 我 们 来 讲 一 下 用 汇编 语言 做 目标 文 
IFRA Ae 


所 以 ， 为 了 将 目标 文件 与 询 的 目标 文件 相 链接 ， 除 
了 机 器 语言 之 外 ， 其 中 还 有 一 部 分 是 用 来 交换 信息 
的 。 单 个 的 目标 文件 还 不 是 独立 的 机 器 语言 ， 其 中 
还 有 一 部 分 是 没完 成 的 。 为 了 能 做 成 完整 的 机 器 语 
言 文 件 ， 必 须 将 必要 的 目标 文件 全 部 链接 上 。 完 成 
这 项 工作 的 ， 就 是 obj2bim。bim 是 笔者 设计 的 一 种 
文件 格式 ， 意 思 是 “binary image”， 它 是 一 个 二 进 制 
映像 文件 。 


HR SCE BIER FEIT AWE? 这 么 说 来 ， 磁 盘 映 像 也 
是 一 种 映像 文件 。 按 笔者 的 理解 ， 所 谓 映 像 文件 
即 不 是 文件 本 来 的 状态 ， 而 是 一 种 代 合 形式。 瑞 


文 里 面 说 到 image file， 一 般 是 指 图 像 文件 ， 首 先 
要 有 一 个 真实 的 东西 ， 而 它 的 图 像 则 是 临 区 仿造 
THORN, HAGE IRR, (HSE ERIN, Axe 
以 不 同 的 形式 展示 出 原 物 的 上 映像。 不 是 第 有 人 这 
么 讲 吗 ,“ 咖 ， 摘 不 恒 你 在 说 什么 。 能 不 能 说 得 再 
形象 一 点 儿 ?”， 也 束 是 说 “如 末 直 接 说 明 起 来 太 
困难 的 话 ， 可 以 找 个 相似 的 东西 来 类 比 一 下 。” 所 
请 类 比 , “不 是 本 来 的 状态 ， 而 是 一 种 代 丛 的 形 
EV 映像 文件 大 致 也 了 驶 是 这 个 意思 。 


所 以 ， 实 际 上 bim 文 件 也 “不 是 本 来 的 状态 ， 而 是 一 
种 代 蔡 的 形式 ”， 也 还 不 是 完成 品 。 这 只 是 将 各 个 
部 分 全 部 都 链接 在 一 起 ， 做 成 了 一 个 完整 的 机 器 语 
言 文 件 ， 而 为 了 能 实际 使 用 ， 我 们 还 需要 针对 每 一 
个 不 同 操作 系统 的 要 求 进行 必要 的 加 工 ， 比 如 说 加 
上 识别 用 的 文件 头 ， 或 者 压缩 等 。 这 次 因为 要 做 成 
适合 “ 纸 娃娃 操作 系统 ”要 求 的 形式 ， 所 以 笔者 为 此 
专门 写 了 一 个 程序 bim2hrb.exe， 这 个 程序 留 到 后 面 
来 介绍 。 


可 能 有 人 会 想 :“ 我 在 Windows 和 Linux 上 做 了 很 多 
次 C 程 序 了 ， 既 没 用 过 那么 多 工具 ， 也 没 那 么 多 的 
FE OE ade J. REE SPW? ”说 到 
底 ， 这 是 因为 那些 编译 右 已 经 很 成 熟 了 。 


但 是 ， 如 采 我 们 的 编译 右 能 够 直接 生成 可 执行 文 

件 ， 那 再 想 把 它 用 于 别 的 用 途 可 就 难 了 。 其 实在 编 
译 虱 内 部 也 要 做 同样 的 事 ， 只 是 在 外 和 面 看 人 不见 这 些 
过 程 而 已 。 这 次 提供 的 编译 器 ， 是 以 能 适应 各 种 不 
同 操作 系统 为 前 提 而 设计 的 ， 所 以 对 内 部 没有 任何 
隐藏 ， 是 特意 像 这 样 多 生成 一 些 中 间 文 件 的 。 


这 样 做 的 好 处 是 仅 靠 这 个 编译 器 ， 束 可 以 制作 
Windows、Linux 以 及 OSASK 用 的 可 执行 文件 ， 当 
然 ， 还 有 我 们 的 “ 纸 娃 娃 操 作 系 统 ” 的 可 执行 文件 。 


根据 以 上 内 容 ， 对 Makefile 也 做 了 很 大 改动 。 如 果 
大 家 想 知 道 编 译 时 指定 了 什么 样 的 选项 ， 可 以 看 一 
看 Makefile。 


W, ARKE. KAA HariMaingt t EA, fE 
序 束 是 从 以 HariMain 命 名 的 函数 开始 运行 的 ， 所 以 
这 个 函数 名 不 能 更 改 。 


执行 这 个 函数 ， 结 果 出 现 黑屏 。 这 表示 运行 正常 。 


10 ”实现 HLT (harib00j) 


虽然 夜 已 经 深 了 ， 但 笔者 现在 还 不 能 说 “今天 就 到 

此 结束 ”。 不 让 计算 机 处 于 HALT (HLT) 状态 心里 
ILS BY Ak o pi Hache Liege 不 把 这 个 问 
题解 决 掉 怎么 能 睡 得 着 昵 〈 笑 ) 。 我 们 来 努力 尝试 
= 


首先 写 了 下 面 这 个 程序 ，naskfunc.nas。 


naskfunc.nas 


; naskfunc 


; TAB=4 

[FORMAT "WCOFF"] ; 制作 目标 文件 的 模式 

[BITS 32] ; 制作 32 位 模式 用 的 机 械 语 

;制作 目标 文件 的 信息 

[FILE "naskfunc.nas"] ; 源 文件 名 信息 
GLOBAL _io_ hlt ; 程序 中 包含 的 函数 名 


;以 下 是 实际 的 函数 
[SECTION .text] >; Birches see Zea Sey 


_io hilt: ; void io hlt(void); 


RET 
Wien, CALA a Ss SSR. BS AY 
io_hlt。 虽 然 只 叫 hlt 也 行 ， 但 在 CPU 的 指令 之 中 ， 
HLT 指 令 也 属于 IO 指令 ， 所 以 束 起 了 这 么 一 个 名 
字 。 顺 便 说 一 句 ，MOV 属 于 转送 指令 ，ADD 属 于 
演算 指令 。 


用 汇编 写 的 函数 ， 之 后 还 要 与 bootpack.obj 链 接 ， 所 
以 也 需要 编译 成 目标 文件 。 因 此 将 输出 格式 设 定 为 
WCOFF 模 式 。 男 外 ， 还 要 设 定 成 32 位 机 器 语言 模 
Es 


在 nask 目 标 文件 的 模式 下 ， 必 须 设 定 文件 名 信息 ， 

然后 再 写 明 下 面 程 序 的 函数 名 。 注 意 要 在 函数 名 的 
前 面 加 上 “>”， 人 否则 就 不 能 很 好 地 与 C 语 言 函 数 链 

接 。 需 要 链接 的 函数 名 ， 都 要 用 GLOBALI 指 令 声 

明 。 


1 原意 是 “全 球 性 的 "。 在 计算 机 行业 中 指 全 局 性 的 
(ARs, KAI) 。 其 反义词 是 LOCAL (局 部 
的 ) 。 


下 面 写 一 个 实际 的 函数 。 写 起 来 很 简单 ， 先 写 一 个 
与 用 GLOBAL 声明 的 函数 名 相同 的 标号 Adabel) ， 
从 此 处 开始 写 代 码 就 可 以 了 。 这 次 新 出 现 的 RET 指 


令 ， 相 当 于 C 语 言 的 return， 意 思 就 是 “函数 的 处 理 
到 此 结束 ， 返 回 吧 ”， 简 洁 明 了 。 


在 C 语 言 里 使 用 这 个 函数 的 方法 非常 筒 单 。 我 们 来 
看 看 bootpack.c。 


本 次 的 bootpack.c 
告诉 C 编 译 器 ， 有 一 个 函数 在 别 的 文件 里 */ 


void io_hlt(void); 


/* 是 函数 声明 却 不 用 { }， 而 用 ;， 这 表示 的 意思 是 : 函数 古 在 别 的 文 
件 中 ， 你 自己 找 一 下 吧 ! */ 


void HariMain(void) 


io_hlt(); /* 执 行 haskfunc.nas 里 的 io h1t*/ 
goto fin; 


产程 序 里 的 注释 写 得 很 到 位 ， 请 仔细 阅读 一 下 。 


好 了 ， 源 程序 增加 了 ， Makefile 也 进行 了 深 加 ， Jb 
么 赶紧 运行 “make run” 看 看 吧 。 结 果 虽 然 还 是 
屏 ， 但 程序 运行 肯定 是 正常 的 。 太 好 了 ， 这 就 放 Ù 
了 。 大 家 明天 见 ! 
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。 用 C 语 言 实现 内 存 写 入 《harib01a) 
FARIZ (harib01b) 

挑战 指针 (harib01c) 

指针 应 用 (1) Charib01d) 

指针 应 用 (2) (harib01e) 

色 号 设 定 (harib01f) 

绘制 矩形 (harib01g) 

今天 的 成 果 (harib01h) 


1 用 C 话 言 实现 内 存 写 入 
(harib01a ) 


昨天 我 们 成 功 地 让 画面 显示 黑屏 了 ， 但 只 做 到 这 一 
步 没什么 意思 ， 还 是 往 画 面 上 画 点 儿 什 么 东西 比较 
有 趣 。 想 要 画 东 西 的 话 ， 只 要 往 VRAM 里 写 点 什么 
就 可 以 了 。 但 是 在 C 语 言 中 又 没有 直接 写 入 指定 内 
存 地 址 的 语句 1!。 咖 ， 真 是 不 方便 。 所 以 ， 我 们 干 

脆 就 创建 一 个 有 这 种 功能 的 函数 。 下 面 就 来 修改 一 


下 naskfunc.nas。 


“怎么 会 ? 分 明 有 啊 ! ”如 果 你 有 这 样 的 疑问 ， 那 
么 作为 本 书 的 读者 ， 你 已 经 知 着 得 相当 多 了 。 


naskfunc.nas 里 添加 的 部 分 


_write_mems: ; void write_mem8(int addr, int data); 
MOV ECX, [ESP+4] ; [ESP + 4] 中 存放 的 是 地 
址 ， 将 其 读 入 ECX 
MOV AL, [ESP+8] ; [ESP + 8] 中 存放 的 是 数 


据 ， 将 其 读 入 AL 
MOV [ECX] ,AL 
RET 


这 个 函数 类 似 于 C 语 言 中 
的 “write_ mem8 (0x1234,0x56) ;” 语 句 ， 动 作 上 相 


当 于 “MOV BYTE[0x1234],0x56”。 顺 便 说 一 下 ， 
addr 是 address 的 缩写 ， 在 这 里 用 它 来 表示 地 址 。 


在 C 语 言 中 如 果 用 到 了 write mems AA, WBE 
到 _write mem8。 此 时 参数 指定 的 数字 就 存放 在 内 
存 里 ， 分 别 是 : 

第 一 个 数字 的 存放 地 址 : [ESP + 4] 

第 二 个 数字 的 存放 地 址 : [ESP + 8] 

第 三 个 数字 的 存放 地 址 : [ESP + 12] 

第 四 个 数字 的 存放 地 址 : [ESP + 16] 

(LI FH) 

我 们 想 取 得 用 参数 指定 的 数字 0x1234 或 0x56 的 内 
容 ， 就 用 MOV 指 令 读 入 寄存 器 。 因 为 CPU 已 经 是 32 
位 模式 ， 所 以 我 们 积极 使 用 32 位 寄存 器 。16 位 寄存 
器 也 不 是 不 能 用 ， 但 如 果 用 了 的 话 ， 不 只 机 器 语言 
的 字 节 数 会 增加 ， 而 且 执行 速度 也 会 变 慢 ， 没 什么 
te Ab 

在 指定 内 存 地 址 的 地 方 ， 如 果 使 用 16 位 寄存 右 指 定 


[CX] 或 [SP] 之 类 的 束 会 出 错 ， 但 使 用 32 位 寄存 器 ， 

连 [ECX]、[ESP] 等 都 OK， 基 本 上 没有 不 能 使 用 的 
寄存 器 。 真 方便 。 另 外 ， 在 指定 地 址 时 ， 不 光 可 以 
指定 寄存 器 ， 还 可 以 使 用 往 寄存 器 加 一 个 各 数 ， 或 
者 减 一 个 常数 的 方式 。 另 外 说 一 下 ， 在 16 位 模式 

下 ， 也 能 使 用 这 种 方式 指定 ， 但 那 时 候 没 有 什么 地 
方 用 得 上 ， 所 以 没有 使 用 。 


如 果 与 C 语 言 联合 使 用 的 话 ， 有 的 寄存 器 能 自由 使 

用 ， 有 的 寄存 器 不 能 上 自由 使 用 ， 能 上 自由 使 用 的 只 有 
EAX、ECX、EDX 这 3 个 。 至 于 其 他 寄存 器 ， 只 能 

使 用 其 值 ， 而 不 能 改变 其 值 。 因 为 这 些 寄存 堪 在 C 

语言 编译 后 生成 的 机 器 语言 中 ， 用 于 记忆 非常 重要 
的 值 。 因 此 这 次 我 们 只 用 EAX 和 ECX。 


这 次 还 给 naskfunc.nas 增 加 了 一 行 ， 那 就 是 
INSTRSET 指 令 。 它 是 用 来 告诉 nask“ 这 个 程序 是 给 
486 用 的 哦 ”?，nask 见 了 这 一 行 之 后 整 知 道 “ 哦 ， 那 见 
了 EAX 这 个 词 ， 就 解释 成 寄存 器 名 ”。 如 果 什 么 都 
不 指定 ， 它 束 会 认为 那 古 为 8086 这 种 非常 古老 的 、 
而 且 只 有 16 位 寄存 器 的 CPU 而 写 的 程序 ， 见 了 EAX 
这 个 词 ， 会 误解 成 标签 (Label) ， 或 是 常数 。8086 
那 时 候 写 的 程序 中 ， 曾 偶尔 使 用 EAX 来 做 标签 ， 当 
时 也 没 想到 这 个 单词 后 来 会 成 为 寄存 右 名 而 不 能 


随便 使 用 。 


上 面 虽 然 写 着 486 用 ， 但 并 不 是 说 会 出 现 仪 能 在 486 
中 执行 的 机 器 语言 ， 这 只 是 单纯 的 词语 解释 的 问 
题 。 所 以 486 用 的 模式 下 ， 如 果 只 使 用 16 位 寄存 
器 ， 也 能 成 为 在 8086 中 亦 可 执行 的 机 器 语言 。“ 纸 
娃娃 操作 系统 ”也 支持 386， 所 以 虽然 这 里 指定 的 是 
486， 但 并 不 是 386 中 束 不 能 用 。 可 能 会 有 人 问 ， 这 
里 的 386，486 都 是 什么 意思 啊 ? 我 们 来 简单 介绍 一 
下 电脑 的 CPU 〈 英 特 尔 系列 ) 家 谱 。 


8086 — 80186 — 286 — 386 — 486 — Pentium — PentiumP: 


从 上 面 的 家 谱 来 看 ，386 已 经 是 非常 古老 的 CPU 
了 。 到 286 为 止 CPU 是 16 位 ， 而 386 以 后 CPU 是 32 
位 。 


现在 ， 汇 编 这 部 分 已 经 准备 好 了 ， 下 面 来 修改 C 语 
言 吧 。 这 次 我 们 导入 了 变量 。 


本 次 的 bootpack.c 内 容 


void io hlt(void); 
void write mem8(int addr, int data); 


void HariMain(void) 


int i; /* 变 量 声明 : i 是 一 个 32 位 整数 */ 


for (i = 0Xxa6666; i <= Oxaffff; i++) { 
write _mem8(i, 15); /* MOV BYTE [i],15 */ 


} 


for (;;) { 
io hlt(); 


for 语句 是 初次 登场 它 是 循环 语句 ， 会 循环 执行 花 
fis HP 括 起 来 的 部 分 。 圆 括号 〈0) 中 写 的 是 
循环 执行 的 条 件 。 共 有 3 个 条 件 ， 各 个 条 件 之 间 以 
分 号 G) 隔 开 ， 最 初 一 个 条 件 是 初始 值 。 所 以 上 文 
第 一 个 for 语 名 中 ， 把 0xa0000 赋 值 给 ij。 任何 for 语 名 
的 初始 值 设 定语 句 总 是 要 执行 ， 这 是 C 语 言 的 规 
定 。 


下 一 个 部 分 后 <= 0xaffff* 是 循环 条 件 。for 语 句 会 判 
断 是 否 满 足 这 个 和 条件， 如果 不 满足 ， 就 跳出 “{}” 括 
起 来 的 循环 体 部 分 。 另 外 ， 这 个 部 分 在 第 一 次 执行 
时 束 要 判断 ， 所 以 ， 有 了 时候 循 环 体 部 分 有 可 能 一 次 
都 得 不 到 执行 。 不 过 这 次 的 for 语 句 中 ， 最 初 的 i 值 
是 0xa0000， 满 足 条 件 ， 所 以 循环 体 部 分 能 够 被 执 
ae 


最 后 一 个 部 分 是 ++”， 这 是 和 = i+1” 的 省 略 形式 ， 


也 就 是 i 的 值 增加 1。 这 个 语句 在 循环 体 执行 完 以 后 
肯定 要 执行 一 次 ， 然 后 判断 循环 条 件 。 


只 看 文字 说 明 不 易于 理解 ， 我 们 写成 代码 形式 来 辅 
助 说 明 。 


for (A ; B ; CHD; } 与 以 下 程序 等 价 


A; 
label: 
if (B) { 

D; 


C; 
goto label; 
} 


for 语 句 的 3 个 条 件 ， 全 都 可 以 省 略 。 这 种 情况 下 ， 
ABUSE AVE UE, TERA HR Kae AI, APAW 
WEA STB BUT 56 Ws. AMBER A. HH AE FB 
纯 的 无 限 循 环 。 我 们 在 “io_hlt0; ”处 使 用 了 这 种 循 
坏 。 


下 一 步 是 运行 “make run ”还 是 “make install” W? W 
个 都 可 以 ， 但 不 管 执 行 哪个 ， 画 和 面 都 不 是 黑屏 ， 而 
是 白 屏 。 哦 ?这 是 怎么 回 事 呢 ?” 因 为 YRAM 全 部 都 
写 入 了 15， 意 思 是 全 部 像 系 的 闫 色 都 是 第 15 种 赢 


第 15 种 颜色 碰巧 是 纯 日 ， 所 以 画面 就 成 了 白 
还 是 国 面 上 有 点 什么 变化 才 好 。 


太 好 了 ， 成 功 了 ! 但 看 不 出 来 .…… 


最 初 做 成 的 时 候 ， 还 挺 高 兴 的 ， 但 在 写 这 本 书 的 时 
候 ， 才 发 觉 这 是 一 次 失败 。 纯 和 白 的 截图 放 到 书 里 还 
一 片 白 ， 什 么 都 看 不 出 来 。 


2 条 纹 图 案 (harib01b) 


所 以 ， 为 了 在 印 成 书后 能 看 出 效果 ， 我 们 就 显示 成 
有 条 纹 的 图 案 吧 。 修 改 也 很 简单 ， 只 要 各 微 改动 一 
下 bootpack.c 就 可 以 了 。 


for (i = 96Xxa6666j i <= Oxaffff; i++) { 
write_mem8(i, i & Oxf); 


} 


哪儿 变 了 了 呢 ? 是 write mem8 那 里 。 地 址 部 分 虽然 和 
之 前 一 样 ， 但 写 入 的 值 由 15 变 成 了 i & 0x0f 。 


在 这 里 & 是“ 与? 运算， 是 数学 中 没有 的 一 种 运算 。 
很 信 以 前 ，CPU 就 不 仅 能 处 理 数值 数据 ， 还 能 处 理 
图 形 数据 。 在 处 理 图 形 数据 的 时 候 ， 加 减 乘除 这 种 
数学 上 的 计算 功能 几乎 没什么 用 。 因 为 所 处 理 的 数 
据 虽 然 是 二 进 制 数 ， 但 它们 并 不 是 作为 数字 来 使 用 
的 ， 重 点 是 0 和 1 的 排列 方式 ， 对 于 图 形 来 说 ， 这 种 
排列 方式 本 号 更 重要 。 

那么 对 于 图 形 数据 应 该 进行 什么 样 的 运算 呢 ? 可 以 
将 东 些 特定 的 位 变 为 1， 东 些 特 定 的 位 变 为 0， 或 者 
是 有 反 转 :特定 的 位 等 ， 做 这 样 的 运算 。 


“ 反 转 指 让 0 变 为 1、1 变 为 0 的 操作 ， 形 象 地 来 说 
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先 来 看 看 让 特定 位 变 成 1 的 功能 。 这 可 以 通 
过 “或 ”(OR) 运算 来 实现 。 


0100 OR 0010 > 0110 
1010 OR 0010 > 1010 


计算 “A OR B” 的 时 候 ， 每 一 位 分 别 计 算 ， 对 于 某 一 
位 ，A 和 B 的 该 位 只 要 有 一 个 是 1，“ 或 ”运算 的 结 
果 ， 该 位 就 是 1。 和 否则 (A 和 B 的 该 位 都 是 0) 结果 
就 是 0。 也 束 是 说 ， 如 果 某 个 图 像 数 据 放 在 变量 i 
里 ， 让 i 与 0010 进 行 或 运算 ，1 所 在 的 那 一 位 (从 石 
往 左 第 2 位 ) 就 一 定 会 变 为 1。 对 于 其 他 的 位 则 没有 
任何 影响 。 如 果 ;i 的 该 位 〈 从 右 往 左 第 2 位 ) 原本 就 
是 1， 则 i 不 变 。 


下 面 说 说 让 特定 位 变 成 0 的 功能 。 这 可 以 通 
过 “与 ”(AND) 运算 来 实现 。 


0100 AND 1101 > 9100 


1010 AND 1101 > 1000 


计算 “A AND B” 的 时 候 ， 也 是 每 一 位 分 别 计算 ， 对 
于 某 一 位 ，A 和 B 的 该 位 都 是 1 的 时 候 , “与 ?运算 的 
结果 ， 该 位 才 是 1， 否 则 结果 就 是 0。 也 就 是 说 ， 如 
果 某 个 图 像 数 据 放 在 变量 i 里 ， 让 i 与 1101 进 

行 “与 ?运算 ， 则 0 所 在 的 那 一 位 《从 右 往 左 第 2 位 ) 

就 一 定 会 变 为 0。 如 果 i 的 该 位 (从 石 往 左 第 2 位 〉 原 
本 就 是 0， 则 i 不 变 。 跟 “或 ”运算 不 同 ,，“ 与 ”运算 中 

不 想 改 变 的 部 分 要 设 为 1， 想 改 为 0 的 部 分 要 设 为 

0 也 就 是 说 ， 一 个 是 i 与 0010 进 行 “ 或 ”运算 ， 一 个 
是 i 与 1101 进 行 “ 与 ”运算 ) 。 这 一 点 需要 我 们 注意 。 


最 后 我 们 来 看 让 特定 位 反 转 的 功能 。 这 可 以 通 
过 “ 异 或 ”(XOR) 运算 来 实现 。 


0100 XOR 9010 > 9110 
1010 AND 0010 > 1000 


计算 “A XOR B” 的 时 候 ， 同 样 也 是 每 一 位 分 别 计 
算 ， 对 于 某 一 位 ，A 和 B 该 位 的 值 如 果 不 相 同 ,，“ 异 
或 ”运算 的 结果 ， 该 位 是 1， 否 则 就 是 0(。 也 就 是 
说 ， 如 果 某 个 图 像 数 据 放 在 变量 i 里 ， 让 i 与 0010 进 
行 “ 异 或 运算， 就 可 以 对 该 位 进行 反 转 ， 而 别 的 位 
不 受 影响 。 如 果 i 与 所 有 位 都 是 1〈( 即 0xffffffff〉 的 
数 进行 “ 异 或 ”， 则 全 部 位 都 反 转 。 


这 次 我 们 用 的 是 “与 ”(AND) 运算 。 将 地 址 值 与 
0x0f 进 行 “与 ?运算 会 怎么 样 呢 ? 低 4 位 原封 保留 ， 而 
高 4 位 全 部 都 变 成 9。 所 以 ， 写 入 的 值 是 : 


00 01 02 63 04 05 66 07 8688 69 BA OB OC 
OD OE OF 66 01 02 03 04 O5 66 ... 


就 像 这 样 ， 每 隔 16 个 像素 ， 色 号 就 反复 一 次 。 会 出 
现 什 么 效果 呢 ? 运行 一 下 “make run” 束 知道 了 。 


THO SP TAR AR ACA SR 
印 成 书 之 后 也 能 看 得 很 清楚 ， 成 功 啦 ! 


执行 后 的 结 


3 挑战 指针 Charib01c) 


前 面 说 过 “C 语 言 中 没有 直接 写 入 指定 内 存 地 址 的 语 
A)”, 实际 上 这 不 是 C 语 言 的 缺陷 ， 因 为 有 伶 代 这 种 
命令 的 语句 。 一 般 大 多 数 程序 员 主 要 使 用 那 种 蔡 代 
语句 ， 像 这 次 这 样 ， 做 一 个 函数 write_ mem8 的 ， 也 
WRAEK. MRA BRTH, KARE 


write_mem3(i, i & OxOf**); 

BMR ERIE: 

i = i & Oxef; 

两 个 语句 有 点 像 ， 但 又 不 尽 相 同 。 不 管 那么 多 了 ， 
先 换 成 后 面 一 种 写法 看 看 吧 。 好 了 ， 改 完了 ， 


用 “make run” 命 令 运行 一 下 。 唉 ? 奇怪 ， 怎 么 会 出 
错 呢 ? 


invalid type argument of ‘unary *' 
类 型 错误 ? 


没 错 ， 就 是 类 型 错误 。 这 种 写法 ， 从 本 质 上 讲 没 问 
题 ， 但 这 样 就 是 无 法 顺利 运行 。 我 们 从 编译 右 的 角 
度 稍 微 想 想 就 能 明白 为 什么 会 出 错 了 。 回 想 一 下 ， 
如 果 写 以 下 汇编 语句 ， 会 发 生 什 么 情况 呢 ? 


MOV [ 6x1234]，6x56 


是 的 ， 会 出 钳 。 这 是 因为 指定 内 存 时 ， 不 知道 到 底 

是 BYTE， 还 是 WORD， 还 是 DWORD。 只 有 在 另 

一 方 也 是 寄存 器 的 时 候 才能 省 略 ， 其 他 情况 都 不 能 

省 略 。 

ASCO E AE ACTF ASD PLB XAK, RAIE 

IET 条 C 语 句 ， 它 的 编译 结果 相当 于 下 面 的 汇 
语句 所 生成 的 机 器 语言 ， 


MOV [i], (i & exef) 


但 却 不 知道 站 到 底 是 BYTE， 还 是 WORD， 还 是 
DWORD。 刚 才 就 是 出 现 了 这 种 错误 。 


那 怎 么 才能 香 诉 计算 机 这 是 BYTE 呢 ? 


char *p; /#*， 变 量 p 是 用 于 内 存 地 址 的 专用 变量 
ai 


声明 一 个 上 面 这 样 变量 p，p 里 放 入 与 ij 相 同 的 值 ， 然 


后 执行 以 下 语句 。 

p= i & Oxef; 

这 样 ，C 编 译 器 束 会 认为 “p 是 地 址 专用 变量 ， 而 且 
是 用 于 存放 字符 (char) 的 ， 所 以 就 是 BYTE.”。 顺 
便 解 释 一 下 类 似 语句 : 


char *p; /* 用 于 BYTE 类 地 址 */ 


short *p; /* 用 于 WORD 类 地 址 */ 
int *p; /* 用 于 DWORD 类 地 址 */ 


这 次 我 们 是 一 个 字 布 一 个 字 市 地 写 入 ， 所 以 使 用 了 


char. 
既然 说 到 这 里 ， 那 我 们 再 介绍 点 相关 知识 , “char 


ji” 是 类 似 AEL 的 1 字 节 变量 , “short i:* 是 类 似 AX 的 2 
字 节 变量 , “int ij 是 类 似 EAX 的 4 字 节 变量 。 


而 不 管 是 “char *p”， 还 是 “Short *p”， 还 是 “int 
*p”， 变 量 p 都 是 4 字 节 。 这 是 因为 p 是 用 于 记录 地 
址 的 变量 。 在 汇编 语言 中 ， 地 址 也 像 ECX 一 样 ， 
用 4 字 贡 的 寄存 器 来 指定 ， 所 以 也 是 4 字 古 。 


这 样 准 备 工 作 就 OK 了 。 再 用 “make run” 运 行 一 遍 以 
下 内 容 。 


void HariMain(void) 


int i; /* 变 量 声 明 。 变 量 i 是 32 位 整数 */ 
char *p; /* 变 量 p， 用 于 BYTE 型 地 址 */ 


for (i = 90Xxa6666j i <= Oxaffff; i++) { 


p = i; /* 代 入 地 址 */ 
* 


p = i & Oxf; 


/* 这 可 以 蔡 代 write_mem8(i, i & @xOf);*/ 
} 


for (33) { 
io hlt(); 
} 


哇 ， 居 然 不 使 用 write_ mem8 就 能 显示 出 条 纹 图 案 ， 
真是 太 好 了 。 


ME? HE! 和 仔细 看 看 画面 ， 友 现 有 一 行 和 警告 。 


warning: assignment makes pointer from integer 
without a cast 


这 个 警告 的 意思 是 说 , “赋值 语句 没有 经 过 类型 转 


换 ， 由 整数 生成 了 指针 ”。 其 中 有 两 个 单词 的 意思 


不 太 明白 。 类 型 转换 是 什么 ? 指针 叉 是 什么 ? 


类 型 转换 是 改变 数值 类 型 的 命令 。 一 般 不 必 每 次 都 
注意 类 型 转换 ， 但 像 这 次 的 语句 中 ， 如 来 不 明确 进 
ITRE, Con PE ae LS BEC A aes M, 
是 不 是 写 错 了 ? ”顺便 说 一 下 ，cast 在 英文 中 的 原意 
是 压 入 模具 ， 让 材料 成 为 菜 种 特定 的 形状 。 


针 是 表示 内 存 地 址 的 数值 。C 语 言 中 不 用 “内 存 地 
址 ?这 个 词 ， 而 是 用 “指针 ”。 在 C 语 言 中 ， 普 通 数值 
和 表示 内 存 地 址 的 数值 被 认为 是 两 种 不 同 的 东西 ， 
里 然 笔者 也 和 觉得 它们 没什么 不 同 ， 但 也 只 能 接受 这 
种 设计 思想 了 。 基 于 这 种 设计 思想 ， 如 来 将 普通 整 
数值 骨 给 内 存 地 址 变量 ， 融 会 有 警告 。 为 了 避免 这 
种 情况 的 有 友 生 ， 可 以 这 样 写 : 


p = (char *) i; 


XXIIT S RER, CZ ACA RES A FFE 
整数 。《〈 其 实 这 样 转换 以 后 ， 数 值 一 点 都 没 变 ， 但 
PCa Ki, AAA A ARAN A 

Fillo ) 以 后 再 进行 这 样 的 赋值 时 ， 就 不 会 出 现 这 种 
讨厌 的 警告 了 。 于 是 我 们 这 样 修改 一 下 。 


再 运行 一 次 “make run” 吧 。 好 了 ， 不 再 出 现 那 种 烦 
人 的 警告 了 。write mem8 已 经 没 用 了 ， 所 以 可 以 将 


它 从 naskfunc.nas 中 删除 。 


这 样 的 写法 虽然 有 扩 统 疾 子 了， 但 我 们 实现 了 只 用 
C 语 言 写 入 内 存 的 功能 。 


COLUMN-2 只 要 使 用 类 型 转换 ， 就 可 以 不 用 指 
针 之 类 的 方法 吗 ? 


好 不 容易 介绍 完了 类 型 转换 ， 我 们 来 看 一 个 应 用 
实例 吧 。 如 果 定 义 : 


p = (char *) i; 

那么 将 上 式 代 入 下 面 语句 中 。 

*p = ií & Oxef; 

这 样 就 能 得 到 下 式 : 

*((char *) i) = i & Oxf; 

这 个 语句 执行 起 来 坚 无 问题 。 虽 然 读 起 来 不 是 很 
容易 理解 ， 但 这 样 可 以 不 特意 声明 p 变 量 ， 所 以 笔 
者 贫 尔 还 是 会 使 用 的 。 


有 没有 觉得 这 种 写法 与 “BYTE[i] = i & 0x0f” 有 些 
相像 吗 ? 在 特别 喜欢 汇编 语言 的 笔者 看 来 ， 会 有 
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COLUMN-3 还 是 不 能 理解 指针 
能 有 这 种 想法 ， 说 明 你 很 诚实 。 那 好 ， 我 们 再 尽 
量 详细 地 讲解 一 下 。 
如 果 你 曾经 使 用 过 C 语 言 ， 并 且 听 说 过 “指针 ”这 个 
词 ， 那 么 刚才 的 说 明 肯 定 让 你 觉得 混乱 ， 摸 不 着 
头脑 。 倒 是 那些 从 未 接触 过 C 语 言 的 人 更 能 理解 


= 


这 里 ， 特 别 重要 的 一 点 是 ， 必 须 想 点 办 法 让 C 语 
言 完成 以 下 功能 ; 


MOV BYTE [i], (i & 6x6f) 


也 就 是 ， 癌 内 存 的 第 i 号 地 址 写 入 i & 0x0f 的 计 
算 结果 。 而 程序 只 是 偶然 地 写成 了 : 


int i; 
char *p; 


p = (char *) i; 
*p = i & Oxof; 


必须 要 先 理 解 以 上 程序 。 这 可 能 与 你 所 知道 的 指 
针 的 使 用 方法 完全 不 同 ， 不 过 暂时 先 不 要 想 这 
个 。 总 之 上 面 4 行 ， 是 MOV 语 名 的 替代 物 ， 这 一 
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从 没 听 说 过 C 语 言 指针 的 人 ， 仪 仅 会 想 “ 哦 ， 原 来 
C 语 言 中 是 这 么 写 的 ， 没 那么 复杂 人 么 。” 的 确 如 
HE, BAITA ANTE 


CLLD 
下 面 再 稍微 深入 次 明 一 下 。 我 们 第 见 的 两 个 语句 
是 : 


p = (char *) i; 


*p = i & OxOFf; 
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有 的 疑问 。 将 以 上 语句 按 汇 编 的 习惯 写 一 下 吧 。 
假设 p 相 当 于 ECX， 那 么 写 出 来 就 是 : 


MOV ECX, i 
MOV BYTE [ECX], (i & Oxof) 
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值 ， 一 个 给 ECX 写 内 存 地 址 赋值 。 这 完全 是 两 回 
事 。 存 储 它 们 的 半导体 也 不 一 样 ， 一 个 在 CPU 
里 ,一 个 在 内 存心 厂 里 。 在 C 语 言 中 ， 昌 然 p 与 *p 
只 有 一 字 之 差 ， 但 意思 上 的 差别 却 如 此 之 大 。 


如 果 执 行 顺 序 调 过 来 会 怎么 样 呢 ? Tih ee AIK 
样 : 


*p = i & OxOFf; 


p = (char *) i; 


不 是 很 熟悉 指针 的 人 可 能 认为 这 样 也 行 。 但 是 ， 
区 相当 本: 


MOV BYTE [ECX], (i & 9xgof) 
MOV ECX, i 


如 果 这 么 做 ， 第 一 个 MOV 的 时 候 ，ECX 的 值 不 确 
定 ， 是 个 随机 数 ， 这 会 导致 i& 0x0f 的 结果 写 入 
内 存 的 某 个 不 可 知 的 地 址 中 。 这 样 的 后 果 很 严 
重 。 


另 一 个 比较 常见 的 疑问 ， 是 关于 声明 的 。 在 C 语 
言 中 ， 如 果 不 声 明 变 量 就 不 能 使 用 。 所 谓 声 明 ， 
就 是 类 似 “inti;” 这 种 语句 。 有 了 这 人 句 话 ， 变 量 i 就 
可 以 使 用 了 “与 此 不 同 的 是 汇编 语言 中 ，EAX， 
DL 等 ， 不 声明 也 可 以 自由 使 用 ) 。 在 C 语 言 中 ， 
声明 了 10 个 变量 ， 就 可 以 用 10 个 变量 ， 这 是 理 所 
当然 的 事 。 


既然 如 此 ， 那 为 什么 只 声明 了 “char *p;” 却 不 仪 能 
使 用 p， 还 可 以 使 用 *p 呢 ?这 让 人 搞 不 异 ...... 确 
实 ， 这 个 程序 中 ， 给 p 和 *p 赋 值 了 。 看 上 去 ， 能 够 
使 用 的 变量 数 比 实际 声明 的 变量 数 要 多 。 


过 到 这 种 情况 时 ， 我 们 先 回 到 汇编 语言 中 看 看 。 
MOV BYTE [ECX], (i & Ox0f) 


看 着 这 个 程序 ， 束 不 会 再 有 人 认为 其 中 有 2 个 变量 
了 。 其 中 只 有 一 个 ECX。 而 且 ， 同 样 是 “MOYV 
AL, [ECX]”，ECX 是 123 的 时 候 ， 和 ECX 是 124 
的 时 候 ， 放 入 AL 的 值 也 是 不 同 的 〈 只 要 这 两 处 地 
址 存放 的 不 是 同样 的 值 ) 。 这 是 因为 地 址 不 同 ， 
代表 的 内 存 区 域 不 同 。 束 好 比 不 同 的 住址 ， 住 的 
人 也 不 一 样 。 


所 以 ， 同 样 是 *p， 因 为 p 值 的 不 同 ， 记 录 的 值 也 不 
同 。 


也 束 是 说 如 果 执 行 以 上 片段 ，i 不 一 定 是 3， 因 为 
地 址 已 经 变 了 。 


费 了 半天 劲 ， 其 实 笔 者 想 说 的 就 是 ，*p 并 不 是 什 
么 变量 。 确 实 ， 我 们 可 以 给 *p 赋 值 ， 也 可 以 引用 
*p 的 值 ， 这 看 起 来 束 像 变量 一 样 。 但 即便 如 此 ， 
*p 也 不 是 一 个 变量 ， 变 量 只 有 p。 上 所 谓 郑 ， 残 相当 
于 汇编 中 BYTE [p] 这 种 语句 的 代 葵 。 


如 果 你 还 执 抛 地 说 六 是 一 个 变量 ， 那 照 这 种 好 
辑 ， 变 量 可 远 不 止 2 个 ， 还 有 很 多 很 多 。 因 为 只 要 
给 p 赋 上 不 同 的 值 ，*p 束 代表 完全 不 同 区 域 的 内 存 
内 容 。 


下 一 个 问题 也 是 关于 声明 的 : “char *p; ”声明 的 


是 *p， 还 是 p 呢 ? 


这 也 是 一 个 常见 的 问题 。 先 给 出 结论 吧 ， 声 明 的 
是 p。“ 既 然 如 此 ， 那 为 什么 不 写成 char*p; 

呢 ? ”有 这 种 想法 ， 说 明 你 这 方面 的 直觉 很 好 。 笔 
者 也 认为 这 样 写 对 于 初学 者 来 说 更 简单 易 履 。 囊 
XE, ECS HS mM chart p; ”也 可 以 ， 既 不 出 
音 ， 也 不 出 警告 ， 运 行 也 没 问 题 。 


但 这 种 写法 有 点 小 问题 。 如 果 写 成 “char* p,q;”, 

我 们 看 上 去 会 觉得 p 和 gq 都 表示 地 址 的 变量 ,， 但 C 
编译 占 却 不 那样 认为 ，q 会 补 看 作 是 一 般 的 1 字 贡 
的 变量 。 也 就 是 被 解释 成 “char *p,g”。 为 了 避免 
这 样 的 误解 ， 一 般 的 程序 员 不 写成 “char* p;”， 所 
以 笔者 也 按照 这 个 习惯 编写 程序 。 男 外 ， 如 末 想 
要 声明 两 个 地 址 变量 ， 束 写成 “char *q,*p;”。 


今天 的 专栏 写 得 好 长 呀 ， 我 们 来 整理 总 结 一 下 
吧 。 首 先 ， 本 书 中 出 现 的 “char *p;” 不 必 看 作 指 
针 ， 这 是 最 重要 的 决 守 。p 不 是 指针 ， 而 是 地 址 变 
量 。 不 要 使 用 “是 指针 ”这 种 模棱两可 的 说 法 ，“p 
是 地 址 变量 ”这 种 说 法 比较 好 。 


将 地 址 值 赋 给 地 址 变量 是 理所当然 的 。 并 且 ， 既 
然 地 址 代表 的 是 内 存 的 地 址 ， 可 以 让 该 地 址 存放 
目 己 想 放 的 任何 值 。 虽 然 也 可 以 将 地 址 变量 说 成 
是 指针 ， 但 笔者 听 到 指针 这 个 说 法 也 很 荡然 ， 所 
0 以 外 ， 笔 者 也 不 说 指针 什么 


C 语 言 中 地 址 变量 的 声明 ， 以 及 给 内 存 地 址 赋值 
的 ， 写 法 不 是 很 习惯 ,但 终 守 这 只 是 写法 的 不 
同 ， 思 考 问 题 的 方法 与 汇编 语言 着 不 多 。 在 C 语 
言 开 及 人 员 看 来 , “C 语 言 的 吨 比 汇编 语言 BYTE 
[p]， 更 短小 精怪”， 确 实 ， 简 党 是 一 个 长 处 ， 但 
就 是 因为 简洁， 才 让 初学 者 不 好 理解 。 


C 语 言 的 很 多 初学 者 都 在 学 习 指 针 时 受挫 ， 以 至 
于 会 想 “ 如 果 没 有 指针 就 好 了 ”。 而 事实 上 ， 没 有 
针 的 语言 也 确实 是 存在 的 。 但 这 种 语言 很 不 好 
用 ， 因 为 没有 指针 就 无 法 往 指 定 内 存 的 地 址 存 入 
数据 ， 那 怎么 往 VRAM 上 绘制 图 像 呢 ?这 种 语言 
只 能 让 写 操 作 系 统 变 得 更 加 困难 。 


笔者 也 认为 ，C 语 言 指 针 的 语法 很 难 理解 ， 所 以 
希望 能 改善 。 但 它 像 汇编 语言 一 样 ， 能 直接 访问 
地 址 ， 这 一 点 非常 好 。 所 以 希望 大 家 能 这 样 
“不 是 要 废除 指针 ， 而 是 把 指针 改善 得 更 直观 
易 懂 。” 


4 指针 的 应 用 (1) (harib01d) 
绘制 条 纹 图 案 的 部 分 ， 也 可 以 写成 以 下 这 样 : 


p = (char *) 6xa6666; /* 给 地 址 变量 赋值 */ 


for (i = 0; i <= Oxffff; i++) { 


*(p + 1) = i & OxOF; 


本 质 上 讲 ， 所 做 的 事 跟 之 前 一 样 。 这 里 只 是 想 说 
明 ，C 语 言 还 能 用 这 种 方法 书写 。 


5 指针 的 应 用 (2) (harib01le) 


C 语 言 中 ，* (+i) 还 可 以 改写 成 p[i 这 种 形式 ， 
所 以 以 上 捕 段 也 可 以 写成 这 样 : 


p = (char *) 9xa6666; /* 将 地 址 赋值 进去 */ 


for (i = 0; i <= Oxffff; i++) { 
p[i] = i & 6xof; 
} 


其 实 要 做 的 事 还 是 没有 什么 变化 ， 这 里 想 要 告诉 大 
家 各 种 写法 ， 今 后 可 以 根据 目 己 的 豆 好 区 别 使 用 。 


COLUMN-4 _p 扫 是 数组 吗 ? 


写 得 不 好 的 C 语 言 教 科 书 里 ， 往 往 会 说 p[ 订 是 数组 
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人 竹 。 如 末 读 者 不 异 汇 编 语言 ， 这 种 敷衍 的 说 法 是 
最 省 事 的 。 


pi]5*(p +i) 意 思 完 全 相同 。 要 是 嫌 后 者 太 长 大 
抹 烦 ， 或 者 是 为 了 看 起 来 好 看 束 会 使 用 这 种 写 
法 。 在 这 个 例子 里 ，*(p + i) 是 6 个 字符 ， 而 p[ 只 
有 4 个 字符 。 区 别 只 有 这 一 点 ， 所 以 大 家 可 以 根据 
喜好 使 用 。p 扣 不 过 是 一 个 看 起 来 像 数列 的 使 用 了 
地 址 变量 的 省 略 写法 而 已 。 


反 过 来 说 ， 也 可 以 将 p[0] 写 成 *p， 写 成 指针 的 形 
式 反倒 是 节省 了 2 个 字符 。 总 之 ， 根 据 情况 ， 按 自 
已 喜欢 的 方式 写 就 行 了 。 


不 是 说 改变 一 下 写法 ， 地 址 变量 就 变 成 数组 了 。 
REA BAAS HE FH J BOR Fs Sid So Bn PEE 
的 机 器 语言 也 完全 一 样 。 这 比 什么 都 更 能 证 明 ， 
意思 没有 变化 ， 只 是 写法 不 同 。 


说 个 题 外 话 ， 加 法 运算 可 以 交换 顺序 ， 所 以 将 *(p 
+ 写成 *(i+ p) 也 是 可 以 的 。 同 理 ， 将 p[ 写 成 i[p] 
也 是 可 以 的 (可 能 你 会 不 相信 ， 但 这 样 写 既 不 会 
出 错 ， 也 能 正常 运行 ) 。af2] 也 可 以 写成 2[a] (这 
当然 是 真 的 ) 。 难 道 还 能 说 这 是 名 为 2 的 数组 的 第 
a 个 元 素 吗 ? HAARE. PMA, pilti. ilp 
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好 了 ， 到 现在 为 止 我 们 的 话题 都 是 以 C 语 言 为 中 心 
的 ， 但 我 们 的 目的 不 是 为 了 竺 握 C 语 言 ， 而 是 为 了 
制作 操作 系统 ， 操 作 系 统 中 是 不 十 要 条 纹 图 条 之 类 
的 。 我 们 继续 来 做 操作 系统 吧 。 


可 能 大 家 马上 如 想 摘 绘 一 个 操作 系统 模样 的 国 面 ， 
但 在 此 之 前 要 先 做 一 件 事 ， 那 就 是 处 理 闫 色 问 题 。 
这 次 使 用 的 是 320x 200 的 8 位 颜色 模式 ， 色 号 使 用 8 
位 《二 进 制 ) 数 ， 也 就 是 只 能 使 用 0 一 255 的 数 。 我 
AO GAAS HA ES A Abe A, REE ZY — 
ETS EE, Are HEELS A. RE 
RGB (AKW) 方式 ， 用 6 位 十 六 进 制 数 ， 也 就 是 
24 位 《二 进 制 ) 来 指定 颜色 。8 位 数 完全 不 够 。 那 
么 ， 该 怎么 指定 #fffEf 方 式 的 颜色 呢 ? 


这 个 8 位 彩色 模式 ， 是 由 程序 员 随 意 指定 0 一 255 的 
数字 所 对 应 的 颜色 的 。 比 如 说 25 号 颜色 对 应 
#ffffff，26 号 颜色 对 应 #123456 等 。 这 种 方式 就 叫做 
调 色 板 〈palette) 。 


如 果 像 现在 这 样 ， 程 序 员 不 做 任何 设 定 ，0 号 颜色 
就 是 #000000，15 写 颜色 束 是 #ffffff。 其 他 号 人 码 的 颜 
色 ， 笔 者 也 不 是 很 清楚 ， 所 以 可 以 按照 自己 的 喜好 


来 设 定 并 使 用 。 


笔者 通过 制作 OSAKA 知 道 ， 要 想 描 绘 一 个 操作 系 
统 模样 的 画面 ，!/ 只 要 有 以 下 这 16 种 颜色 就 足够 了 。 
所 以 这 次 我 们 也 使 用 这 文 16 种 颜色 ， 并 给 它们 编 上 号 
140-15- 


#000000: = #@6ffff: 浅 亮 蓝 
#000084: la i% 

#ff6666: 亮 红 #ffffff: 和 白 
#8468684: 有 上 暗 紫 

HOOFFOO: = 2: #c6c6c6: 亮 灰 
#008484: T 暗 蓝 

#ffff66: 亮 黄 #846666: 暗 红 
#848484: 15 JK 

HOOOOFF: 7 A #008400: li 2 
#ffOOfF: = #848400: 1% TF 


所 以 我 们 要 给 bootpack.c 添 加 很 多 代码 。 


本 次 的 bootpack.c 


void io hlt(void); 

void io cli(void); 

void io out8(int port, int data); 
int io load _eflags(void); 

void io store eflags(int eflags); 


/* 就 算 写 在 同一 个 源 文件 里 ， 如 果 想 在 定义 前 使 用 ， 还 是 必须 事先 声 
H= Be tf 

void init_palette(void) ; 

void set_palette(int start, int end, unsigned char 


*rgb) ; 


void HariMain(void) 


{ 
int i; /* 声明 变量 。 变 量 i 是 32 位 整数 型 */ 
char *p; /* 变量 p 是 BYTE [...] 用 的 地 址 */ 
init_palette(); /* 设 定 调 色 板 */ 
p = (char *) @xage0e; /* 指定 地 址 */ 
for (i = ð; i <= Oxffff; i++) { 
p[i] = i & Oxf; 
} 
for (33) { 
io_hlt(); 
} 


void init_palette(void) 


{ 


static unsigned char table rgb[16 * 3] = { 
0x00, 0x00, Oxee, /* 0:¥ */ 


Oxff, 0x00, Oxe®, /* 1:4 */ 
0x00, Oxff, Oxe®, /* 2: 亮 绿 */ 
Oxff, Oxff, @xe®, /+ 3: 亮 黄 */ 
0x00, Ox@@, Oxff, /* 4: 亮 蓝 */ 
Oxff, @x@@, Oxff, /* 5: 亮 紫 */ 
0x00, Oxff, Oxff, /* 6:}RW */ 
Oxff, Oxff, Oxff, /* 7: */ 
@xc6, Oxc6, Oxc6, /* 8:50) */ 
0x84, @xee@, exee, /* 9: 暗 红 */ 


0x00, 0x84, Oxee®, /* 10: At */ 
0x84, @x84, @xee, /* 11: 暗 黄 */ 
0x00, @x0@, 0x84, /* 12: 暗 青 */ 
0x84, @x0@, 0x84, /* 13: 暗 紫 */ 
0x00, 0x84, Ox84, /* 14: iğ HE */ 
0x84, 0x84, 0x84 /* 15: 上 暗 灰 */ 

}; 

set_palette(@, 15, table rgb); 

return; 


/* (语言 中 的 static char 语 句 只 能 用 于 数据 ， 相 当 于 汇编 中 的 
DB 指令 * 


} 


void set palette(int start, int end, unsigned char 
*rgb) 
{ 
int i, eflags; 
eflags = io load eflags(); /* 记录 中 断 许 可 标志 的 值 */ 
io_cli(); /* 将 中 断 许 可 标志 置 为 8， 
蔡 止 中 断 */ 
io_out8(0x@3c8, start); 
for (i = start; i <= end; i++) { 
io_out8(0x@3c9, rgb[e@] / 4); 
io_out8(@x@3c9, rgb[1] / 4); 


io_out8(6x63c9，rgb[2] / 4); 


rgb += 3; 
} 
io store eflags(eflags); /* 复原 中 断 许 可 标志 */ 
return; 


程序 的 头 部 罗列 了 很 多 的 外 部 函数 名 ， 这 些 函 数 必 
须 在 naskfunc.nas 中 写 。 这 有 点 有 麻烦， 但 也 没 办 法 。 


先 跳 过 这 一 部 分 ， 我 们 来 看 看 主 函 数 HariMain。 涵 
数 里 只 是 增加 了 一 行 调用 调 色 板 置 置 的 函数 ， 变 更 
并 不 是 太 大 。 我 们 接着 往 下 看 。 


为 数 init_palette 开 头 一 段 以 static 开 始 的 语句 ， 虽 然 
很 长 ， 但 结果 无 非 就 是 声明 了 一 个 常数 table_rgb。 
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void init_palette(void) 


{ 
table_rgb 的 声明 ; 


set_palette(@, 15, table rgb); 
return; 


简 而 言 之 ， 就 是 这 些 内 容 。 除 了 声明 之 外 没什么 难 
点 ， 所 以 我 们 仅仅 解说 声明 部 分 。 


char a[3]; 


C 语 言 中 ， 如 果 这 样 写 ， 那 么 a 就 成 为 了 常数， 以 汇 
编 的 语言 来 讲 就 是 标志 符 。 标 志 符 的 值 当 然 就 意味 
着 地 址 。 并 且 还 准备 了 “RESB 3”。 总 结 一 下 ， 上 面 
的 叙述 就 相当 于 汇编 里 的 这 个 语句 : 


a: 
RESB 3 


nask 中 RESB 的 内 容 能 够 保证 是 0， 但 C 语 言 中 不 能 
保证 所 以 里 面 说 不 定 含 有 某 种 垃圾 数据 。 


男 外 ， 在 这 个 声明 的 后 面 加 上 “=. }”， 还 可 以 
写 上 数据 的 初始 值 。 比 如 : 


char a[3]= { 1,2,3 }; 


这 与 下 面 的 内 容 基 本 等 价 。 


char a[3]; 


这 里 ，a 和 是 表示 最 初 地 址 的 数字 ， 也 就 是 说 它 家 认 
为 是 指针 。 

那么 这 次 ， 应 该 代入 的 值 共有 16x 3=48 个 。 笔 者 不 
希望 大 家 做 如 此 多 的 赋值 语句 。 每 次 赋值 都 至 少 要 


消耗 3 个 字 节 ， 这 样 算 下 来 光 这 些 赋 值 语 句 就 要 人 花 
费 将 近 150 字 节 ， 这 太 不 值 了 。 


其 实 写成 下 面 这 样 一 般 的 DB 形式 ， 不 就 挺 好 吗 。 


table_rgb: 


DB 0x00, 0x00, 0x00, Oxff, 0x00, 0x00, 0x00, Oxff, 0x00, .. 


只 要 48 字 节 就 够 了 。 所 以 说 ， 就 像 在 汇编 语言 中 用 
DB 指令 代 从 RESB 指 令 那 样 ， 在 C 语 言 中 也 有 类 似 
的 指示 方法 ， 那 束 是 在 声明 时 加 上 static。 这 次 我 们 
OEE 


下 面 来 看 unsigned。 它 的 意思 是 : 这 里 所 处 理 的 数 
据 是 BYTE (char) 型 ， 但 它 是 没有 符号 (sign) 的 
数 〈0 或 者 正 整 数 ) 。 


char 型 的 变量 有 3 种 模式 ， 分 别 是 signed 型 、 
unsigned 型 和 未 指定 型 。signed 型 用 于 处 理 -128 一 
127 的 整数 。 它 虽然 也 能 处 理 负数 ， 扩 大 了 处 理 范 
围 ， 很 方便 ， 但 能 够 处 理 的 最 大 值 却 减 小 了 一 半 。 
unsigned 型 能 够 处 理 0 一 255 的 整数 。 未 指定 型 是 指 
没有 特别 指定 时 ， 可 由 编译 絮 决 定 是 unsigned 还 是 
signed. 


255， 我 们 想 用 它 来 表示 最 大 亮度 ， 如 果 它 被 误解 


成 负数 (0xff 会 被 误解 成 -1) WAT o BARI 
不 清楚 腕 度 比 0 还 弱 会 是 什么 概 仿 ， 但 无 论 如 何不 
能 产生 这 种 误解 。 所 以 我 们 决定 将 这 个 数 设 定 为 
unsigned。 顺 便 提 一 句 ，int 和 short 也 分 Signed 和 
unsigned. ...... 好 了 ， 关 于 init_palette 的 说 明 就 到 此 
为 止 。 


下 面 要 讲 的 是 C 语 言说 明 部 分 最 后 的 函数 
set_palette。 这 个 函数 虽然 很 短 ， 王 的 事 儿 可 不 少 。 
首先 让 我 们 仔细 看 看 以 下 精简 之 后 的 记述 吧 。 


void set_palette(int start, int end, unsigned char 
*rgb) 


int i; 

io_out8(0x@3c8, start); 

for (i = start; i <= end; i++) { 
io_out8(0x@3c9, rgb[e@] / 4); 


io_out8(@x@3c9, rgb[1] / 4); 
io_out8(@x@3c9, rgb[2] / 4); 
rgb += 3; 

} 


return; 


程序 被 如 此 精简 后 还 可 以 正确 运行 。 其 实 可 以 在 一 
开始 束 介 绍 这 个 程序 ， 但 由 于 想 给 大 家 介绍 精简 之 
前 的 正确 方法 ， 所 以 才 写 了 那么 长 。 这 个 先 放 一 


边 ， 我 们 来 说 说 精简 的 程序 吧 。 


这 个 程序 所 做 的 事情 ， 仪 仪 是 多 次 调用 io_out8。 骆 
数 io_out8 是 干什么 的 呢 ? 以 后 在 naskfunc.nas 中 还 要 
详细 说 明 ， 现 在 大 家 只 要 知道 它 是 往 指 定 闭 置 里 传 
IKE RABAT T o 


我 们 前 面 已 经 说 过 ，CPU 的 管 脚 与 内 存 相 连 。 如 果 
仅仅 是 与 内 存 相 连 ，CPU 就 只 能 完成 计算 和 存储 的 
功能 。 但 实际 上 ，CPU 还 要 对 键盘 的 输入 有 响应 ， 
要 通过 网 卡 从 网 络 取得 信息 ， 通 过 声卡 友 送 首 乐 数 
据 ， 回 软盘 写 入 信息 等 。 这 些 都 是 设备 

(device) ， 它 们 当然 也 都 要 连接 到 CPU 上 。 


既然 CPU 与 设备 相连 ， 那 么 残 有 回 这 些 设备 上 友 送 电 
信号 ， 或 者 从 这 些 设备 取得 信息 的 指令 。 同 设备 有 
送 电信 号 的 是 OUT 指 令 ; 从 设备 取得 电气 信号 的 是 
IN 指令 。 正 如 为 了 区 别 不 同 的 内 存 要 使 用 内 存 地 址 
一 样 ， 在 OUT 指 令 和 IN 指令 中 ， 为 了 区 别 不 同 的 设 
备 ， 也 要 使 用 设备 号 人 码 。 设 备 号 码 在 英文 中 称 为 
port (mA) 。port 原 意 为 “港口 ”， 这 里 形象 地 将 
CPU 与 各 个 设备 交换 电信 号 有 的 行为 比 作 了 有 船 船 的 出 
港 和 进 港 。 


所 以 ， 我 们 执行 OUT 指 令 时 ， 出 港 信 号 就 要 挥 泪 告 
别 CPU 了 。 这 就 好 像 它 在 说 :“ 妈 妈 ， 我 要 走 了 。 
我 在 显卡 中 ， 会 很 好 的 ， 不 用 担心 。” 我 想 不 用 说 
大 家 也 会 感觉 得 到 ， 在 C 语 言 中 ， 没 有 与 IN 或 OUT 
和 令 相 当 的 语句 ， 所 以 我 们 只 好 拿 汇 编 语言 来 做 
了 。 唤 ， 汇 编 真 是 关键 时 刻 显 身手 的 语言 呀 。 


如 果 我 们 读 一 读 程 序 的 话 ， 就 会 发 现 突然 中 出 了 
0x03c8、0x03c9 之 类 的 设备 写 公 ， 这 些 设备 号 代 到 
底 是 如 何 获 得 的 呢 ? 随 意 写 几 个 数字 行 不 行 呢 ?” 这 
些 号 码 当然 不 是 能 随便 乱 写 的 。 否 则 ， 别 的 什么 设 
备 衣 乱 动 作 一 下 ， 会 带 来 很 严重 的 问题 。 所 以 事先 
必须 仔细 调查 。 笔 者 的 参考 网 页 如 下 : 


http://community.osdev.info/? VGA 


网 页 的 叙述 太 长 了 ， 不 好 意思 GE: 这 一 页 也 是 笔 
者 写 的 ) 。 网 页 正中 间 那 里 ， 有 一 个 项 目 ， 叫 
做 “video DA converter”"”， 其 中 有 以 下 记述 。 

。 调 色 板 的 访问 步骤 。 

。 首先 在 一 连 串 的 访问 中 屏蔽 中 断 《〈 比 如 CLI) 。 


。 将 想 要 设 定 的 调 色 板 号 码 写 入 0x03c8， 紧 接 


着 ， 按 R，G，B 的 顺序 写 入 0x03c9。 如 果 还 想 
继续 设 定 下 一 个 调 色 板 ， 则 省 略 调 色 板 号 码 ， 
再 按照 RGB 的 顺序 写 入 0x03c9 就 行 了 。 


。 如 果 想 要 读 出 当前 调 色 板 的 状态 ， 首 先 要 将 调 
色 板 的 号 码 写 入 0x03c7， 再 从 0x03c9 读 取 3 次 。 
读 出 的 顺序 就 是 R，G，B。 如 果 要 继续 读 出 下 
一 个 调 色 板 ， 同 样 也 是 省 略 调 色 板 号 码 的 设 
定 ， 按 RGB 的 顺序 读 出 。 


。 如 果 最 初 执行 了 CLI， 那 么 最 后 要 执行 STI。 


我 们 的 程序 在 很 大 程度 上 参考 了 以 上 内 容 。 


到 这 里 ， 该 说 明 的 部 分 都 说 明 得 差不多 了 。 上 总结 一 
FIE: 


void set_palette(int start, int end, unsigned char 
*rgb) 


int i, eflags; 
eflags = io load eflags(); /* 记录 中 断 许 可 标志 的 值 
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io_cli(); /* 将 许可 标志 置 为 9， 茶 止 
中 断 */ 

己 经 说 明 的 部 分 


io_store_eflags(eflags); /* 恢复 许可 标志 的 值 */ 
return; 


在 “ 调 色 板 的 访问 步骤” 的 记述 中 ， 还 写 着 CLI、STI 
什么 的 。 下 面 来 看 看 它们 可 以 做 些 什 么 。 


首先 是 CLI 和 STI。 所 谓 CLI， 是 将 中 断 标 志 
(interrupt flag〉 置 为 0 的 指令 (clear interrupt 

flag) 。STI 是 要 将 这 个 中 靳 标志 置 为 1 的 指令 (set 
interrupt flag〉。 而 标志 ， 是 指 像 以 前 曾 出 现 过 的 进 
位 标志 一 样 的 各 种 标志 ， 也 就 是 说 在 CPU 中 有 多 种 
多 样 的 标志 。 更 改 中 断 标志 有 什么 好 处 呢 ? 正如 其 
名 所 示 ， 它 与 CPU 的 中 断 处 理 有 关系 。 当 CPU 过 到 
中 上 断 请 求 时 ， 是 立即 处 理 中 断 请求 〈 中 断 标 志 为 
1) ， 还 是 忽略 中 断 请 求 〈 中 断 标志 为 0) ， 吏 由 这 
个 中 断 标志 位 来 设 定 。 


那 到 底 什 么 是 中 断 呢 ? 大 家 可 能 会 有 这 种 疑问 ， 可 
如 果 现 在 来 讲 这 个 问题 的 话 ， 就 与 我 们 “ 摘 绘 一 个 

操作 系统 模样 的 画面 > 这 个 主题 渐 行 渐 远 了 ， 所 以 

等 以 后 有 机 会 再 讲 吧 。 


下 面 再 来 介绍 一 下 EFLAGS 这 一 特别 的 寄存 器 。 这 
是 由 名 为 FLAGS 的 16 位 寄 仔 器 扩展 而 来 的 32 位 寄存 
器 。FLAGS 是 存储 进位 标志 和 中 断 标志 等 标志 的 寄 


存 器 。 进 位 标志 可 以 通过 JC 或 JNC 等 跳 转 指令 来 简 
单 地 判断 到 底 是 0 还 是 1。 但 对 于 中 断 标 志 ， 没 有 类 
似 的 J 或 JNI 命 令 ， 所 以 只 能 读 入 EFLAGS， 再 检查 
第 9 位 是 0 还 是 1。 顺 便 说 一 下 ， 进 位 标志 是 EFLAGS 
的 第 0 位 。 


E e e e M e a e A A 


15 AS 2 
L [nr] opi or [or [ir [rr [sez f arf fre] er] 


X1 IOPL 将 第 13， 第 12 位 这 两 位 放 在 一 起 处 理 


空白 位 没有 特殊 意义 《或 许 留 给 将 来 的 CPU 


H? ) 


set_palette 中 想 要 做 的 事情 是 在 设 定 调 色 板 之 前 首先 
执行 CLI， 但 处 理 结束 以 后 一 定 要 恢复 中 断 标 志 ， 
因此 需要 记 住 最 开始 的 中 断 标志 是 什么 。 所 以 我 们 
制作 了 一 个 函数 io_load_eflags， 读 取 最 初 的 eflags 
值 。 处 理 结束 以 后 ， 可 以 先 看 看 eflags 的 内 容 ， 再 
决定 是 人 否 执行 STI， 但 仔细 想 一 想 ， 也 没 必 要 搞 得 
那么 复杂 ， 干 肪 将 eflags 的 值 代入 EFLAGS， 中 断 标 
志 位 就 恢复 为 原来 的 值 了 。 琐 数 o_store_eflags 残 是 
完成 这 个 处 理 的 。 


估计 不 说 大 家 也 知道 了 ，CLI 也 好 ，STI 也 好 ， 
EFLAGS 的 读 取 也 好 ，EFLAGS 的 写 入 也 好 ， 都 不 
能 用 C 语 言 来 完成 。 所 以 我 们 就 努力 一 下 ， 用 汇编 
ek Slee 


我 们 已 经 解释 了 bootpack.c 程 序 ， 那 么 现在 就 来 说 


说 naskfunc.nas。 


3 naskfunc 


; TAB=4 

[FORMAT "WCOFF"] ; 制作 目标 文件 的 模式 
[INSTRSET "i486p"] ; 使 用 到 486 为 止 的 指令 
[BITS 32] ; 制作 32 位 模式 用 的 机 器 语 
[FILE "naskfunc.nas"] ; 源 程 序 文 件 名 


GLOBAL _io hlt, io cli, io sti, io stihlt 
GLOBAL io in8, _io in16, _io in32 

GLOBAL _io out8, _io out16, _io out32 
GLOBAL _io load eflags, _io store eflags 


[SECTION .text] 


_io hlt: ; void io hlt(void); 
HLT 
RET 


_io_cli: ; void io_cli(void); 
CLI 
RET 


_io sti: ; void io sti(void); 
STI 
RET 


_io_stihlt: ; void io_stihlt(void); 


STI 


HLT 
RET 

_io_in8: ; int io_in8(int port); 
MOV EDX, [ESP+4] ; port 
MOV EAX, 0 
IN AL,DX 
RET 

_io in16:  ; int io_in16(int port); 
MOV EDX, [ESP+4] ; port 
MOV EAX, 0 
IN AX,DX 
RET 

_io_in32:  ; int io_in32(int port); 
MOV EDX, [ESP+4 |] 3 port 
IN EAX, DX 
RET 

_io out8: ; Void io out8(int port, int data); 
MOV EDX, [ESP+4 ] 3 port 
MOV AL, [ESP+8 ] ; data 
OUT DX, AL 
RET 


_io out16: ; void io _out16(int port, int data); 


MOV EDX, [ESP+4 | 3 port 
MOV EAX, [ESP+8 ] ; data 
OUT DX, AX 

RET 


_io_out32: ; void io_out32(int port, int data); 
MOV EDX, [ESP+4 | 3 port 


MOV EAX, [ESP+8 | ; data 


OUT DX, EAX 
RET 
_io_load_eflags: ; int io load eflags(void); 
PUSHFD ; 指 PUSH EFLAGS 
POP EAX 
RET 
_io store eflags: ; Void io store eflags(int eflags); 
MOV EAX, [ESP+4] 
PUSH EAX 
POPFD ; 指 POP EFLAGS 
RET 


到 现在 为 止 的 说 明 ， 想 必 大 家 都 已 经 懂 了 ， 尚 且 需 
要 说 明 的 只 有 与 EFLAGS 相 关 的 部 分 了 。 如 果 

有 “MOYV EAX,EFLAGS” 之 类 的 指令 就 简单 了 ， 但 
CPU 没有 这 种 指令 。 能 够 用 来 读 写 EFLAGS 的 ， 只 


有 PUSHFD 和 POPFD 指 令 。 


PUSHFD 是 “push flags double-word” 的 缩写 ， 意 思 是 
将 标志 位 的 值 按 双 字 长 压 入 栈 。 其 实 它 所 做 的 ， 无 
非 就 是 “PUSH EFLAGS”。POPFD 是 “pop flags 
double-word” 的 缩写 ， 意 思 是 按 双 字 长 将 标志 位 从 
栈 弹 出 。 它 所 做 的 ， 就 是 “POP EFLAGS”。 


栈 是 数据 结构 的 一 种 ， 大 家 暂时 只 要 理解 到 这 个 程 


度 束 够 了 。 往 栈 登 录 数 据 的 动作 称 为 push〈 推 ) ， 
请 想象 一 下 往 烤 箱 里 放 面 包 的 情景 。 从 栈 里 取出 数 
据 的 动作 称 为 pop〈 弹 出 ) 。 


也 就 是 说 ，“PUSHFD POP EAX”， 是 指 首先 将 
EFLAGS 压 入 栈 ， 再 将 弹出 的 值 代 入 EAX。 上 所 以 说 
它 代 替 了 “MOVEAX,EFLAGS”。 另 一 方面 ，PUSH 
EAX POPFD 正 与 此 相反 ， 它 相当 于 “MOV 
EFLAGS,EAX”. 


不 能 直接 给 


EFLAGS 


最 后 要 讲 的 是 io_load_eflags。 它 对 我 们 而 言 ， 是 第 
一 个 有 返回 值 的 函数 的 例子 ， 但 根据 C 语 言 的 规 
约 ， 执 行 RET 语 句 时 ，EAX 中 的 值 就 被 看 作 是 函数 
的 返回 值 ， 所 以 这 样 就 可 以 。 

另外 ， 虽 然 还 有 几 个 函数 是 不 必要 的 ， 但 因为 将 来 
会 用 到 ， 上 所 以 这 里 惑 顺 便 做 了 。 虽 然 不 知道 什么 时 
候 用 ， 用 于 什么 目的 ， 但 通过 到 目前 为 止 的 讲解 也 
能 明白 其 中 的 音义。 


好 了 ， 讲 解 完了 以 后 执行 一 下 吧 。 运 行 “make 
run”。 和 条纹 的 图 案 没 有 变化 ， 但 两 色 变 了 ! 成 功 


了 ! 


仔细 看 看 ， 颜 色 可 不 一 样 哟 


7 绘制 定形 (harib01g) 


颜色 备 齐 了 ， 下 面 我 们 来 画 * 画 ” 吧 。 首 先 从 VRAM 
与 画面 上 的 “点 ”的 关系 开始 说 起 。 在 当前 画面 模式 
中 ， 画 面 上 有 320x200 (=64 000) 个 像素 。 假 设 左 
上 点 的 坐标 是 00,0) ， 右 下 点 的 坐标 是 
(319,319) ， 那 么 像素 坐标 (x,y) 对 应 的 VRAM 
地 址 应 按 下 式 计 算 。 


9xa6669 + x + y * 320 


其 他 画面 模式 也 基本 相同 ， 只 是 0xa0000 这 个 起 始 
地 址 和 y 的 系数 320 有 些 不 同 。 


根据 上 式 计算 像素 的 地 址 ， 往 该 地 址 的 内 存 里 存放 
东 种 颜色 的 号 码 ， 那 么 国 面 上 该 像 际 的 位 置 就 出 现 
相应 的 颜色 。 这 样 就 男 出 了 一 个 点 。 继 续 增 加 X 的 
值 ， 循 环 以 上 操作 ， 怠 能 国 一 条 长 长 的 水 平生 线 。 
再 问 下 循环 这 条 直线 ， 隐 能 够 男 很 多 的 直线 ， 组 成 
一 个 有 填充 色 的 长 方形 。 


根据 这 种 思路 ， 我 们 制作 了 函数 boxfil8。 源 程序 就 
是 bootpack.c。 并 且 在 程序 HariMain 中 ， 我 们 不 再 画 
ROA, MEEK SRK, ISSA. tH 
不 知 能 不 能 正常 运行 ， 我 们 来 “make run” 看 看 。 


哦 ， 好 像 成 功 了 。 


本 次 的 bootpack.c 节 选 


#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 


COL8_666666 
COL8_FF6666 
COL8_66FF66 
COL8_FFFF66 
COL8_6666FF 
COL8_FF66FF 
COL8_66FFFF 
COL8_FFFFFF 
COL8_C6C6C6 
COL8_ 840000 
COL8 008400 
COL8_ 848400 
COL8_000084 
COL8 840084 
COL8 908484 
COL8 848484 


void HariMain(void) 


{ 


WON AU BWNEF O 


PRPRPPP RB 
uBR WNP © 


char *p; /* pp 变量 的 地 址 */ 

init_palette(); /* 设置 调 色 板 */ 
p = (char *) 6xa6666; /* 将 地 址 赋值 进去 */ 
boxfill8(p, 320, COL8 FF6668， 20, 


boxfill8(p, 320, COL8 @@FFee, 70, 
boxfill8(p, 320, COL8 @@Q@FF, 120, 


20, 120, 120); 
50, 170, 150); 
80, 220, 180); 


for (33) { 
io_hl1t(); 


} 


void boxfill8(unsigned char *vram, int xsize, unsigned 
char c, int x@, int y@, int x1, int y1) 
{ 
int x, y; 
for (y = y6j y <= y1; y++) { 
for (x = x0; x <= x1; x++) 
vram[y * xsize + x] = C; 


} 


return; 


il 了 3 个 矩形 哦 


这 次 新 出 现 了 #define 声 明 方 式 ， 它 用 来 表示 负数 声 
明 。 要 记 住 哪 种 色 扎 对 应 哪 种 颜色 实在 太 厅 烦 了 ， 
所 以 为 了 便于 理解 ， 做 了 以 上 声明 。 


8 今天 的 成 果 (harib01h) 


我 们 已 经 努力 到 现在 了 ， 再 加 最 后 一 把 劲 儿 。 这 次 
我 们 只 修改 HariMain 程 序 。 让 我 们 看 看 执行 结果 会 
是 什么 样 呢 ? 


本 次 的 HariMain 


void HariMain(void) 


{ 

char *vram; 

int xsize, ysize; 

init_palette(); 

vram = (char *) @xaQe@ee; 

xsize = 320; 

ysize = 200; 

boxfill8(vram, xsize, COL8 008484, @, ð, 
xsize - 1, ysize - 29); 

boxfill8(vram, xsize, COL8_C6C6C6, 2, 
ysize - 28, xsize - 1, ysize - 28); 

boxfill8(vram, xsize, COL8 FFFFFF, 6， 
ysize - 27, xsize - 1, ysize - 27); 

boxfill8(vram, xsize, COL8 _C6C6C6, 2, 
ysize - 26, xsize - 1, ysize - 1); 

boxfill8(vram, xsize, COL8 FFFFFF, 3, 
ysize - 24, 59, ysize - 24); 

boxfill8(vram, xsize, COL8 FFFFFF, 2, 
ysize - 24, 2, ysize - 4); 


boxfill8(vram, xsize, COL8 848484, 3, 


ysize - 4, 59, ysize - 4); 
boxfill8(vram, xsize, COL8 848484, 59, 


ysize - 23, 59, ysize - 5); 
boxfill8(vram, xsize, COL8_000000, 2, 
ysize - 3, 59, ysize - 3); 
boxfill8(vram, xsize, COL8 900000, 60, 
ysize - 24, 60, ysize - 3); 


boxfill8(vram, xsize, COL8 848484, xsize - 47, 


ysize - 24, xsize - 4, ysize - 24); 

boxfill8(vram, xsize, COL8 848484, xsize - 47, 
ysize - 23, xsize - 47, ysize - 4); 

boxfill8(vram, xsize, COL8 FFFFFF, xsize - 47, 
ysize - 3, xsize - 4, ysize - 3); 

boxfill8(vram, xsize, COL8 FFFFFF, xsize - 3, 
ysize - 24, xsize - 3, ysize - 3); 

for (33) { 

io_hlt(); 
} 


a i 
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任务 条 (task bar) 有 点 大 了 ， 这 是 因为 像素 数 太 少 
的 缘故 吧 。 但 很 有 进步 ， 已 经 有 点 操作 系统 的 样子 
了 。 总 算 到 了 这 一 步 。 从 什么 都 不 会 开始 ， 到 现在 
只 用 了 四 天 。 咖 ， 王 得 不 错 呆 。 现 在 的 haribote.sys 
是 1216 字 节 ， 大 概 是 1.2KB 吧 。 虽 然 这 个 操作 系统 
很 小 ， 但 已 经 有 这 么 多 功能 了 。 好 ， 今 天 先 到 此 为 
止 ， 明 天 再 见 啦 。 


第 5 天 结构 体 、 文 字 显 示 与 
GDT/IDT 初 始 化 


。 接收 局 动 信息 (harib02a) 

试用 结构 体 (harib02b) 

试用 箭头 记号 (harib02c) 
显示 字符 (Charib02d ) 

增加 字体 (harib02e) 

显示 字符 嘻 〈harib02f ) 

显示 变量 值 (harib02g) 

显示 鼠标 指针 (harib02h) 
GDT 与 IDT 的 初始 化 (harib02i) 


1 接收 局 动 信息 Charib02a) 


我 们 今天 从 哪儿 开始 讲 呢 ? 现在 “ 纸 娃娃 操作 系 
统 ” 的 外 观 已 经 有 了 很 大 的 进步 ， 所 以 下 面 做 些 内 
Hb LEA 


到 昨天 为 止 ， 在 bootpack.c 里 的 ， 都 是 将 0xa0000 
呀 ，320、200 等 数字 直接 写 入 程序 ， 而 本 来 这 些 值 
应 该 从 asmhead.nas 先 前 保存 下 来 的 值 中 取 。 如 采 不 
这 样 做 的 话 ， 当 画面 模式 改变 时 ， 系 统 束 不 能 正确 
IBAT o 

Pr DA BATT aot ah 6 FS FRET ORAM HE. SIAE 
下 ，binfo 是 bootinfo 的 缩写 ，scrn 是 screen (h ) 
的 缩写 。 
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void HariMain(void) 


char *vram; 

int xsize, ysize; 

short *binfo_scrnx, *binfo_scrny; 
int *binfo_vram; 


init_palette(); 
binfo_scrnx = (short *) Oxeff4; 
binfo_scrny = (short *) Oxeff6; 


binfo_vram = (int *) Oxe@ff8; 
xsize = *binfo_scrnx; 
ysize = *binfo_scrny; 
vram = (char *) *binfo_vram; 


这 里 出 现 的 0x0ff4 之 类 的 地 址 到 底 是 从 哪里 来 的 
We? 其 实 这 些 地 址 仅仅 是 为 了 与 asmhead. nas 保 持 
一 致 才 出 现 的 。 


另外 ， 我 们 把 显示 画面 背景 的 部 分 独立 出 来 ， 单 独 
做 成 一 个 函数 init _screen。 独 立 的 功能 做 成 独立 的 
函数 ， 这 样 程 序 恋 起 来 要 容易 一 些 。 


好 了 ， 做 完了 。 执 行 一 下 吧 。.….. 咽 ， 暂 时 好 像 没 
什么 问题 。 只 是 没什么 意思 ， 因 为 画面 显示 内 容 没 


有 变化 。 


2 试用 结构 体 (harib02b ) 


上 面 的 方法 倒 也 不 能 说 不 好 ， 只 是 代码 的 行 数 多 了 
些 ， 不 太 令 人 满意 。 而 如 果 采 用 之 前 的 COLUMN-2 
里 (第 4 章 ) 的 写法 : 


xsize = *((short *) Ox@ff4); 


程序 长 度 是 变 短 了， 但 这 样 的 写法 看 起 来 束 像 是 使 
， 了 什么 特殊 技巧 。 我 们 还 是 答 试 一 下 更 普通 的 号 
法 吧 。 


AS YX KJ HariMain T 4 


struct BOOTINFO { 
char cyls, leds, vmode, reserve; 
short scrnx, scrny; 
char *vram; 


F3 


void HariMain(void) 

{ 
char *vram; 
int xsize, ysize; 
struct BOOTINFO *binfo; 


init_palette(); 

binfo = (struct BOOTINFO *) Ox@ffe; 
xsize = (*binfo).scrnx; 

ysize = (*binfo).scrny; 


vram = (*binfo).vram; 


我 们 写成 了 上 面 这 种 形式 。struct 是 新 语句 。 这 里 第 
一 次 出 现 结构 体 ， 或 许 有 人 不 太 理 解 ， 如 条 不 明日 
的 话 请 一 定 看 看 后 面 的 专栏 。 


最 开始 的 struct 命 令 只 是 把 一 串 变 量 声明 集中 起 来 ， 
统一 叫做 “struct BOOTINFO”。 最 初 是 1 字 节 的 变量 
cyls， 接 着 是 1 字 节 的 变量 leds， 照 此 下 去 ， 最 后 是 
vram。 这 一 串 变 量 一 共 是 12 字 节 。 有 了 这 样 的 声 
明 ， 以 后 “struct BOOTINFO” 就 可 以 作为 一 个 新 的 
变量 类 型 ， 用 于 各 种 场合 ， 可 以 像 int、char 那 样 的 
变量 类 型 一 样 使 用 。 


这 里 的 *binfo 束 是 这 种 类 型 的 变量 ， 为 了 表示 其 中 

的 scrnx， 使 用 了 (*binfo) .scrnx 这 种 写法 。 如 果 不 
加 括号 直接 写成 *binfo.scrnx， 虽 然 更 容易 懂 ， 但 编 
译 器 会 误解 成 * (binfo.scrnx) ， 出 现 错误 。 所 以 ， 

括号 虽然 不 太 好 看 ， 但 不 能 省 略 。 


COLUMN-5 结构 体 的 简单 说 明 


5.2 贡 "里 的 这 种 结构 体 的 使 用 方法 ， 比 较 特 殊 。 
我 们 先 看 一 个 普通 的 例子 。 


:第 5 天 的 第 2 小 市 。 一 一 详 者 注 


普通 的 结构 体 使 用 方法 


void HariMain(void) 


{ 


struct BOOTINFO abc; 


abc.scrnx = 320; 
abc.scrny = 200; 
abc.vram = Oxa0606060; 


(以 下 上 略 》 


先 定 义 一 个 新 结构 体 变量 abc， 然 后 再 给 这 个 结构 
体 变量 的 各 个 元 素 赋 值 。 结 构 体 的 好 处 是 ， 可 以 
像 下 面 这 样 将 各 种 东西 都 一 股 脑 儿 地 传递 过 来 。 


func(abc) ; 


如 果 没 有 结构 体 ， 就 只 能 将 各 个 参数 一 个 一 个 地 
传递 过 来 了 。 


func(scrnx, scrny, vram, ...)3; 

所 以 很 多 时 候 会 将 有 茶 种 意义 的 数据 都 归纳 到 一 
个 结构 体 里 ， 这 样 就 方便 多 了 。 但 如 采 归 纳 方法 
搞 错 了 ， 反 而 市 来 更 多 麻烦 。 

为 了 让 程序 能 一 看 就 慎 ， 要 这 样 写 结构 体 的 内 部 
变量 : 在 结构 体 变量 名 的 后 面 加 一 个 点 OD, A 


后 再 写 内 部 变量 名 ， 这 是 规则 。 
TT 


下 一 步 是 使 用 指针 。 这 是 5.2 市 中 的 使 用 方法 。 声 
明 方 法 如 下 : 


变量 类 型 名 * 指 针 变 量 名 ; (回想 一 下 char *p;) 


而 这 次 的 变量 类 型 是 struct BOOTINFO， 变 量 名 是 
binfo， 所 以 写成 如 下 形式 : 


struct BOOTINFO *binfo; 


这 里 的 binfo 表 示 指 针 变 量 。 地 址 用 4 个 字 节 来 表 
示 ， 所 以 binfo 是 4 字 节 变量 。 


因为 是 指针 变量 ， 所 以 应 该 首先 给 指针 赋值 ， 否 
则 就 不 知 站 要 往 哪 里 谈 写 了 。 可 以 写成 下 面 这 
样 : 

binfo = (struct BOOTINFO *)@x@ffO; 


本 来 想 写 “binfo =0x0ff0;” 的 ， 但 由 于 总 出 警告 ， 
很 讨厌 ， 所 以 我 们 就 进行 了 类 型 转换 。 


设 是 了 指针 地 址 以 后 ， 这 12 个 字 市 的 结构 体 用 起 


来 就 没 问 题 了。 这 样 我 们 可 以 不 再 直接 使 用 内 存 
地 址 ， 而 是 使 用 *binfo 来 表示 这 个 内 存 地 址 上 12 
字 节 的 结构 体 。 这 与 “char *p;” 中 的 *p 表 示 p 地 址 
的 1 字 节 是 同样 道理 。 


前 面 说 过 ， 想 要 表示 结构 体 abc 中 的 scrnx 时 ， 束 用 
abc.scrnx。 与 此 类 似 ， 这 里 用 (*binfo).scrnx 来 表 
示 。 需 要 括号 的 理由 在 5.2 节 中 已 经 写 了 。 因 此 语 
4 ay 


xsize = (*binfo).scrnx; 


3 试用 箭头 记 亏 Charib02c) 


事实 上， 在 C 语 言 里 第 第 会 用 到 类 似 于 

(*binfo) .scrmx 的 表现 手法 ， 因 此 出 现 了 一 种 不 使 
用 插 与 的 省 略 表 现 方 式 ， 妈 binfo -scrnx， 我 们 称 之 
为 箭头 标记 方式 。 前 面 也 讲 到 过 ，a[i 是 * (a +i) 
的 省 略 表 现形 式 所 以 可 以 说 C 语 言 中 关于 指针 的 省 
略 表 现形 式 很 充实 ， 很 丰富 。 


使 用 箭头 ， 可 以 将 “xsize = (*binfo).scrnx;” 写 
i“xsize = binfo—>scrnx; ”， 人 简单 又 方便 。 不 过 我 
们 还 想 更 简洁 些 ， 即 连 变 量 xsize 都 不 用 ， 而 是 直接 


以 binfo 一 >scrnx 来 代替 xsize。 


AS YX AJ HariMain T 
void HariMain(void) 


{ 
struct BOOTINFO *binfo = (struct BOOTINFO *) 
Oxef fe; 


init_palette(); 
init_screen(binfo->vram, binfo->scrnx, binfo- 
>scrny) ; 


哦 ， 看 上 去 真 清 碍 。 我 们 运行 一 下 “make run”, ie 
行 正 常 。 


这 次 我 们 想 了 很 多 方法 ， 但 这 些 都 只 是 C 语 言 写 法 
的 问题 ， 编 译 成 机 器 语言 以 后 ， 几 乎 没有 差别 。 既 
然 没 有 差别 ， 笔 者 认为 写 得 清晰 一 些 没什么 坏处 ， 
所 以 决定 今后 积极 使 用 这 种 写法 。 讨 厌 在 写法 上 花 
工夫 的 人 不 使 用 结构 体 也 没关系 ， 再 退 一 步 ， 还 可 
以 不 用 指针 ， 继 续 使 用 write_mem8 什 么 的 也 没 问 
题 。 可 以 根据 目 己 的 理解 程度 和 习惯 ， 选 择 上 自己 喜 
欢 的 方式 。 


4 显示 字符 Charib02d) 


内 部 的 处 理 差 不 多 了 ， 我 们 还 是 将 重点 放 回 到 外 部 
显示 上 来 吧 。 到 昨天 为 止 ， 我 们 算是 画 出 了 一 幅 稍 
微 像 样 的 画 ， 今 天 就 来 在 画面 上 写字 。 以 前 我 们 显 
示 字 符 主 要 靠 调 用 BIOS 函 数 ， 但 这 次 是 32 位 模式 ， 
不 能 再 依赖 BIOS 了 ， 只 能 自力 更 生 。 


那么 怎么 显示 字符 呢 ? 字符 可 以 用 8x16 的 长 方形 像 
际 点 阵 来 表示 。 想 象 一 个 下 图 左边 的 数据 ， 然 后 投 
下 图 右边 所 示 的 方法 置换 成 0 和 1， 这 个 方法 好 像 不 
错 。 然 后 根据 这 些 数据 在 画面 上 打上 点 就 肯定 能 显 
示 出 字符 了 。8“ 位 ”是 一 个 字 节 ， 而 1 个 字符 是 16 个 
字 节 。 


00000000 
00011000 
00011000 
00011000 
00011000 
00100100 
00100100 
00100100 
00100100 
01111110 
01000010 
01000010 
01000010 
11100111 
00000000 
00000000 


字符 的 原形 ? 


大 家 可 能 会 有 各 种 想法 ， 比 如 “我 觉得 8x16 的 字 太 
小 了 ， 想 显示 得 更 大 一 些 "”、“ 还 是 小 后 儿 的 字 
好 ”等 。 不 过 刚 开 始 我 们 束 先 这 样 吧 ， 一 上 来 要 求 
太 多 的 话 ， 束 没有 办 法 往 前 进展 了 。 


像 这 种 描 国文 字形 状 的 数据 称 为 字体 Cont) 数 
据 ， 那 这 种 字体 数据 是 怎样 写 到 程序 里 的 呢 ? 有 一 
种 临时 方案 : 


static char font_A[16] = { 


0x00, 0x18, 0x18, 0x18, 0x18, 0x24, 0x24, 0x24, 
0x24, Ox7e, 0x42, 0x42, 0x42, Oxe/7, 0x00, 0X00 
}; 


其 实 这 仅仅 是 将 刚才 的 0 和 1 的 排列 ， 重 写成 十 六 进 
制 数 而 已 。C 语 言 无 法 用 二 进 制 数 记 录 数 据 ， 只 能 
写成 十 六 进 制 或 八进制 。 嗯 ， 读 起 来 真 沉 劲 呀 。 嫌 
字体 不 好 看 ， 想 手动 修正 一 下 ， 都 不 知道 到 的 需 要 
修改 哪儿 。 但 是 暂时 束 先 这 样 吧 ， 以 后 再 考虑 这 个 
问题 。 


数据 齐备 之 后 ， 只 要 插画 到 画面 上 束 可 以 了 。 用 for 
语句 将 画 8 个 像素 的 程序 循环 16 届 ， 残 可 以 显示 出 
一 个 字符 了 。 于 是 我 们 制作 了 下 面 这 个 函数 。 


void putfont8(char *vram, int xsize, int x, int y, char 
c, char *font) 


{ 
int i; 
char d; /* data */ 
for (i = 0; i < 16; i++) { 
d = font[i]; 
if ((d & 0x80) != @) { vram[(y + i) * xsize + x 
+ @] = c; } 
if ((d & 0x40) != @) { vram[(y + i) * xsize + x 
+ 1] = c3 } 
if ((d & 0x20) != @) { vram[(y + i) * xsize + x 
+ 2] = c3 } 
if ((d & 0x10) != @) { vram[(y + i) * xsize + x 
+ 3] = C; 


> } 
if ((d & 0x08) != ð) { vram[(y + i) * xsize + x 
+4) =c; } 


if ((d & 6x64) != @) { vram[(y + i) * xsize + x 
+ 5] = 5 } 
if ((d & 0x02) != 86) { vram[(y + i) * xsize + x 
+ 6] = c;} 
if ((d & 0x01) != ©) { vram[(y + i) * xsize + x 
+ 7 = Gs: 


return; 


if 语句 是 第 一 次 登场 ， 我 们 来 介绍 一 下 。if 语 句 先 检 
查 “()” 内 的 条 件 式 ， 当 条 件 成 立时 ， 就 执行 “{}” 内 
的 语句 ， 条 件 不 成 立时 ， 什 么 都 不 做 。 


& 是 以 前 曾 出 现 过 的 AND (“55”) 运算 符 。0x80 也 
就 是 二 进 制 数 10000000， 它 与 d 进 行 “ 与 ”运算 的 结 

果 如 果 是 0， 束 说 明 d 的 最 左边 一 位 是 0。 反 之 ， 如 

果 结 果 不 是 0， 则 d 的 最 左边 一 位 就 是 1。“!=” 是 不 等 
于 的 意思 ， 在 其 他 语言 中 ， 有 时 写作 “<>”。 


虽然 这 样 也 能 显示 出 “A? 来 ， 但 还 是 把 程序 稍微 整 
理 一 下 比较 好 ， 因 为 现在 的 程序 义 长 运行 速度 叉 


ex 


void putfont8(char *vram, int xsize, int x, int y, char 
c, char *font) 


{ 


int i; 


char *p, d /* data */; 

for (i = ð; i < 16; i++) { 
p = vram + (y + i) * xsize + x; 
d = font[i]; 


if ((d & @x80) != @) { p[@] = c; } 
if ((d & 0x40) != @) { p[1] =c; } 
if ((d & 0x20) != ©) { p[2] =c; } 
if ((d & 0x10) != @) { p[3] = c; } 
if ((d & 0x08) != @) { p[4] =c; } 
if ((d & 0x04) != @) { p[5] = c; } 
if ((d & 0x02) != @) { p[6] = c; } 
if ((d & 0x01) != @) { p[7] =c; } 


} 


return; 


OREM SS, RATNA X BPE Pe o 


“PB ELK BE tk A 2] bootpack.c# Er., K 
家 仔细 看 看 ， 如 果 顺 利 的 话 ， 能 显示 出 字符 “A”。 
紧张 激动 的 时 刻 到 了 ， 运 行 “make run”. MR, “A” sD 
示 出 来 了 ! 


5 增加 字体 (harib02e) 


虽然 字符 “A” 显 示 出 来 了 ， 但 这 上 段 程序 只 能 显 

示 “A” 而 不 能 显示 别 的 字符 。 所 以 我 们 需要 很 多 别 

的 字体 来 显示 其 他 字符 。 英 文字 母 就 有 26 个 ， 分 别 
有 大 写 和 小 写 ， 还 有 10 个 数字 ， 再 加 上 各 种 符号 肯 
定 超过 30 个 了 。 啊 ， 还 有 很 多 ， 太 有 奈 烦 了 ， 所 以 我 
们 决定 沿用 OSASK 的 字体 数据 。 当 然 ， 我 们 暂时 还 
不 考虑 显示 汉字 什么 的 。 这 些 复杂 的 东西 ， 留 待 以 
后 再 做 。 现 在 我 们 集中 精力 解决 字母 显示 的 问题 。 


另外 ， 这 里 沿用 的 OSASK 的 字体 ， 其 作者 不 是 笔 
者 ， 而 是 平 木 敬 太 即 先 生 和 圣人 (Kiyoto) 先生 。 
事先 已 经 从 他 们 那里 得 到 了 使 用 许可 权 ， 所 以 可 以 
目 由 使 用 这 种 字体 。 


我 们 这 次 就 将 hankaku.txt 这 个 文本 文件 加 入 到 我 们 
的 源 程序 大 家 性 中 来 。 这 个 文件 的 内 容 如 下 : 


hankaku.txt 的 内 容 


char @x41 


这 比 十 六 进 制 数 和 只 有 0 和 1 的 二 进 制 数 都 容易 看 一 


些 。 
EEHEHE 


当然 ， 这 既 不 是 C 语 言 ， 也 不 是 汇编 语言 ， 所 以 需 
要 专用 的 编译 器 。 新 做 一 个 编译 器 很 厂 烦 ， 所 以 我 
们 还 是 使 用 在 制作 OSASK 时 曾经 用 过 的 工具 
(makefont.exe) 。 说 是 编译 上 器， 其 实 有 点 言 过 其 
实 了 ， 只 不 过 是 将 上 面 这 样 的 文本 文件 (256 个 字 
符 的 字体 文件 ) 读 进 来 ， 然 后 输出 成 16x256=4096 
字 节 的 文件 而 已 。 


编译 后 生成 hankaku.bin 文 件 ， 但 仅 有 这 个 文件 还 不 
能 与 bootpack.obj 连 接 ， 因 为 它 不 是 目标 Cobj) X 
件 。 所 以 ， 还 要 加 上 连接 所 必需 的 接口 信息 ， 将 它 
变 成 目标 文件 。 这 项 工作 由 bin2obj.exe 来 完成 。 它 


的 功能 是 将 所 给 的 文件 自动 转换 成 目标 程序 ， 束 像 
将 源 程序 转换 成 汇编 那样 。 也 就 是 说 ， 好 像 将 下 面 
这 两 行程 序 编译 成 了 汇编 : 

eer ( 共 4096 字 节 ) 


当然 ， 如 果 大 家 不 喜欢 现在 这 种 字体 的 话 ， 可 以 随 
便 修改 hankaku.txt。 本 书 的 中 心 任 务 是 自制 操作 系 
统 ， 所 以 字体 就 由 大 家 自己 制作 了 。 


各 种 工具 的 使 用 方法 ， 请 参阅 Makefile 的 内 容 。 
为 不 是 很 难 ， 这 里 束 不 再 谨 明 了 。 

如 采 在 C 语 言 中 使 用 这 种 字体 数据 ， 只 需要 写 上 以 
下 语句 残 可 以 了 。 

extern char hankaku[4696 ] ; 


像 这 种 在 产程 序 以 外 准备 的 数据 ， 都 需要 加 上 
extern 属性。 这 样 ，C 编 译 硕 就 能 够 知道 它 是 外 部 数 
据 ， 并 在 编译 时 做 出 相应 调整 。 


|} tf fy 
OSASK 的 字体 数据 ， 依 照 一 般 的 ASCII 字 符 编 码 ， 


含有 256 个 字符 。A 的 字符 编码 是 0x41， 所 以 A 的 字 
体 数 据 ， 放 在 自 “hankaku + 0x41 * 16” 开 始 的 16 字 


节 里 。C 语 言 中 A 的 字符 编码 可 以 用 :'A: 来 表示 ， 正 
好 可 以 用 它 来 代替 0x41， 所 以 也 可 以 写成 人 hankaku 
RIA 1G 


FIVE ADA EFASE, [A] bootpack.cH Zs 0 J íR 
多 内 容 ， 请 大 家 浏览 一 下 。 如 末 顺 利 的 话 ， 会 显示 
出 “ABC 123”。 下 面 就 来 “make run” 一 下 吧 。 很 
UF, ISAT IEF o 


本 次 的 HariMain 的 内 容 


void HariMain(void) 


{ 


struct BOOTINFO *binfo = (struct BOOTINFO *) 
OxOffO; 
extern char hankaku[4096] ; 


init_palette(); 

init_screen(binfo->vram, binfo->scrnx, binfo- 
>scrny) ; 

putfont8(binfo->vram, binfo->scrnx, 8, 8, 
COL8_FFFFFF, hankaku + 'A' * 16); 

putfont8(binfo->vram, binfo->scrnx, 16, 8, 
COL8_FFFFFF, hankaku + 'B' * 16); 

putfont8(binfo->vram, binfo->scrnx, 24, 8, 
COL8_FFFFFF, hankaku + 'C' * 16); 

putfont8(binfo->vram, binfo->scrnx, 40, 8, 
COL8_FFFFFF, hankaku + '1' * 16); 

putfont8(binfo->vram, binfo->scrnx, 48, 8, 
COL8_FFFFFF, hankaku + '2' * 16); 

putfont8(binfo->vram, binfo->scrnx, 56, 8, 
COL8_FFFFFF, hankaku + '3' * 16); 


for (;;) { 
io hlt(); 


E T 


各 种 字符 


6 twas et Charib02f) 


仅仅 显示 6 个 字符 ， 融 要 与 这 么 多 代码 ， 实 在 不 太 
好 看 。 


putfont8(binfo->vram, binfo->scrnx, 8, COL8_FFFFFF, 
hankaku + 'A' * 16); 
putfont8(binfo->vram, binfo->scrnx, COL8_FFFFFF, 
hankaku + 'B' * 16); 
putfont8(binfo->vram, binfo->scrnx, COL8_FFFFFF, 
hankaku + 'C' * 16); 


putfont8(binfo->vram, binfo->scrnx, COL8_FFFFFF, 
hankaku + '1' * 16); 
putfont8(binfo->vram, binfo->scrnx, COL8_FFFFFF, 
hankaku + '2' * 16); 
putfont8(binfo->vram, binfo->scrnx, COL8_FFFFFF, 
hankaku + '3' * 16); 


所 以 笔者 打算 制作 一 个 函数 ， 用 来 显示 字符 串 。 既 
Po BS AALS 步 ， 做 这 样 一 个 函数 也 没 什 
AWR. E, FRF... T AE T o 


void putfonts8_asc(char *vram, int xsize, int x, int y, 
char c, unsigned char *s) 


{ 
extern char hankaku[4696 ] ; 
for (; *s != 0x00; s++) { 
putfont8(vram, xsize, x, y, C, hankaku + *s * 
16); 


X += 8; 


return; 
} 


C 语 言 中 ， 字 符 串 都 是 以 0x00 结 尾 的 ， 所 以 可 以 这 
么 写 。 孙 数 名 和 市 着 asc， 是 为 了 提醒 笔者 字符 编码 使 
用 了 ASCII。 


这 里 还 要 再 说 明 一 点 ， 所 谓 字 符 串 是 指 按 顺 序 排列 
在 内 存 里 ， 末 尾 加 上 0x00 而 组 成 的 字符 编码 。 所 以 
s 是 指 字 符 串 前 头 的 地 址 ， 而 使 用 *s 就 可 以 读 取 字符 
编码 。 这 样 ， 仅 利用 下 面 这 短 短 的 一 行 代码 就 能 够 
达到 目的 了 。 


putfonts8_asc(binfo->vram, binfo->scrnx, 8, 8, 
COL8_FFFFFF, "ABC 123"); 


试 谍 看 吧 :se 顺利 运行 了 。 
我 们 再 稍微 加 工 一 下 ， Rates's 好 ， 完成 了 。 


整理 后 的 HariMain 


void HariMain(void) 


{ 


OxOffO; 


struct BOOTINFO *binfo = (struct BOOTINFO *) 


init_palette(); 
init_screen(binfo->vram, binfo->scrnx, binfo- 
>scrny) ; 


putfonts8 asc(binfo->vram, binfo->scrnx, 8, 8, 
COL8_FFFFFF, "ABC 123"); 

putfonts8 asc(binfo->vram, binfo->scrnx, 31, 31, 
COL8 900000, "Haribote OS."); 

putfonts8 asc(binfo->vram, binfo->scrnx, 30, 30, 
COL8_FFFFFF, "Haribote OS."); 


for (33) { 
io_hl1t(); 


Haribote 0S. 


7 显示 变量 值 Charib02g) 


现在 可 以 显示 字符 串 了 ， 那 么 这 一 市 我 们 就 来 显示 
变量 的 值 。 能 不 能 显示 变量 值 ， 对 于 操作 系统 的 开 
影响 很 大 。 这 是 因为 程序 运行 与 想象 中 不 一 至 
时 ， 将 可 疑 变量 的 值 显 示 出 来 是 最 好 的 方法 。 


习惯 了 在 Windows 中 开发 程序 的 人 ， 如 果 想 看 到 
变量 的 值 ， 用 调试 器 ! (debugger) 很 容易 就 能 
到 ， 但 是 在 开发 操作 系统 过 程 中 可 束 没 那么 容易 
了 。 就 像 用 Windows 的 调试 右 不 能 对 Linux 的 程序 
进行 调试 一 样 ，Windows 的 调试 器 也 不 能 对 我 们 
的 “ 纸 娃 娃 操 作 系 统 ” 的 程序 进行 调试 ， 更 不 要 说 
对 操作 系统 本 号 进行 调试 了 。 如 果 在 “ 纸 娃 娃 操 作 
系统 ”中 也 要 使 用 调试 器 的 话 ， 那 只 有 目 己 做 一 个 
调试 器 了 “也 可 以 移植 ) 。 在 做 出 调试 器 之 前 ， 
只 能 通过 显示 变量 值 来 查看 确认 问题 的 地 方 。 


1 指 调 试 程序 中 的 错误 (bug) 时 所 用 的 工具 ， 英 
文 是 debugger。 另 外 ， 调 试 〈 动 词 ) 是 debug。 


有 内 话 束 说 这 么 多 ， 让 我 们 回 到 正题 。 那 怎么 样 显 示 
变量 的 值 呢 ? 可 以 使 用 sprintf 函 数 。 它 是 printf 函 数 
的 同类 ， 与 printf 函 数 的 功能 很 相近 。 在 开始 的 时 

候 ， 我 们 曾 提 到 过 ， 目 制 操 作 系 统 中 不 能 随便 使 用 


printf K žr, {HsprintfH] 以 使 用 。 因 为 sprintf 不 是 按 
指定 格式 输出 ， 只 是 将 输出 内 容 作 为 字符 串 写 在 内 
存 中 。 


这 个 sprintf 疯 数 ， 是 本 次 使 用 的 名 为 GO 的 C 编 译 器 
附带 的 函数 。 CEREA bibik FA E 够 不 使 
用 操作 系统 的 任何 功能 。 或 许 有 人 会 认为 ， 什么 
呀 ， 那 样 的 话 ， 怎么 不 :做 个 printf 函 数 呢 ? 这 是 因为 
输出 字符 串 的 方法 ， 各 种 操作 系统 都 不 一 样 ， 不 管 
如 何 精 心 设计 ， 都 不 可 避免 地 要 使 用 操作 系统 的 功 
能 。 而 Sprintf 不 同 ， 它 只 对 内 存 进 行 操作 ， 所 以 可 
以 应 用 于 所 有 操作 系统 。 


我 们 这 残 来 试 试 这 个 函数 吧 。 要 在 C 语 言 中 使 用 
sprintf 函 数 ， 束 必须 在 源 程序 的 开头 写 上 #include 

， 我 们 也 写 上 这 人 句 话 。 这 样 以 后 就 可 以 随便 使 用 
sprintf zk KA f o fe BORE HariMain? (# H sprintf ef 
数 。 


sprintf(s, "scrnx = %d", binfo->scrnx); 


putfonts8 asc(binfo->vram, binfo->scrnx, 16, 64, 
COL8_FFFFFF, s); 


sprintf K ŽAJE FA cma sprintf 《地 址 ， 格 式 ， 
ff, 1H. E, ...... 。 这 里 的 地 址 指定 所 生成 字符 


串 的 存放 地 址 。 格 却 基 本 上 只 是 单纯 的 字符 串 ， 如 
东 有 9%d 这 类 记号 ， 就 置换 成 后 面 的 值 的 内 容 。 除 
了 9%d， 还 有 9%s，9%x 等 待 号， 它们 用 于 指定 数值 以 
什么 方式 变换 为 字符 串 。9%d 将 数值 作为 十 进 制 数 
转化 为 字符 串 ，%x 将 数值 作为 十 六 进 制 数 转化 为 
字符 串 。 

关于 格式 的 详细 说 明 


两 个 空格 ， 变 成 " ”123"， 强 制 达 到 5 位 


BHIA BS AL 


小写 abcdef 
日 大写 ABCDEF 


5 位 十 六 进 制 数 。 如 果 是 456〔 十 进 制 )， 则 在 前 面 加 上 两 个 空格 ， 变 成 " 1c8"， 强 制 达 
到 5 位 。 还 有 %5X 的 形式 


5 位 十 六 进 制 数 。 如 果 是 456〈 十 进 制 ) ， 则 在 前 面 加 上 两 个 0， 变 成 "001c8"， 强 制 达到 5 
位 。 还 有 %05X 的 形式 


我 们 来 运行 一 下 看 看 。.……. 运行 正常 。 


说 点题 外 话 。 因 为 这 本 书 是 在 笔者 咏 咏 咏 咏 写 完 之 
后 大 家 才 看 到 的 ， 所 以 虽然 讲 到 “能 显示 变量 的 值 
T”, ERARA T”, BAKKERS 
PRPRRE. (Pe, EAERI H iE E 
此 过 程 中 犯 了 很 多 的 错 〈 大 多 都 是 低级 错误 ) 。 以 
前 ， 因 为 不 能 显示 变量 的 值 ， 所 以 友 现 运行 异 第 的 
时 候 ， 只 能 拼命 读 代 码 ， 想 象 变 量 的 值 来 修改 程 
序 ， 非 常 壮 杏 。 但 从 今 以 后 可 以 显示 变量 的 值 就 轻 


松 多 了 。 


话说 ， 在 分 辨 紊 是 320x200 的 屏幕 上 ，8x16 的 字体 
WEAR (E). 


ABC 123 
Haribote OS. 


Pees eink tt 
SOrT = 320 


Si [ 
可 以 看 见 变量 的 值 了 ! 


8 显示 鼠标 指针 (harib02h ) 


估计 后 面 的 开发 速度 会 更 快 ， 那 残 赶 崇 趁 看 这 势头 
再 描画 一 下 鼠标 指针 吧 。 思 路 跟 显示 字符 差不多 ， 
程序 并 不 是 很 难 。 


首先 ， 将 鼠标 指针 的 大 小 定 为 16x16。 这 个 定 下 来 
之 后 ， 下 面 承 简单 了 。 先 准备 16x16=256 字 节 的 内 
存 ， 然 后 往 里 面 写 入 鼠标 指针 的 数据 。 我 们 把 这 个 
程序 写 在 init mouse_cursor8 里 。 


void init mouse cursor8(char *mouse, char bc ) 
/* 准备 鼠标 指针 (16x16) */ 
{ 


static char cursor[16][16] = { 
"炒米 米 米 米 米 炒米 炒米 炒米 米 米 。。"” 5 


"*QOOO0O0000000*...", 


"*QOOO000000*....", 
*OOO0000000*..... 7 
*QOO0O00000*...... j 
*QOOO0000*....... E 
*0000000*¥....... 5 
*00000000*...... 5 
*0000**000*..... j 


"*OO*....*000*..." 


for (y = 03 y < 16; y++) { 
for (x = ð; x < 16; x++) { 
if (cursor[y][x] == '*') { 
mouse[y * 16 + x] = COL8 990000; 


if (cursor[y][x] == '0') { 
mouse[y * 16 + x] = COL8_FFFFFF; 
} 
if (cursor[y][x] == '.') { 
mouse[y * 16 + x] = bc; 
} 
} 
} 
return; 


变量 bc 是 指 back-color， 也 就 是 背景 色 。 


要 将 背景 色 显 示 出 来 ， 还 需要 作成 下 面 这 个 函数 。 
其 实 很 简单 ， 只 要 将 buf 中 的 数据 复制 到 vram 中 去 
MALU So 


void putblock8 8(char *vram, int vxsize, int pxsize, 
int pysize, int px®, int pyð, char *buf, int 
bxsize) 


{ 


int x, y; 
for (y = ð; y < pysize; y++) { 
for (x = 03 x < pxsize; X++) { 


vram[(pyð + y) * vxsize + (px6 + x)] = 
buf[y * bxsize + x]; 


} 


return; 


里 面 的 变量 有 很 多 ， 其 中 vram 和 vxsize 是 关于 
VRAM 的 信息 。 他 们 的 值 分 别 是 0xa0000 和 320。 
pxsize 和 pysize 是 想 要 显示 的 图 形 (picture) 的 大 
小 ， 鼠 标 指 针 的 大 小 是 16x16， 所 以 这 两 个 值 都 是 
16。px0 和 和 py0 指 定 图 形 在 画面 上 的 显示 位 置 。 最 后 
的 buf 和 bxsize 分 别 指定 图 形 的 存放 地 址 和 每 一 行 含 
有 的 像素 数 。bxsize 和 pxsize 大 体 相 同 ， 但 也 有 了 时候 
想 放 入 不 同 的 值 ， 所 以 还 是 要 分 别 指 定 这 两 个 值 。 


接 下 来 ， 只 要 使 用 以 下 两 个 函数 就 行 了 。 


init_mouse_cursor8(mcursor, COL8 008484) ; 


putblock8 8(binfo->vram, binfo->scrnx, 16, 16, mx, my, 
mcursor, 16); 


也 不 知 能 不 能 正常 运行 ， 试 试看 。..………. 好 ， 能 运 
Ay I 
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9 GDT 与 IDT 的 初始 化 (harib02i) 


限 标 指针 显示 出 来 了 ， 我 们 想 做 的 第 一 件 事 就 是 去 
移动 它 ， 但 女 标 指针 却 一 动不动 。 那 是 当然 ， 因 为 
我 们 还 没有 做 出 这 个 功能 。.…… ME, Tove wn fey ABLE 
它 动 起 来 。 


HAVE AREA BELLE SHWE? ...... (思考 中 ) .…... A Tp 
法 了 ! 首先 要 将 GDT 和 IDT 初 始 化 。 不 过 在 此 之 
前 ， 必 须 说 明 一 下 什么 是 GDT 和 IDT。 


GDT 也 好 ，IDT 也 好 ， 它 们 都 是 与 CPU 有 关 的 设 
定 。 为 了 让 操作 系统 能 够 使 用 32 位 模式 ， 需 要 对 
CPU 做 各 种 设 定 。 不 过 ，asmhead.nas 里 写 的 程序 有 
点 偷工减料 ， 只 是 随意 进行 了 一 些 设 定 。 如 果 这 样 
原封 不 动 的 话 ， 就 无 法 做 出 使 用 鼠标 指针 所 需要 的 
设 定 ， 所 以 我 们 要 好 好 重新 设置 一 下 。 


那 为 什么 要 在 asmhead.nas 里 偷工减料 呢 ? 最 开始 
BO OU LAE EE ic EE ANT? RS I el 
— RF ERB  . IX FRA AE i BS BB 
地 不 用 汇编 语言 ， 而 用 C 语 言 来 写 ， 这 样 大 家 更 
容易 理解 。 所 以 ，asmhead.nas 里 尽 可 能 少 写 ， 只 
做 了 运行 bootpack.c 所 必需 的 一 些 设 定 。 这 次 为 了 
使 用 这 个 文件 ， 必 须 再 进行 设 定 。 如 果 大 家 有 足 


够 能 力 用 汇编 语言 编写 程序 ， 残 不 用 模仿 笔者 
了 ， 从 一 开始 规 规定 符 地 做 好 设 定 更 好 。 


从 现在 开始 ， 学 习 内 容 的 难度 要 增加 不 小 。 以 后 要 
讲 分 段 呀 ， 中 断 什 么 的 ， 都 很 难 懂 ， 很 多 程序 员 痢 
是 在 这 些 地 方 受挫 的 。 从 难度 上 考虑 ， 应 该 在 20 天 
以 后 讲 而 不 是 第 5 天 。 但 如 果 现 在 不 讲 ， 几 乎 所 有 
的 装置 都 不 能 控制 ， 做 起 来 也 没什么 意思 。 笔 者 不 
想 让 大 家 做 没有 意思 的 操作 系统 。 


所 以 请 大 家 坚持 独 读 下 去 ， 先 恒 个 大 概 ， 然 后 再 回 
过 头 来 仔细 咀 咀 。 在 一 天 半 以 后 ， 内 容 的 难度 会 回 
到 以 前 的 水 平 ， 所 以 这 段 时 间 大 家 就 打 起 精神 加 油 
吧 ! 


先 来 讲 一 下 分 段 !:。 回 想 一 下 仪 用 汇编 语言 编程 
时 ， 有 一 个 指令 叫做 ORG。 如 果 不 用 ORG 指 令 明 确 
声明 程序 要 读 入 的 内 存 地 址 ， 就 不 能 写 出 正确 的 程 
序 来 。 如 果 写 着 ORG 0x1234， 但 程序 却 没 读 入 内 
存 的 0x1234 号 ， 可 就 不 好 办 了 。 


“英文 是 segmentation 。 


发 生 这 种 情况 是 非 疝 及 烦 的 。 最 近 的 操作 系统 能 后 


时 运行 多 个 程序 ， 这 一 点 也 不 稀奇 。 这 种 时 候 ， 如 
东 内 存 的 使 用 范围 重合 了 怎么 办 ? 这 可 是 一 件 大 
事 。 必 须 让 东 个 程序 放弃 执行 ， 同 时 报 出 一 个 “ 因 
为 内 存 地 址 冲突 ， 不 能 执行 * 的 错误 信息 。 但 是 ， 
这 种 错误 大 家 见 过 吗 ? A. MA, EARP 
法 能 解决 这 个 问题 。 这 个 方法 就 是 分 段 。 


所 谓 分 段 ， 打 个 比方 说 ， 就 是 按照 自己 喜欢 的 方 
式 ， 将 合计 4GB“ 的 内 存 分 成 很 多 块 〈block) ， 
一 块 的 起 始 地 址 都 看 作 0 来 处 理 。 这 很 方便 ， 有 了 
这 个 功能 ， 任 何 程序 都 可 以 先 写 上 一 句 ORG 0。 像 
这 样 分 割 出 来 的 块 ， 就 称 为 段 (segment) 。 顺 便 
说 一 句 ， 如 果 不 用 分 段 而 用 分 页 3 (paging) ， 也 能 
解决 问题 。 不 过 我 们 目前 还 不 讨论 分 页 ， 可 以 暂时 
ING FEE 


“GB (Giga Byte, HH) ， 指 1024MB， 可 不 
是 Game Boy MKT (R) 。 


3 英文 是 paging。 “分 段 " 的 基本 思想 是 将 4GB 的 内 
存 分 割 ; 而 分 页 的 思想 是 有 多 少 个 任务 就 要 分 多 
Di, 还 要 对 内 存 进 行 排序 。 不 过 解说 到 这 个 程 
度 ， 大 家 估计 都 不 懂 。 以 后 有 机 会 再 详细 说 明 。 


需要 注意 的 一 点 是 ， 我 们 用 16 位 的 时 候 曾经 讲解 过 
的 段 寄存 器 。 这 里 的 分 段 ， 使 用 的 就 是 这 个 段 寄 存 


器 。 但 是 16 位 的 时 候 ， 如 果 计 算 地 址 ， 只 要 将 地 址 
乘 以 16 就 可 以 了 。 但 现在 已 经 是 32 位 了 ， 不 能 再 这 
么 用 了 。 如 果 写 成 <MOV AL,[DS:EBX]”，CPU 会 往 
EBX 里 加 上 某 个 值 来 计算 地 址 ， 这 个 值 不 是 DS 的 16 
音 ， 而 是 DS 所 表示 的 段 的 起 始 地 址 。 即 使 省 略 段 寄 
ffa (segment register) 的 地 址 ， 也 会 目 动 认为 是 
指定 了 DS。 这 个 规则 不 管 是 16 位 模式 还 是 32 位 模 
Ti, Abe FEN. 


按 这 种 分 段 方法 ， 为 了 表示 一 个 段 ， 需 要 有 以 下 信 
自 


。 段 的 大 小 是 多 少 
。 段 的 起 始 地 址 在 哪里 
。 上 段 的 省 理 属性 (禁止 写 入 ， 蔡 止 执行 ， 系 统 专 


用 等 ) 
CPU 用 8 个 字 节 《〈=64 位 ) 的 数据 来 表示 这 些 信息 。 
但 是 ， 用 于 指定 段 的 寄 仓 器 只 有 16 位 。 或 许 有 人 会 
狂想 在 32 位 模式 下 ， 段 寄存 器 会 扩展 到 64 位 ， 但 事 
实 上 段 寄存 器 仍然 是 16 位 。 


那 该 怎么 办 才 好 呢 ? 可 以 模仿 图 像 调 色 板 的 做 法 。 


EIE, WADERS, FERAT AE o 
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4 英文 是 Segment selector， 也 有 详 作 “ 段 选 择 
符 ” 的 。 


调 色 板 中 ， 色 号 可 以 使 用 0~255 的 数 。 段 号 可 以 用 
0~8191 的 数 。 因 为 段 寄 存 器 是 16 位 ， 所 以 本 来 应 该 
能 够 处 理 0~65535 范 围 的 数 ， 但 由 于 CPU 设计 上 的 
原因 ， 段 寄存 器 的 低 3 位 不 能 使 用 。 因 此 能 够 使 用 
oe 13 位 ， 能 够 处 理 的 就 只 有 位 于 0~8191 的 
区 域 了 。 


BSE WEN? 这 是 对 于 CPU 的 设 定 ， 不 需要 像 
调 色 板 那 样 使 用 io_out (由 于 不 是 外 部 设备 ， 当 然 
没 必 要 ) 。 但 因为 能 够 使 用 0~8191 的 范围 ， 即 可 以 
定义 8192 个 段 ， 所 以 设 定 这 么 多 段 就 需要 
8192x8=65 536 字 节 (64KB) 。 大 家 可 能 会 想 ， 
CPU 没 那么 大 存储 能 力 ， 不 可 能 存储 那么 多 数据 ， 
是 不 是 要 写 入 到 内 存 中 去 呀 。 不 错 ， 正 是 这 样 。 这 
64KB 实际 上 也 可 以 比 这 少 ) 的 数据 就 称 为 
GDT。 


GDT 是 “global (segment) descriptor table” 的 缩写 ， 
意思 是 全 局 段 号 记录 表 。 将 这 些 数据 整齐 地 排列 在 
内 存 的 茶 个 地 方 ， 然 后 将 内 存 的 起 始 地 址 和 有 效 设 


定 个 数 放 在 CPU 内 被 称 作 GDTR2” 的 特殊 寄存 器 中 ， 
BOE TEM I o 


? global (segment) descriptor table register 的 缩写 。 
TELT 


另外 ，IDT 是 “interrupt descriptor table” 的 缩写 ， 直 
译 过 来 就 是 “中 断 记 录 表 ”。 当 CPU 过 到 外 部 状况 变 
化 ， 或 者 是 内 部 偶然 发 生 某 些 错误 时 ， 会 临时 切换 
过 去 处 理 这 种 突 发 事件 。 这 就 是 中 汤 功 能 。 


我 们 拿 电 脑 的 键 往来 举 个 例子 。 以 CPU 的 速度 来 
看 ， 键 盘 特 别 慢 ， 只 是 偶尔 动 一 动 。 就 算是 重复 按 
同一 个 键 ， 一 秒 钟 也 很 难 输入 50 个 字符 。 而 CPU 在 
1/50 秒 的 时 间 内 ， 能 执行 200 万 条 指令 〈CPU 主 频 
100MHz 时 ) 。CPU 每 执行 200 万 条 指令 ， 碍 询 一 次 
键盘 的 状况 就 已 经 足够 了 。 如 果 查 询 得 太 慢 ， 用 户 
输入 一 个 字符 时 电脑 就 会 半天 没 反 应 。 


要 是 设备 只 有 键盘 ， 用 “查询 "这 种 处 理 方法 还 好 。 
(ELSES LZ RIR OR. WEAR. GBR. DHE. E 
卡 等 很 多 需要 定期 查看 状态 的 设备 。 其 中 ， 网 卡 还 
需要 CPU 快速 响应 。 响 应 不 及 时 的 话 ， 数 据 就 可 能 
接受 失败 ， 而 不 得 不 再 传送 一 次 。 如 果 因 为 害怕 处 
理 不 及 时 而 靠 查询 的 方法 轮流 查看 各 个 设备 状态 的 


话 ，CPU 就 会 穷 于 应 付 ， 不 能 完成 正常 的 处 理 。 


正 征 为 解决 以 上 问题 ， 才 有 了 中 断 机 制 。 各 个 设备 
ARUMER, PRERE, CPUE 
正在 处 理 的 任务 ， 并 做 好 接 下 来 能 够 继续 处 理 的 准 
备 ， 转 而 执行 中 断 程 序 。 中 断 程 序 执行 完 以 后 ， 再 
调用 事先 设 定好 的 函数 ， 返 回 处 理 中 的 任务 。 正 是 
ft T PEALE, CPUN UDH- AAWE, B 
Aa Smee ae oF 


讲 了 这 么 长 ， 其 实 总 结 来 说 就 是 ， 要 使 用 鼠标 ， 就 
必须 要 使 用 中 断 。 所 以 ， 我 们 必须 设 定 IDT。IDT 
记录 了 0 一 255 的 中 断 号 码 与 调用 函数 的 对 应 关系 ， 
比如 说 发 生 了 123 写 中 断 ， 束 调用 ox 函数 ， 其 设 定 
方法 与 GDT 很 相似 (或 许 是 因为 使 用 同样 的 方法 能 
简化 CPU 的 电路 ) 。 


如 果 段 的 设 定 还 没 顺 利 完成 就 设 定 IDT 的 话 ， 会 比 
较 麻 烦 ， 所 以 必须 先进 行 GDT 的 设 定 。 


要 是 没有 中 断 的 话 ， 就 必 委托 给 中 断 的 话 ， 
须 自己 不 时 去 查看 了 。 只 有 发 生 事情 的 时 候 才 通 知 。 


什么 问 
题 


是 不 是 被 
按 下 了 ? 


EENEN 
虽然 说 明 很 长 ， 但 程序 并 没 那 么 长 。 


本 次 的 *bootpack.c 节 选 


struct SEGMENT_DESCRIPTOR{ 


short limit_low, base low; 
char base_mid, access right; 
char limit_high, base_high; 
}; 


struct GATE DESCRIPTOR { 
short offset low, selector; 


char dw count, access right; 
short offset_high; 


}; 
void init_gdtidt(void) 


{ 

struct SEGMENT_DESCRIPTOR *gdt 
SEGMENT_DESCRIPTOR *) 0x00270000; 

struct GATE_DESCRIPTOR *idt = (struct 
GATE_DESCRIPTOR *) Q@x0026F 800; 

int i; 


(struct 


/* GDT 的 初始 化 */ 
for (i = ð; i < 8192; i++) { 
set_segmdesc(gdt + i, ©, ©, 0); 

} 

set_segmdesc(gdt + 1, OxffffffFF, 0x00000000, 
@x4e92) ; 

set_segmdesc(gdt + 2, O@xeee7fFFF, 0x00280000, 
@x409a) ; 

load_gdtr(Oxffff, 0x00270000); 


/* IDT 的 初始 化 */ 

for (i = ð; i < 256; i++) { 
set_gatedesc(idt + i, ©, ©, 0); 

} 

load_idtr(0x7ff, 0x0026f800); 


return; 


} 


void set_segmdesc(struct SEGMENT_DESCRIPTOR *sd, 
unsigned int limit, int base, int ar) 


if (limit > @xfffff) { 
ar |= @x8eee; /* G bit = 1 */ 
limit /= 0x1000; 


sd->limit_low = limit & OxfffFf; 
sd->base_ low base & OxfffFf; 
sd->base_ mid (base >> 16) & Oxff; 
sd->access right = ar & Oxff; 


sd->limit_high = ((limit >> 16) & @x@f) | ((ar >> 
8) & Oxf@); 

sd->base_ high = (base >> 24) & OxfFf; 

return; 


} 


void set_gatedesc(struct GATE_DESCRIPTOR *gd, int 
offset, int selector, int ar) 


{ 
gd->offset_low = offset & 6xffff; 
gd->selector = selector; 
gd->dw_count = (ar >> 8) & 6xff; 


gd->access right = ar & @xff; 
gd->offset_high = (offset >> 16) & oxffff; 
return; 


SEGMENT_DESCRIPTOR 中 存放 GDT 的 8 字 节 的 内 
窑 ， 它 无 非 是 以 CPU 的 资料 为 基础 ， 写 成 了 结构 体 
的 形式 。 同 样 ，GATE_DESCRIPTOR 中 存放 IDT 的 


8 字 节 的 内 容 ， 也 是 以 CPU 的 资料 为 基础 的 。 


变量 gdt 被 赋值 0x00270000， 就 是 说 要 将 0x270000 一 
0x27ffff 设 为 GDT。 至 于 为 什么 用 这 个 地 址 ， 其 实 
那 只 是 笔者 随便 作出 的 决定 ， 并 没有 特殊 的 意义 。 
从 内 存 分 布 图 可 以 看 出 这 一 块 地 方 并 没有 被 使 用 。 


变量 idt 也 是 一 样 ，IDT 被 设 为 了 0x26f800 一 
0x26ffff。 顺 便 说 一 下 ，0x280000 一 0x2fffff 已 经 有 
了 bootpack.h。“ 哎 ? 什么 时 候 ? 我 可 没 听 说 过 这 事 
哦 ! ”大 家 可 能 会 有 这 样 的 疑问 ， 其 实 是 后 面 要 讲 
到 的 “asmhead.nas” 帮 我 们 做 了 这 样 的 处 理 。 


现在 继续 往 下 说 明 。 


for (i = ð; i < 8192; i++) { 
set_segmdesc(gdt + i, ©, ©, @); 
} 


请 注意 一 下 以 上 几 行 代码 。gdt 是 0x270000，i 从 0 开 
台 ， 每 次 加 1， 直 到 8 191。 这 样 一 来 ， 好 像 gdt+i 最 
大 也 只 能 是 0x271fftf。 但 事实 上 并 不 是 那样 。C 语 言 
中 进行 指针 的 加 法 运算 时 ， 内 部 还 隐 含 着 乘法 运 
算 。 变 量 gdt 已 经 声明 为 指针 ， 指 辐 
SEGMENT_DESCRIPTOR 这 样 一 个 8 字 节 的 结构 


体 ， 所 以 往 gdt 里 加 1， 结 末 却 是 地 址 增加 了 8。 


因此 这 个 for 语句 束 完 成 了 对 所 有 8192 个 段 的 设 
定 ， 将 它们 的 上 限 dimit, 指 段 的 字 节 数 -1) 、 基 址 
(base)〉、 访 问 权 限 都 设 为 0。 


再 往 下 还 有 这 样 的 语句 |: 

set segmdesc(gdt + 2, ©x0007ffff, 0x00280000, 0x409a); 
以 上 语句 是 对 上段 号 为 1 和 2 的 两 个 段 进行 的 设 定 。 自 
号 为 1 的 段 ， 上 限 值 为 0xffffffff 即 大 小 正好 是 
AGB) ， 地 址 是 0(， 它 表示 的 是 CPU 所 能 管理 的 全 
部 内 存 本 身 。 段 的 属性 设 为 0x4092， 它 的 含义 我 们 
留 得 明天 再 说 。 下 面 来 看 看 段 号 为 2 的 段 ， 它 的 大 
小 是 512KB， 地 址 是 0x280000。 这 正好 是 为 
bootpack.hrb 而 准备 的 。 用 这 个 段 ， 束 可 以 执行 
bootpack.hrb。 因 为 bootpack.hrb 是 以 ORG 0 为 前 所 
翻译 成 的 机 器 语言 。 


Litt 
RP ie ae: 
load_gdtr(Oxffff, 0x00270000) ; 


这 是 因为 依照 常规 ，C 语 言 里 不 能 给 GDTR 赋 值 ， 


所 以 要 借助 汇编 语言 的 力量 ， 仅 此 而 已 。 


再 往 下 都 是 关于 IDT 的 记述 ， 因 为 跟前 面 一 样 ， 所 
以 应 该 没什么 问题 。 


在 set_segmdesc 和 set_gatedesc 中 ， 使 用 了 新 的 运算 
符 ， 下 面 来 介绍 一 下 。 首 先 看 看 语句 “ar |= 
0x8000;”， 它 是 “ar = ar |0x8000;” 的 省 略 表现 形式 。 
同样 还 有 “limit /= 0x1000;”， 它 是 “limit = 
limity0Ox1000;” 的 省 略 表 现形 式 。“| ?是 前 面 已 经 出 现 
的 或 (OR) 运算 符 。"“/" 是 除法 运算 符 。 


“>>” 是 右 移 位 运算 符 。 比 如 计算 00101100>>3， 就 
得 到 00000101。 移 位 时 ， 人 舍弃 右 边 溢 出 的 位 ， 而 左 
边 不 足 的 3 位 ， 要 补 3 个 0。 


E 


右 移 3 位 之 后 


ello h el Ji Ilolle] 


ello h oll fie] 


不 足 部 分 自动 补 0 


oo 


/|\ 


SRETKAMAARS T, DIRE RIDTH EH 
说 明 束 留 到 明天 吧 。 总 之 ， 使 用 本 程序 的 操作 系统 
是 做 成 了 。 能 不 能 正常 运行 啊 ? 赶紧 试 一 试 

IE, “make run ”...... 还 好 ， 能 运行 。 这 次 只 是 简单 
地 做 了 初期 设 定 ， 所 以 即使 运行 成 功 了 ， 画 面 上 也 
什么 都 不 显示 。 


现在 haribote.sys 变 成 多 少 字 节 了 呢 ? R, TESA 
有 4KB， 增 加 了 不 少 ， 到 7632 字 节 了 。 今 天 束 先 到 
这 里 吧 ， 大 家 明天 见 。 


第 6 天 ”分割 编 详 与 中 断 处 理 


。 分 割 源 文件 (harib03a) 

。 整理 Makefile (harib03b) 

o 整理 头 文 件 Charib03c ) 

。 MIA 

。 初 始 化 PIC (harib03d) 

o 中 上 晰 处 理 程序 的 制作 (harib03e) 


1 分 割 源 文件 Charib03a) 

本 来 想 接 着 详细 讲解 一 下 昨天 剩 下 的 程序 ， 但 一 上 
来 束 说 这 些 ， 有 点 乏味 ， 所 以 还 是 先 做 点 准备 活动 
吧 。 不 经 意 地 看 一 下 bootpack.c， 发 现 它 竟然 已 长 
达 近 300 行 ， 是 太 长 了 点 。 所 以 我 们 决定 把 它 分 割 
为 几 部 分 。 

将 源 文 件 分 割 为 几 部 分 的 利 次 ， 大 致 如 下 。 

优点 


1. 按照 处 理 内 容 进 行 分 类 ， 如 果 分 得 好 的 话 ， 将 来 
进行 修改 时 ， 容 易 找 到 地 方 。 


2. 如 果 Makefile 写 得 好 ， 只 需要 编译 修改 过 的 文 
件 ， 束 可 以 所 高 make 的 速度 。 


3. 早 个 法 文件 而 人 不 长 8 多 个 小 文件 比 二 个 大 文件 好 
Kb FH 


4. 看 起 来 很 酷 〈 笑 ) 。 
缺点 
5. 源 文件 数量 增加 。 


6. 分 类 分 得 不 好 的 话 ， 修 改 时 不 容易 找到 地 方 。 


TT 
我 们 先 将 源 文件 按 下 图 分 割 一 下 看 看 。 


graphic.c 关于 描画 的 处 理 


dsctbl.c 关于 GDT.IDT 等 
bootpack. 


bootpack.c ”其 他 处 理 


分 割 并 不 是 很 难 ， 但 有 一 点 很 关键 。 比 如 如 果 
graphic.c 也 想 使 用 naskfunc.nas 的 函数 ， 束 必须 要 写 
上 “void io_out8 Cint port,int data) ;”3 F} RK BO 
明 。 虽 然 这 都 已 经 写 在 bootpack.c 里 了 ， 但 编译 器 
在 编译 graphic.c 时 ， 根 本 不 知道 有 bootpack.c 存 在 。 


这 样 整理 一 下 看 起 来 束 清 丈 多 了 。 对 应 源 文件 的 分 
制 ， 我 们 还 要 修改 Makefile， 流 程 如 下 : 


graphic.c dsctbl.c bootpack.c 


| | l 


graphic.obj dsctbl.obj bootpack.obj 


bootpack.bim 
后 面 没 有 变化 
理解 了 这 个 流程 ，Makefile 也 就 很 容易 看 懂 了 。 


现在 再 来 “make run”。 运 行 起 来 一 点 问题 也 没有 ， 
分 割 成 功 了 。 


2 整理 Makefile Charib03b ) 


分 割 虽然 成 功 了 ， 但 现在 Makefile 又 有 点 长 了 ， 足 
A ee eee 
RIXTE 


bootpack.gas : bootpack.c Makefile 
$(CC1) -o bootpack.gas bootpack.c 


graphic.gas : graphic.c Makefile 
$(CC1) -o graphic.gas graphic.c 


dsctbl.gas : dsctbl.c Makefile 
$(CC1) -o dsctbl.gas dsctbl.c 


或 者 像 这 样 : 


bootpack.nas : bootpack.gas Makefile 
$(GAS2NASK) bootpack.gas bootpack.nas 


graphic.nas : graphic.gas Makefile 


$(GAS2NASK) graphic.gas graphic.nas 


dsctbl.nas : dsctbl.gas Makefile 
$(GAS2NASK) dsctbl.gas dsctbl.nas 


它们 做 的 都 是 同样 的 事 。 为 什么 要 写 这 么 多 同样 的 
A Fa? 等 次 增加 新 的 源 文 件 ， 都 要 像 这 样 增 加 这 
么 多 雷同 的 编译 规则 ， 看 着 都 烦 。 


CLLD 
其 实 有 一 个 技巧 可 以 将 它们 归纳 起 来 ， 这 或 是 利用 


一 般 规 则 。 我 们 可 以 把 上 和 面 6 个 独立 的 文件 生成 规 
则 ， 归 纳 成 以 下 两 个 一 般 规 则 。 


为 .gas : %.c Makefile 
$(CC1) -o $*.gas $*.c 


%.nas : %.gas Makefile 
$(GAS2NASK) $*.gas $*.nas 


哦 ， 这 玩意 儿 好 ! 真 方便 。 


make.exe 会 首先 寻找 普通 的 生成 规则 ， 如 采 没 找 
到 ， 就 笃 试 用 一 般 规划 。 所 以 ， 即 使 一 般 规则 和 普 
通 生 成 规则 有 冲突 ， 也 不 会 有 问题 。 这 时 候 ， 普 通 
生成 规则 的 优先 级 更 高 。 比 如 虽然 某 个 文件 的 扩展 
名 也 是 .c， 但 是 想 用 单独 的 规则 来 编译 它 ， 这 也 没 
问题 。 真 聪明 呀 。 


所 以 ，Makefile 中 可 以 用 一 般 规则 的 地 方 我 们 都 换 
成 了 一 般 规则 。 这 样 程序 就 精简 成 了 92 行 。 减 了 21 
ITE, WENE T -o 

我 们 来 确认 一 下 ， 运 行 “make run”。 很 好 ， 完 全 能 
Ema.: 


3 整理 头 文 件 Charib03c) 


Makefile 变 短 了 ， 真 让 人 高 兴 。 我 们 继续 把 源 文 件 
也 整理 一 下 。 现 在 的 文件 大 小 如 下 。 


graphic.C ................. 187 行 
dsctbl.c ........0ccceceeees 67 行 
bootpack.c ............... 81 行 
人 335 行 


这 比分 割 前 的 280 行 多 了 不 少 。 主 要 原因 在 于 各 个 
源 文 件 都 要 重复 声明 “vold io_out8 Cint port, int 
data) ?2 等， 虽然 说 这 也 是 迫不得已 ， 但 还 是 不 甘 
心 。 所 以 ， 我 们 在 这 儿 再 下 点 工夫 。 


自 先 将 重复 部 分 全 部 去 挤 ， 把 他 们 归纳 起 来 ， 放 到 
名 为 bootpack.h 的 文件 里 。 虽 然 扩 展 名 变 了 ， 但 它 
也 是 C 语 言 的 文件 。 已 经 有 一 个 文件 名 叫 bootpack.c 
了 ， 我 们 根据 一 般 的 做 法 ， 将 文件 命名 为 
bootpack.h。 因 为 是 第 一 次 接触 到 .h 文 件 ， 所 以 我 们 


截取 bootpack.h 内 容 徘 前 的 一 段 放 在 下 面 。 


bootpack.h 的 内 容 


/* asmhead.nas */ 

struct BOOTINFO { /* O@xOffO-OxOffFf */ 
char cyls; /* 局 动 区 读 硬盘 读 到 何 处 为 止 */ 
char leds; /* 启动 时 键盘 LED 的 状态 */ 
char vmode; /* 显卡 模式 为 多 少 位 彩色 */ 
char reserve; 
short scrnx, scrny; /* 画面 分 辨 率 */ 
char *vram; 

}; 

#define ADR BOOTINFO ex66666ff0 


/* naskfunc.nas */ 
void io_hlt(void); 
void io cli(void); 


void io out8(int port, int data); 
int io load eflags(void); 

void io store eflags(int eflags); 
void load gdtr(int limit, int addr); 
void load idtr(int limit, int addr); 


/* graphic.c */ 

void init palette(void); 

void set palette(int start, int end, unsigned char 
*rgb); 

void boxfill8(unsigned char *vram, int xsize, unsigned 
char c, int x0, int y@, int x1, int y1); 

void init_screen8(char *vram, int x, int y); 


CEA PHE) 


X 


这 个 文件 里 不 仅仅 多 列 出 了 函数 的 定义 ， 还 在 注释 


中 写 明 了 函数 的 定义 在 哪 一 个 源 文件 里 。 想 要 看 一 
看 或 者 修改 函数 定义 时 ， 只 要 看 一 下 文件 
bootpack.h 吏 能 知道 该 函数 定义 本 喘 在 哪个 源 文件 
RASH, WROTE. 


在 编译 graphic.c 的 时 候 ， 我 们 要 让 编译 器 去 读 这 个 
头 文件 ， 做 法 是 在 graphic.c 的 前 面 加 上 如 下 一 行 : 


#include "bootpack.h" 


编译 占 见 到 了 这 一 行 ， 就 将 该 行 蕉 换 成 所 指定 文件 
的 内 容 ， 然 后 进行 编译 。 所 以 ， 写 

在 “bootpack.h” 里 的 所 有 内 容 ， 也 都 间接 地 写 到 

了 “graphic.c” 中 。 同 样 道理 ， 

在 “dsctbl.c” 和 “bootpack.c” 的 前 面 也 都 加 上 一 

行 “#include "bootpack.h"”。 


像 这 样 ， 仅 由 函数 声明 和 #define 等 组 成 的 文件 ， 我 
们 称 之 为 头 文 件 。 头 文件 瑞 文 为 header， 顾 名 思 
义 ， 是 指 放 在 程序 头 部 的 文件 。 为 什么 要 放 在 头 部 
呢 ? 因为 像 “void io_out8 Cint port,int data) ;” 这 种 
声明 必须 在 一 开始 就 让 编译 占 知 道 。 


前 面 曾 经 提 到 ， 要 使 用 spintf 函 数 ， 必 须 在 程序 的 前 
面 写 上 #include 语句 。 这 正 是 因为 stdio.h 中 含有 对 


sprintf Ps 3 HEH., AFG SCE AN i Ss AIS 
AIAG SKA, (AAG R ESC EAA a SY AS E] 
而 已 。 双 引号 〈") 表示 该 头 文 件 与 源 文件 位 于 同 
AFRE, MRS (<>) 则 表示 该 头 文 件 
位 于 编译 器 所 提供 的 文件 夹 里 。 


这 次 用 了 很 多 拓 efine 语 句 ， 把 用 到 的 地 址 都 只 写 在 
了 bootpack.h 文 件 里 。 之 所 以 这 么 做 是 因为 ， 如 果 
以 后 想 要 变更 地 址 的 话 ， 只 修改 bootpack.h 一 个 文 
HERAT I 


好 了 ， 我 们 运行 一 下 每 次 必 做 的 “make run” ff A — 
下 。 挺 好 挺 好 ， 运 行 结果 没有 问题 。 现 在 再 来 确认 
一 下 源 文 件 的 长 度 。 


bootpack.h ... 69 行 
graphic.C .....。 156 行 
dsctb1.C .........0ccecesceeees 51 行 
bootpack.c .….。 2547 
= E 30147 


“ 分割 前 是 280 行 ， 这 样 算 来 结果 还 增加 了 21 行 ， 
不 过 因为 我 们 进行 了 分 制 ， 所 以 无 法 避免 这 种 情 
况 。 而 我 们 分 割 的 目的 也 不 是 为 了 缩短 源 文 件 ， 
所 以 总 的 来 说 还 是 比较 满意 的 。 (可 在 6.1 节 确认 
分 割 的 目的 ) 


4 意犹未尽 


好 了 ， 现 在 来 详细 讲 一 下 昨天 遗留 下 来 的 问题 。 前 
先 来 说 明 一 下 naskfunc.nas 的 _load_gdtr。 
_load_gdtr: ; void load_gdtr(int limit, int addr); 


MOV AX, [ESP+4] ; limit 
MOV [ESP+6],AX 


LGDT [ESP+6] 
RET 


这 个 函数 用 来 将 指定 的 段 上 限 Uimit〉 和 地 址 值 赋 
值 给 名 为 GDTR 的 48 位 寄存 器 。 这 是 一 个 很 特别 的 
48 位 寄存 器 ， 并 不 能 用 我 们 第 用 的 MOV 指 令 来 赋 
值 。 给 它 赋 值 的 时 候 ， 唯 一 的 方法 束 是 指定 一 个 内 
存 地 址 ， 从 指定 的 地 址 读 取 6 个 字 节 (也 就 是 48 
位 ) ， 然 后 赋值 给 GDTR 寄 存 器 。 完 成 这 一 任务 的 
指令 ， 就 是 LGDT。 


该 寄存 喜 的 低 16 位 -〈 即 内 存 的 最 初 2 个 字 节 ) 是 段 
上 限 ， 它 等 于 “GDT 的 有 效 字 节 数 - 1”。 今 后 我 们 还 
会 偶尔 用 到 上 限 这 个 词 ， 意 思 都 是 表示 量 的 大 小 ， 
一 般 为 “ 字 节 数 -1”。 剩 下 的 高 32 位 《〈 即 剩余 的 4 个 
字 节 ) ， 代 表 GDT 的 开始 地 址 。 


“对 于 一 个 多 位 数字 组 成 的 数 ， 徘 近 右 边 的 位 称 


为 低位 。 反 之 ， 徘 近 左 边 的 位 称 为 蜗 位 。 


在 最 初 执行 这 个 函数 的 时 候 ，DWORDI[ESP + 4] 里 
存放 的 是 段 上 限 ，DWORD[ESP+8] 里 存放 的 是 地 
址 。 具 体 到 实际 的 数值 ， 就 是 0x0000ffff 和 
0x00270000。 把 它们 按 字 节 写 出 来 的 话 ， 束 成 了 
[FF FF 00 00 00 27 00] (要 注意 低位 放 在 内 存 地 址 
小 的 字 节 里 *) 。 为 了 执行 LGDT， 笔 者 希望 把 它们 
排列 成 [FF FF 00 00 00 27 00] 的 样子 ， 所 以 就 先 
用 “MOYV AX,[ESP + 4]” 读 取 最 人 急 的 0xffff， 人 然后 再 
写 到 [ESP + 6] 里。 这样， 结果 就 成 了 [FF FF FF FF 
00 27 00 00]， 如 果 从 [ESP + 6] 开 始 读 6 字 节 的 话 ， 
正好 是 我 们 想 要 的 结果 。 


“请 大 家 回想 一 下 2.2 节 。 


naskfunc.nas 的 load idtr 设 置 IDTR 的 值 ， 因 为 IDTR 
与 GDTR 结 构 体 基本 上 是 一 样 的 ， 程 序 也 非常 相 
似 。 


最 后 再 补充 说 明 一 下 dsctbl.c 里 的 set_segmdesc 函 
数 。 这 个 有 些 难度 ， 我 们 仅 介 绍 一 些 与 本 书 相 关 的 
内 容 。 


本 次 的 dsctbl.c 节 选 


struct SEGMENT_DESCRIPTOR { 
short limit_low, base_low; 
char base_mid, access right; 
char limit_high, base high; 
}; 


void set_segmdesc(struct SEGMENT DESCRIPTOR *sd, 
unsigned int limit, int base, int ar) 


if (limit > Oxfffff) { 
ar |= @x8eee; /* G bit = 1 */ 


limit /= 0x1000; 


sd->limit_low 
sd->base_low 
sd->base mid 
Sd->access right 
sd->limit_high 
8) & Oxf@); 
sd->base_ high = (base >> 24) & OxfFf; 
return; 


limit & OxfffFf; 

base & Oxffff; 

(base >> 16) & OxfFf; 

ar & OxfFf; 

((limit >> 16) & @xef) | ((ar >> 


说 到 底 ， 这 个 函数 是 按照 CPU 的 规格 要 求 ， 将 段 的 
言 恩 归结 成 8 个 字 节 写 入 内 存 的 。 这 8 个 字 节 里 到 底 
填 入 了 什么 内 容 呢 ?昨天 已 经 讲 到 ， 有 以 下 3 点 : 


。 段 的 大 小 
。 段 的 起 始 地 址 


。 上 段 的 省 理 属性 (禁止 写 入 ， 茜 止 执行 ， 系 统 专 
用 等 ) 


为 了 写 入 这 些 信 息 ， 我 们 准备 了 struct 
SEGMENT_DESCRIPTOR 这 样 一 个 结构 体 。 下 面 
我 们 就 来 说 明 这 个 结构 体 。 


首先 看 一 下 段 的 地 址 。 地 址 当然 是 用 32 位 来 表示 。 
这 个 地 址 在 CPU 世界 的 语言 里 ， 被 称 为 段 的 基 址 。 
所 以 这 里 使 用 了 base 这 样 一 个 变量 名 。 在 这 个 结构 
体 里 base 叉 分 为 low (2 字 节 ) , mid (1 字 节 )， 
high GFT) 3 段 ， 合 起 来 刚好 是 32 位 。 所 以 ， 这 
里 只 要 按 顺 序 分 别 填 入 相应 的 数值 就 行 了 。 虽 然 有 
点 难 懂 ， 但 原理 很 简单 。 程 序 中 使 用 了 移 位 运算 符 
和 AND 运 算 符 往 各 个 字 节 里 填 入 相应 的 数值 。 


为 什么 要 分 为 3 段 呢 ?主要 是 为 了 与 80286 时 代 的 程 
序 兼 容 。 有 了 这 样 的 规格 ，80286 用 的 操作 系统 ， 
也 可 以 不 用 修改 就 在 386 以 后 的 CPU 上 运行 了 。 


下 面 再 说 一 下 段 上 限 。 它 表示 一 个 段 有 多 少 个 字 
节 。 可 是 这 里 有 一 个 问题 ， 段 上 限 最 大 是 4GB， 也 
就 是 一 个 32 位 的 数值 ， 如 宁 直 接 放 进去 ， 这 个 数值 


本 喘 束 要 占用 4 个 字 节 ， 再 加 上 基 址 Chase) ， 一 共 
束 要 8 个 字 节 ， 这 束 把 整个 结构 体 占 满 了 。 这 样 一 
来 ， 束 没 有 地 方 保 存 段 的 管理 属性 信息 了 ， 这 可 不 
行 。 


因此 段 上 限 只 能 使 用 20 位 。 这 样 一 来 ， 段 上 限 最 大 
也 只 能 指定 到 1MB 为 止 。 明 明 有 4GB， 却 只 能 用 其 
中 的 1IMB， 有 种 又 回 到 了 16 位 时 代 的 错觉 ， 太 可 悲 
了 。 在 这 里 更 特 尔 的 叔叔 们 又 想 了 一 个 办 法 ， 他 们 
在 段 的 属性 里 设 了 一 个 标志 位 ， 叫 做 Gbit。 这 个 标 
志 位 是 1 的 时 候 ，limit 的 单位 不 解释 成 字 节 

(byte) ， 而 解释 成 页 (page) 。 页 是 什么 呢 ? 在 
电脑 的 CPU 里 ，1 页 是 指 4KB。 


这 样 一 来 ，4KB x 1M = 4GB， 所 以 可 以 指定 4GB 的 
段 。 总 算 能 放心 了 。 顺 便 说 一 句 ，G bit 的 “G”， 
是 “granularity” 的 缩写 ， 是 指 单位 的 大 小 。 


这 20 位 的 段 上 限 分 别 写 到 limit low 和 1limit_ high 里 。 
看 起 来 它们 好 像 是 总 共有 3 字 节 ， 即 24 位 ， 但 实际 
上 我 们 接着 要 把 段 属性 写 入 limit high 的 高 4 位 里 ， 
所 以 最 后 段 上 限 还 是 只 有 20， 好 复杂 呀 。 


最 后 再 来 讲 一 下 12 位 的 段 属性 。 段 属性 又 称 为 " 段 


的 访问 权 属 性 ”， 在 程序 中 用 变量 名 access_right 或 ar 
来 表示 。 因 为 12 位 段 属性 中 的 高 4 位 放 在 limit_high 
的 高 4 位 里 ， 所 以 程序 里 有 意 把 ar 当 作 如 下 的 16 位 构 
成 来 处 理 : 


XXXX@66066XXXXXXXX( 其 中 x 是 6 或 1) 


ar 的 高 4 位 被 称 为 "扩展 访问 权 ”。 为 什么 这 么 说 呢 ? 
因为 这 高 4 位 的 访问 属性 在 80286 的 时 代 还 不 存在 ， 
到 386 以 后 才 可 以 使 用 。 这 4 位 是 由 “GD00” 构 成 
的 ， 其 中 G 是 指 刚 才 所 说 的 G bit，D 是 指 段 的 模 
式 ，1 是 指 32 位 模式 ，0 是 指 16 位 模式 。 这 里 出 现 的 
16 位 模式 主要 只 用 于 运行 80286 的 程序 ， 不 能 用 于 
调用 BIOS。 所 以 ， 除 了 运行 80286 程 序 以 外 ， 通 常 
都 使 用 D=1 的 模式 。 


ar 的 低 8 位 从 80286 时 代 束 已 经 有 了， 如 末 要 详细 说 
明 的 话 ， 够 我 们 说 一 天 的 了 ， 所 以 这 里 只 是 简单 地 


Maa Fe 


00000000 (0x00) : 未 使 用 的 记录 表 
(descriptor table) 。 


10010010 (0x92) : 系统 专用 ， 可 读 写 的 段 。 不 
可 执行 。 


10011010 (6x9a) : 系统 专用 ， 可 执行 的 段 。 可 


二 不 可 写 。 

11110010 (6xf2) : MARE, Die Sn. 
不 可 执行 。 

11111616 (@xfa) : 应 用 程序 用 ， 可 执行 的 段 。 
可 旋 不 可 写 。 


“系统 专用 ”， “应 用 程序 用 ”什么 的 ， 听 着 让 人 换 不 
看 头脑 。 都 是 些 什么 东西 呀 ? 在 32 位 模式 下 ，CPU 
有 系统 模式 (也 称 为 “ring0””) 和 应 用 模式 〈 也 称 
为 “ring3”) 之 分 。 操 作 系 统 等 “管理 用 ”的 程序 ， 和 
ere ween armas 运行 时 的 模式 是 不 同 


3 除 此 之 外 ， 还 有 ringl1 和 ring2， 这 些 中 间 阶 段 ， 
由 device driver (设备 驱动 器 ， 等 使 用 。ring 原 意 
是 轮子 或 环 ， 有 了 时 用 它 来 表示 阶段 ， 故 得 此 名 。 


比如 ， 如 果 在 应 用 模式 下 试图 执行 LGDT 等 指令 的 
话 ，CPU 则 对 该 指令 不 予 执行 ， 并 马上 告诉 操作 系 
统 说 “那个 应 用 程序 大 然 想 要 执行 LGDT， 有 问 
题 ! ”。 为 外 ， 当 应 用 程序 想 要 使 用 系统 专用 的 段 
时 ，CPU 也 会 中 断 执行 ， 并 马上 回 操 作 系 统 报 
告 “那个 应 用 程序 想 要 盗 取 系统 信息 。 也 有 可 能 不 


仅 要 盗 取 信息 ， 还 要 写 点 东西 来 破坏 系统 呢 。” 


“ 想 要 资 取 系统 信息 这 一 点 我 明白 ， 但 要 阻止 LGDT 
的 执行 这 一 点 ， 我 还 是 不 懂 。” 可 能 有 人 会 有 这 种 
疑问 。 当 然 要 阻止 图， 因为 如 果 人 允许 应 用 程序 执行 
LGDI， 那 应 用 程序 就 会 根据 自己 的 需要 ， 偷 偷 准 
备 GDT， 然后 重新 改定 LGDT 来 让 它 执行 自己 准备 
的 GDT。 这 可 就 斥 烦 了 。 有 了 这 个 漏洞 ， 操 作 系 统 
再 怎么 防守 还 是 会 防不胜防 。 


CPU 到 压 古 处 于 系统 模式 还 是 应 用 模式 ， 取 决 于 执 
行 中 的 应 用 程序 是 位 于 访问 权 为 0x9a 的 段 ， 还 是 位 
于 访问 权 为 0xfa 的 段 。 


5 初始 化 PIC Charib03d) 


那 好 ， 现 在 双 俩 〈 指 昨天 没 讲 完 的 部 分 ) 也 还 清 
了 ， 束 继续 往 后 讲 吧 。 我 们 接着 昨天 继续 做 鼠标 指 
针 的 移动 。 为 达到 这 个 目的 必须 使 用 中 汤 ， 而 要 使 
用 中 断 ， 则 必须 将 GDT 和 IDT 正 确 无 误 地 初始 化 。 


主板 上 配置 的 芯片 组 


‘eT 0) S 
PO SE Oo Ps 


FM ELA EA HPL. Ae, A PH 
没 做 一 一 还 没有 初始 化 PIC。 那 么 我 们 现在 就 来 
做 。 


所 谓 PIC 是 “programmable interrupt controller” 的 缩 
写 ， 意 思 是 “可 编程 中 断 控 制 句 ?>”。PIC 与 中 断 的 天 
系 可 是 很 密切 的 哟 。 它 到 确 是 什么 呢 ? 在 设计 上 ， 
CPU 单独 只 能 处 理 一 个 中 断 ， 这 不 够 用 ， 所 以 IBM 
的 大 叔 们 在 设计 电脑 时 ， 台 在 主板 上 增设 了 几 个 畏 


助 芯 片 。 现 如 今 它 们 已 经 被 集成 在 一 个 芯片 组 里 
7 


PIC 是 将 8 个 中 断 信号 :集合 成 一 个 中 断 信 号 的 装 
置 。PIC 监 视 着 输入 管 脚 的 8 个 中 断 信 号 ， 只 要 有 一 
个 中 断 信 号 进来 ， 束 将 唯一 的 输出 管 脚 信 号 变 成 
ON， 并 通知 给 CPU。IBM 的 大 叔 们 想 要 通过 增加 
PIC 来 处 理 更 多 的 中 断 信 号 ， 他 们 认为 电脑 会 有 8 个 
以 上 的 外 部 设备 ， 所 以 就 把 中 断 信 号 设计 成 了 15 
个 ， 并 为 此 增设 了 2 个 PIC。 


1 英文 是 interrupt request， 缩 写 为 IRQ。 
那 它 们 的 线路 是 如 何 连 接 的 呢 ? BOP AAT AN. 


与 CPU 直接 相连 的 PIC 称 为 主 PIC (master PIC) , 
与 主 PIC 相连 的 PIC 称 为 从 PIC (slave PIC) 。 主 PIC 
负责 处 理 第 0 到 第 7 号 中 断 信 号 ， 从 PIC 负责 处 理 第 8 
到 第 15 号 中 断 信 号 。master 意 为 主人 ，Sslave 意 为 奴 
隶 ， 笔 者 搞 不 清楚 这 两 个 词 的 由 来 ， 但 现在 结果 是 
不 论 从 PIC 如 何 地 拼命 努力 ， 如 果 主 PIC 不 通知 给 
CPU， 从 PIC 的 意思 也 就 不 能 传达 给 CPU。 或 许 是 
从 这 种 关系 上 考虑 ， 而 把 它们 一 个 称 为 主人 ,一 
称 为 奴隶 。 


另外 ， 从 PIC 通 过 第 2 号 IRQ 与 主 PIC 相 连 。 主 板 上 


的 配 线 就 是 这 样 ， 无 法 用 软件 来 改变 。 


co 


IRQ 8 


IRQ 9 
IRQ 10 
IRQ 11 
IRQ 12 
IRQ 13 


IRQ 14 
IRQ 15 


KM PIC 必须 通过 IRQ2 来 连接 


为 什么 是 第 2 号 IRQ 了 呢 ? 事实 上 笔者 也 搞 不 清楚。 
是 不 是 因为 第 0 号 和 第 1 号 已 经 被 占用 了 ， 而 第 2 号 
MELTE, MARHE cee. W... 如 果 有 人 
想 进 一 步 了 解 这 个 问题 ， 请 一 定 打 电话 问 问 IBM 
的 大 叔 们 。 


有 人 可 能 会 纳闷 儿 ， 怎 么 突然 讲 起 硬件 来 了 ? 这 是 
因为 ， 如 果 不 异 得 这 部 分 的 人 硬件 结构 ， 束 无 法 顺利 
设 定 PIC。 


int.c 的 主要 组 成 部 分 


void init pic(void) 


/* PIC 的 初始 化 */ 

{ 
io_out8(PIC@ IMR, 
io_out8(PIC1_IMR, 


io_out8(PICe ICw1, 
trigger mode) */ 

io_out8(PICe@ ICW2, 
zi 

io_out8(PICO_ICW3, 

io_out8(PICO_ICW4, 


io_out8(PIC1_ICW1, 
trigger mode) */ 

io_out8(PIC1_ICW2, 
*/ 

io out8(PIC1 ICW3, 

io out8(PIC1_Icw4, 


io_out8(PIC@ IMR, 
禁止 */ 

io_out8(PIC1_IMR, 
* 


return; 


Oxf Ff 
Oxf Ff 


0x11 


0x20 


1 << 
0x01 


0x11 


0x28 


2 
0x01 


@xfb 


Oxf Ff 


REMA HE */ 
RIERA HE */ 


边沿 触发 模式 (edge 
IRQ6-7 由 INT26-27 接 收 


PIC1 由 IRQ2 连 接 */ 
无 缓冲 区 模式 */ 


边沿 触发 模式 (edge 
IRQ8-15 由 INT28-2f 接 收 


PIC1 由 IRQ2 连 接 */ 
无 缓冲 区 模式 */ 


11111011 PIC1 以 外 全 部 


11111111 EAA Hit 


以 上 是 PIC 的 初始 化 程序 。 从 CPU 的 角度 来 看 ，PIC 
是 外 部 设备 ，CPU 使 用 OUT 指 令 进 行 操 作 。 程 序 中 
的 PIC0 和 PIC1， 分 别 指 主 PIC 和 从 PIC。PIC 内 部 有 
很 多 寄存 器 ， 用 端口 号 码 对 彼此 进行 区 别 ， 以 决定 


是 写 入 哪 一 个 寄存 融 


(0) 


具体 的 端口 号 人 码 写 在 bootpack.h 里 ， 请 参考 这 个 程 
序 。 但 是 ， 病 口号 相同 的 东西 有 很 多 ， 可 能 会 让 人 
觉得 混乱 。 不 过 笔者 并 没有 搞 钳 ， 写 的 是 正确 的 。 
因为 PIC 有 些 很 细微 的 规则 ， 比 如 写 入 ICW1 之 后 ， 
紧 跟着 一 定 要 写 入 ICW2 等 ， 所 以 即使 端口 号 相 
同 ， 也 能 够 很 好 地 区 别 开 来 。 


现在 简单 介绍 一 下 PIC 的 寄存 器 。 首 先 ， 它 们 都 是 8 
NL ai ties IMR “interrupt mask register” hJ 4g 5 , 
意思 是 “中 断 屏 蔽 寄存 器 ”。8 位 分 别 对 应 8 路 IRQ 信 
号 。 如 果 茶 一 位 的 值 是 1， 则 该 位 所 对 应 的 IRQ 信 号 
AEFI, PICK AMAR aS. AEREN, IE 
EX HPT Ac rE ETT EI, UR zeal A Bae 
引起 混乱 ， 为 了 防止 这 种 情况 的 发 生 ， 就 必须 屏蔽 
中 断 。 还 有 ， 如 果 某 个 IRQ 没 有 连接 任何 设备 的 
话 ， 静 电 王 扰 等 也 可 能 会 引起 反应 ， 导 致 操作 系统 
VEEL, PTD th 22 BF CIS SE FTL o 


ICWe “initial control word” 的 缩写 ， 意 为 “初始 化 控 
制 数 据 ”。 因 为 这 里 写 着 word， 所 以 我 们 会 想 ,，“ 是 
不 是 16 位 ”? 不 过 ， 只 有 在 电脑 的 CPU 里 ，word 这 
个 词 才 是 16 位 的 意思 ， 在 别 的 设备 上 ， 有 时 指 8 

位 ， 有 时 也 会 指 32 位 。PIC 不 是 仅 为 电脑 的 CPU 而 
设计 的 控制 公 片 ， 其 他 种 类 的 CPU 也 能 使 用 ， 上 所 以 


这 里 word 的 意思 也 并 不 是 我 们 觉得 理所当然 的 16 
人 


ICW 有 4 个 ， 分 别 编 号 为 1v4， 共 有 4 个 字 节 的 数 
据 。ICW1 和 ICW4 与 PIC 主板 配 线 方式 、 中 上 断 信和 号 
的 电气 特性 等 有 关 ， 所 以 就 不 详细 说 明了 。 电 脑 上 
设 定 的 是 上 述 程序 所 示 的 固定 值 ， 不 会 设 定 其 他 的 
值 。 如 果 故 意 改 成 别 的 什么 值 的 话 ， 早 期 的 电脑 说 
不 定 会 烧 断 保险 丝 ， 或 者 器 件 冒 MP; AY) 
脑 ， 对 这 种 设 定 起 反应 的 电路 本 身 被 省 略 了 ， 所 以 
不 会 有 任何 反应 。 


“电路 上 ，+5V 与 GND (ith) 短路 时 ， 就 会 发 生 保 
险 丝 熔断 、 器 件 冒 烟 的 现象 。 这 可 不 是 吓 距 你 ， 
而 是 真 的 会 发 生 。 


ICW3 是 有 关 主 一 从 连接 的 设 定 ， 对 主 PIC 而 言 ， 第 
几 写 IRQ 与 从 PIC 相 连 ， 是 用 8 位 来 设 定 的 。 如 果 把 
这 些 位 全 部 设 为 1， 那 么 主 PIC 就 能 驱动 8 个 从 

PIC〈 那 样 的 话 ， 最 大 束 可 能 有 64 个 IRQ) ， 但 我 们 
所 用 的 电脑 并 不 是 这 样 的 ， 所 以 就 设 定 成 
00000100。 另 外 ， 对 从 PIC 来 说 ， 该 从 PIC 与 主 PIC 
的 第 几 号 相连 ， 用 3 位 来 设 定 。 因 为 硬件 上 已 经 不 
可 能 更 改 了 ， 如 果 软 件 上 设 定 不 一 致 的 话 ， 只 会 发 
生 错 误 ， 所 以 只 能 维持 现 有 设 定 不 变 。 


因此 不 同 的 操作 系统 可 以 进行 独特 设 定 的 就 只 有 
ICW2 了 。 这 个 ICW2， 决 定 了 IRQ 以 哪 一 亏 中 断 通 
知 CPU。“ 哎 ? 怎么 有 这 种 事 ? 刚才 不 是 说 中 断 信 
号 的 管 脚 只 有 1 根 吗 ? ?” 咖 ， 话 是 那么 说 ， 但 PIC 还 
有 个 挺 有 意思 的 小 寄 门 ， 利 用 它 就 可 以 由 PIC 来 设 
定 中 断 号 了 。 


大 家 可 能 会 对 此 有 兴趣 ， 所 以 再 详细 介绍 一 下 。 
中 断 发 生 以 后 ， 如 果 CPU 可 以 受理 这 个 中 晰 ， 

CPU 束 会 命令 PIC 发 送 2 个 字 厄 的 数据 。 这 2 个 字 节 
是 怎么 传送 的 呢 ?CPU 与 PIC 用 IN 或 OUT 进 行 数 


据 传 送 时 ， 有 数据 信号 线 连 在 一 起 。PIC 束 是 利用 


这 个 信号 线 发 送 这 2 个 字 节 数据 的 。 送 过 来 的 数据 
是 “0xcd 0x??” 这 两 个 字 方 。 由 于 电路 设计 的 原 
因 ， 这 两 个 字 节 的 数据 在 CPU 看 来 ， 与 从 内 存 读 
进来 的 程序 是 完全 一 样 的 ， 所 以 CPU 就 把 送 过 来 
的 “0xcd 0x??” 作 为 机 器 语言 执行 。 这 恰恰 就 是 把 
数据 当 作 程序 来 执行 的 情况 。 这 里 的 0xcd 束 是 调 
用 BIOS 时 使 用 的 那个 INT 指 令 。 我 们 在 程序 里 写 
的 “INT 0x10”， 最 后 就 被 编译 成 “Oxcd 0x10”. 
所 以 ，CPU 上 了 PIC 的 当 ， 按 照 PIC 所 和 希望 的 中 断 
号 执行 了 INT 指 令 。 


这 次 是 以 INT 0x20~0x2f 接 收 中 断 信 号 IRQO0~15 而 设 


定 的 。 这 里 大 家 可 能 又 会 有 疑问 了 。“ 直 接 用 INT 

0x00~0x0f 束 不 行 吗 ?这 样 与 IRQ 的 号 人 码 不 就 一 样 了 
Wh? 为 什么 非 要 加 上 0x20? ”不 要 着 急 ， 先 等 笔者 

说 完 再 问 嘛 。 是 这 样 的 ，INT 0x00~0x1f 不 能 用 于 

IRQ, NEME. 


之 所 以 不 能 用 ， 是 因为 应 用 程序 想 要 对 操作 系统 干 
坏事 的 时 候 ，CPU 内 部 会 目 动产 生 INT 0x00~0x1f, 

如 果 IRQ 与 这 些 号 码 重复 了 ， CPU 就 分 不 清 它 到 底 
是 IRQ， 还 是 CPU 的 系统 保护 通知 。 


这 样 ， 我 们 残 理 解 了 这 个 程序 ， 把 它 保存 为 int.c。 
今后 要 进行 中 断 处 理 的 还 有 很 多 ， 所 以 我 们 就 给 它 
男 起 了 一 个 名 字 。 从 bootpack.c 的 HariMain 调 用 
init_pic。 


我 们 来 运行 一 下 “make run”。 因 为 这 只 是 内 部 设 
定 ， 所 以 画面 上 没有 什么 变化 ， 昌 然 觉 得 不 过 瘾 没 
有 特别 大 的 成 就 感 ， 但 看 起 来 可 以 正常 运行 。 


6 中断 处 理 程 序 的 制作 Charib03e ) 


“重印 时 的 补充 说 明 : 本 文中 只 讲 到 了 IRQ1 和 
IRQ12 的 中 断 处 理 程 序 。 事 实 上 附属 光盘 中 还 有 
IRQ7 的 中 断 处 理 程 序 。 要 它 干 什么 呢 ? 因为 对 于 
一 部 分 机 种 而 言 ， 随 着 PIC 的 初始 化 ， 会 产生 一 次 
IRQ7 中 断 ， 如 果 不 对 该 中 断 处 理 程序 执行 

STI《〈 设 置 中 断 标志 位 ， 见 第 4 章 ) ， 操 作 系 统 的 
局 动 会 失败 。 关 于 inthandler27 的 处 理 内 容 ， 大 家 
读 一 读 7 .1 节 会 更 容易 理解 。 


今天 的 内 容 所 剩 不 多 了 ， 大 家 再 加 一 把 劲 。 鼠 标 是 
IRQ12， 键 盘 是 IRQ1， 上 所 以 我 们 编写 了 用 于 INT 
0x2c 和 INT 0x21 的 中 断 处 理 程序 Chandler) ， 即 中 
晰 发 生 时 所 要 调用 的 程序 。 


int.cH) qi 2E 


void inthandler21(int *esp) 
/* 来 自 PS/2 键 盘 的 中 断 */ 
{ 


struct BOOTINFO *binfo = (struct BOOTINFO *) 
ADR_BOOTINFO; 

boxfill8(binfo->vram, binfo->scrnx, COL8_000000, ©, 
0, 32 * 8 - 1, 15); 

putfonts8 asc(binfo->vram, binfo->scrnx, ©, @, 
COL8_FFFFFF, "INT 21 (IRQ-1) : PS/2 keyboard"); 

for (33) { 


io hlt(); 
} 
} 


正如 大 家 所 见 ， 这 个 函数 只 是 显示 一 条 信息 ， 然 后 
保持 在 待机 状态 。 鼠 标的 程序 也 几乎 完全 一 样 ， 只 
是 显示 的 信息 不 同 而 已 。“ 只 写 鼠 标 程 序 不 就 行 了 
In, BAR'S Se? ”， 因 为 键盘 与 鼠标 的 处 
理 方法 很 相像 ， 所 以 顺便 写 了 一 下 。inthandler21 接 
收 了 esp 指 针 的 值 ， 但 函数 中 并 没有 用 。 在 这 里 暂 
时 不 用 esp， 不 必 在 意 。 


如 果 这 样 束 能 运行 ， 那 就 太 好 了 ， 可 惜 还 不 行 。 中 
只 处 理 完 成 之 后 ， 不 能 执行 “return;”(=RET 指 
A) ， 而 是 必须 执行 IRETD 指 令 ， 真 不 好 办 。 而 
且 ， 这 个 指令 还 不 能 用 C 语 言 写 *。 所 以 ， 还 得 借助 
汇编 语言 的 力量 修改 naskfunc.nas 。 
“对 于 我 们 今天 这 个 程序 来 说 ， 在 中 上 断 处 理 程序 
中 无 限 循 环 ，IRETD 指 令 得 不 到 执行 ， 所 以 怎么 
都 行 。 之 所 以 说 “不 能 用 C 语 言 来 写 ”， 是 为 了 今 
后 。 


本 次 的 naskfunc.nas 节 选 


EXTERN _inthandler21, _inthandler2c 


_asm_inthandler21: 


EAX, ESP 

EAX 

AX,SS 

DS , AX 

ES, AX 
_inthandler21 


RITR PEERLESS, [AVA ARPES AME ee — FE 
的 。 最 后 的 IRETD 了 刚才 已 经 讲 过 了 。 最 开头 的 
EXTERN 指 令 ， 在 调用 (CALL ) 的 地 方 再 进行 说 
明 。 这 样 一 来 ， 问 题 承 只 剩 下 PUSH 和 POP 了 。 


继续 往 下 说 明之 前 ， 我 们 要 先 好 好 解释 一 下 材 
(stack) 的 概念 。 


写 程序 的 时 候 ， 经 种 会 有 这 种 需求 一 一 虽然 不 用 永 
入 记 忆 ， 但 需要 暂时 记 住 茶 些 东 西 以 备 后 用 。 这 种 
目的 的 记忆 被 称 为 组 冲 区 (buffer) 。 突 然 一 下 于 


接收 到 大 量 信息 时 ， 移 把 它们 都 保存 在 缓冲 区 里 ， 
然后 再 慢 慢 处 理 ， 绥 冲 区 一 词 正 古来 源 于 这 层 意 
思 。 根 据 整 理 记忆 内 容 的 方式 ， 绥 冲 区 分 为 很 多 种 


X, 


RH SHIA, 就 是 将 信息 从 上 面 逐 渐 加 入 进 
来 ， 需 要 时 再 从 下 面 一 个 个 取出 。 


加 入 时 取出 时 
y 
5 


INGEN, 


绥 冲 的 种 类 (1) 


最 先 加 入 的 信息 也 最 先 取 出 ， 所 以 这 种 缓冲 区 
是 “先进 先 出 ”(first in, first out) ， 简 称 FIFO。 这 


应 该 是 最 普通 的 方式 了 。 有 的 书 中 也 会 称 之 为 “后 
进 后 出 ”(]last in, last out) ， 即 LILO。 叫 法 虽然 不 
同 ， 但 实质 上 是 同样 的 东西 。 


下 和 面 要 介绍 的 一 种 方式 ， 有 点 类 似 于 往 果 上 放 书 ， 
也 束 是 信息 逐渐 从 上 面 加 入 进来 ， 而 取出 时 也 从 最 
上 面 开始 。 


缓冲 的 种 类 (2) 

最 先 加 入 的 信息 最 后 取出 ， 所 以 这 种 缓冲 区 是 “ 先 
进 后 出 ”(first in, last out) ， 人 简称 FILO。 有 的 书 上 
也 称 之 为 “后 进 先 出 ”(]last in, first out) ， 即 LIFO 。 


这 里 要 说 明 的 栈 ， 正 是 FILO 型 的 缓冲 区 。PUSH 将 
数据 压 入 栈 顶 ，POP 将 数据 从 栈 顶 取出 。PUSH 
EAX 这 个 指令 ， 相 当 于 : 


ADD ESP, -4 
MOV [SS:ESP], EAX 


也 就 是 说 ，ESP 的 值 减 去 4， 以 所 得 结果 作为 地 址 
值 ， 将 寄存 右 中 的 值 保存 到 该 地 址 所 对 应 内 存 里 。 
反 过 来 ，POP EAX 指 令 相 当 于 : 


MOV EAX, [SS:ESP] 
ADD ESP,4 


CPU 并 不 懂 栈 的 机 制 ， 它 只 是 执行 了 实现 栈 功 能 的 

令 而 已 。 所 以 ， 即 使 是 PUSH 太 多 ， 或 者 POP 大 
多 这 种 没有 意义 的 操作 ， 基 本 上 CPU 也 都 会 遵照 执 
行 。 


所 以 ， 如 条 与 了 以 下 程序 ， 


在 “各 种 处 理 ” 那 里 ， 即 使 把 EAX，ECX，EDX 改 


了 ， 最 后 也 还 会 恢复 回 原来 的 值 .…... 其 实 ES、DS 
这 些 寄存 器 ， 也 就 是 靠 PUSH 和 EOP 等 操作 而 变 回 
原来 的 值 的 。 


还 有 一 个 不 怎么 常见 的 指令 PUSHAD， 它 相当 于 : 


反 过 来 ，POPAD 指 令 相 当 于 按 以 上 相反 的 顺序 ， 把 
它们 全 都 POP 出 来 。 


结果 ， 这 个 函数 只 是 将 寄存 器 的 值 保存 到 栈 里 ， 然 
后 将 DS 和 ES 调整 到 与 SS 相等 ， 再 调用 

_inthandler21， 返 回 以 后 ， 将 所 有 寄存 器 的 值 再 返 
回 到 原来 的 值 ， 然 后 执行 IRETD。 内 容 就 这 些 。 如 
此 小 心 导 翼 地 保存 寄存 器 的 值 ， 其 原因 在 于 ， 中 断 
处 理发 生 在 函数 处 理 的 途中 ， 通 过 IREDT 从 中 断 处 
理 返 回 以 后 ， 如 果 寄 存 器 的 值 乱 了 ， 函 数 就 无 法 正 


FENDER RA, ATER AR INS AL oF FF as WE 
返回 到 中 断 处 理 前 的 状态 。 


关于 在 DS 和 ES 中 放 入 SS 值 的 部 分 ， 因 为 C 语 言 目 以 
为 是 地 认为 “DS 也 好 ，ES 也 好 ，SS 也 好 ， 它 们 都 是 
指 同 一 个 段 "， 所 以 如 果 不 按 照 它 的 想法 设 定 的 
话 ， 函 数 inthandler21 就 不 能 顺利 执行 。 所 以 ， 虽 然 
麻烦 了 一 点 ， 但 还 是 要 这 样 做 。 


这 么 说 来 ，CALL 也 是 一 个 新 出 现 的 指令 ， 它 是 调 
用 函数 的 指令 。 这 次 要 调用 一 个 没有 定义 在 
naskfunc.nas 中 的 函数 ， 所 以 我 们 最 初 用 一 个 
EXTERN 指 令 来 通知 nask: “马上 要 使 用 这 个 名 字 的 
标号 了 ， 它 在 别 的 源 文 件 里 ， 可 不 要 搞 错 了 ”。 


好 了 ， 这 样 asm inthandler21 的 讲解 就 没有 问题 
吧 。 下 面 要 说 明 的 ， 就 是 要 将 这 个 函数 注册 到 IDT 
中 去 这 一 点 。 我 们 在 dsctbl.c 的 init_gdtidt 里 加 入 以 下 
语句 。 

/* IDT 的 设 定 */ 

set_gatedesc(idt + 0x21, (int) asm_inthandler21, 2 * 8, 
AR_INTGATE32); 


set_gatedesc(idt + @x2c, (int) asm_inthandler2c, 2 * 8, 
AR_INTGATE32) ; 


asm_inthandler21 注 册 在 idt 的 第 0x21 号 。 这 样 ， 如 果 
发 生 中 汤 了 ，CPU 束 会 自动 调用 asm_inthandler21。 
这 里 的 2* 8 表示 的 是 asm_inthandler21 属 于 哪 一 个 
上段， 即 段 号 是 2， 乘 以 8 是 因为 低 3 位 有 着 别 的 意 

思 ， 这 里 低 3 位 必须 是 0。 


所 以 ，“2* 8” 也 可 以 写成 “2<<3”， 当然 ， 写 成 16 
也 可 以 。 
不 过 ， 号 码 为 2 的 段 ， 究 竟 是 什么 样 的 段 呢 ? 


set_segmdesc(gdt + 2, LIMIT_BOTPAK, ADR_BOTPAK, 
AR_CODE32_ER); 


程序 中 有 以 上 语句 ， 说 明 这 个 段 正好 涵盖 了 整个 
bootpack.hrb. 


最 后 的 AR_INTGATE32 将 IDT 的 属性 ， 设 定 为 
0x008e。 它 表示 这 是 用 于 中 上 断 处 理 的 有 效 设 定 。 


还 有 就 是 对 bootpack.c 的 HariMain 的 补 

充 .“io_sti0;” 仅 仅 是 执行 STI 指 令 ， 它 是 CLI 的 逆 指 
令 。 束 是 说 ， 执 行 STI 指 令 后 ，IF (interrupt flag, 
中 上 断 许可 标志 位 ) 变 为 1，CPU 接 受 来 自 外 部 设备 
的 中 断 《〈 人 参考 4.6 节 ) 。CPU 的 中 断 信 号 只 有 一 根 ， 


所 以 IF 也 只 有 一 个 ， 不 像 PIC 那 样 有 8 位 。 

在 HariMain 的 最 后 ， 修 改 了 PIC 的 IMR， 以 便 接 受 
来 自 键 盘 和 鼠标 的 中 断 。 这 样 程 序 就 完成 了 。 只 要 
按 下 键盘 上 某 个 键 ， 或 动 一 动 鼠 标 ， 中 断 信 号 就 会 
传 到 CPU， 然 后 CPU 执行 中 断 处 理 程序 ， 输 出 信 
导 。 


那 好 ， 我 们 运行 一 下 试 试 看 。 “make run”...... 然 后 
按 下 键盘 上 的 “A”...... 哦 ! 显示 了 一 行 信息 。 


按 下 字母 A 之 后 


让 我 们 先 退 出 程序 ， 再 运行 一 次 “make run” 吧 。 这 
次 我 们 随便 转 转 鼠标 。 但 怎么 让 鼠标 转 起 来 呢 ? 首 
先 我 们 在 QEMU 男 面 的 某 个 地 方 单 击 一 下 ， 这 样 束 
把 鼠标 与 QEMU 绑 定 在 一 起 了 ， 鼠 标 事件 都 会 由 
QEMU 接 受 并 处 理 。 然 后 我 们 上 下 左右 移动 鼠标 ， 


MAPE RE. I? 怎么 没 反 应 呢 ? 


WMC? 明明 动 了 鼠标 呆 ? ! 


在 这 个 状态 下 ， 我 们 不 能 对 Windows 进 行 操作 ， 所 
以 只 好 按 下 Ctr 键 再 按 Alt 键 ， 先 把 鼠标 从 QEMU 中 
解放 出 来 。 然 后 点 击 “x”， 关 闭 QEMU 和 窗口。 


虽然 今天 的 结束 还 不 能 让 人 满意 ， 但 天 色 已 经 很 晚 
了 ， 际 先 到 此 为 止 吧 。 原 因 呆 ， 让 我 们 来 思考 一 

人 夜 。 但 不 论 怎么 说 ， 键 盘 的 中 断 设 定 已 经 成 功 了 ， 
至 于 鼠标 的 问题 ， 肯 定 也 能 很 快 找到 原因 的 。 我 们 
明天 再 继续 吧 。 


第 7 天 FIFO 与 鼠标 控制 


。 获 取 按 键 编码 (hiarib04a ) 

。 加快 中 断 处 理 (hiarib04b) 

。 il] (EFIFOZ2/4 1X Chiarib04c ) 
。 改善 FIFO 绥 冲 区 Chiarib04d) 
。 整 理 FIFO 绥 冲 区 Chiarib04e ) 
。 总 算 讲 到 忌 标 了 Chiarib04f) 
。 从 鼠标 接收 数据 (hiarib04g) 


1 获取 按键 编 合 (hiarib04a ) 


今天 我 们 继续 加 油 吧 。 鼠 标 不 动 的 原因 已 经 大 体 弄 
清楚 了， 主要 是 由 于 设 定 不 到 位 。 但 是 ， 在 解决 局 
标 问 题 之 前 ， 还 是 先 利 用 键盘 多 练 练 手 ， 这 样 更 易 
于 鼠标 问题 的 理解 。 


现在 ， 只 要 在 键盘 上 按 一 个 键 ， 就 会 在 屏幕 上 显示 
出 信息 ， 其 他 的 我 们 什么 都 做 不 了 。 我 们 将 程序 改 
善 一 下 ， 让 程序 在 按 下 一 个 键 后 不 结束 ， 而 是 把 所 
按键 的 编码 在 画面 上 显示 出 来 ， 这 样 就 可 以 切实 完 
成 中 断 处 理 程序 了 。 


我 们 要 修改 的 ， 是 int.c 程 序 中 的 inthandler21 函 数 ， 
有 基体 如 下 : 


int.c T Ut 


#define PORT _KEYDAT 0x0060 


void inthandler21(int *esp) 
{ 

struct BOOTINFO *binfo = (struct BOOTINFO *) 
ADR_BOOTINFO; 

unsigned char data, s[4]; 

io out8(PIC@ OCW2, 0x61); /* 通知 PIC"IRQ-61 已 经 受 
理 完毕 ”*/ 

data = io in8(PORT_KEYDAT); 


sprintf(s, "%@2X", data); 

boxfill8(binfo->vram, binfo->scrnx, COL8 008484, ®©, 
16, 15, 31); 

putfonts8 asc(binfo->vram, binfo->scrnx, ©, 16, 
COL8_FFFFFF, s); 


return; 


首先 请 把 目光 转移 到 “io_out8(PICO0_OCW2， 

0x61);” 这 人 句 话 上 。 这 人 句 话 用 来 通知 PIC“ 己 经 知道 发 
生 了 IRQ1 中 断 哦 ?。 如 果 是 IRQ3， 则 写成 0x63。 也 
就 是 说 ， 将 “0x60+IRQ 号 码 ” 输 出 给 OCW2 就 可 以 。 
执行 这 句 话 之 后 ，PIC 继 续 时 刻 监 视 IRQ1 中 断 是 和 否 
发 生 。 反 过 来 ， 如 果 和 态 记 了 执行 这 人 句 话 ，PIC 就 不 
再 监视 IRQ1 中 断 ， 不 管 下 次 由 键盘 输入 什么 信息 ， 
系统 都 感知 不 到 了 。 详 情 可 参阅 以 下 网 页 : 


http://community.osdev.info/?(PIC)8259A 


KAKA AE RRA A? CL OCS RHR 
kOe IZ) 附近 。 


必须 重启 对 于 中 断 的 监视 


下 面 我 们 应 该 注意 ， 从 编写 为 0x0060 的 设备 输入 的 


8 位 信息 是 按键 编码 。 编 号 为 0x0060 的 设备 就 是 键 
盘 。 为 什么 是 0x0060 呀 ? 要 想 搞 懂 这 个 问题 ， 还 是 
得 问 IJBM 的 大 叔 们 这 都 是 他 们 定 的 ， 笔 者 也 不 太 清 
楚 原 因 。 不 过 这 个 号 码 是 从 下 面 这 个 网 页 查 到 的 。 


http://community.osdev.info/?(AT)keyboard 
EENEN 


程序 所 完成 的 ， 是 将 接收 到 的 按键 编码 显示 在 画面 
上 ， 然 后 结束 中 断 处理 。 这 里 没什么 难点 ..…….. 那 
好 ， 我 们 运行 一 下 “make run”。 然 后 按 下 “A” 键 ， 
哦 ， 按 键 编码 乖 冬 地 显示 出 来 了 ! 


按 下 “<A" 之 后 


大 家 可 以 做 各 种 尝试 ， 比 如 按 下 “B” 键 ， 按 下 回 车 
键 等 。 键 按 下 去 之 后 ， 随 即 就 会 显示 出 一 个 数字 
(十 六 进 制 ) 来 ， 键 松 开 之 后 也 会 显示 出 一 个 数 
字 。 所 以 ， 计 算 机 不 光 知 道 什么 时 候 按 下 了 键 ， 还 


知 关 什么 时 候 把 键 松 开 了 。 这 种 特性 最 适合 于 开 有 及 
游戏 了 。 不 错 不 错 ， 心 满意 足 。 


2 加 快 中 断 处理 (hiarib04b ) 


程序 做 出 来 了 ， 大 家 心情 肯定 很 好 ， 但 其 实 这 个 程 
序 里 有 一 个 问题 ， 那 惑 是 字符 显示 的 内 容 被 放 在 了 
中 断 处 理 程序 中 。 


所 请 中 断 处 理 ， 基 本 上 就 是 打 靳 CPU 本 来 的 工作 ， 
加 塞 和 要 求 进行 处 理 ， 所 以 必须 完成 得 干 神 利索 。 而 
且 中 断 处 理 进行 期 间 ， 不 再 接受 别 的 中 断 。 所 以 如 
果 处 理 键 盘 的 中 断 速 上 度 太 慢 ， 残 会 出 现 限 标的 运动 
不 连 员 、 不 能 从 网 上 接收 数据 等 情况 ， 这 都 是 我 们 
不 希望 看 到 的 。 


男 一 方面 ， 字 符 显示 是 要 花 大 块 时 间 来 进行 的 处 
理 。 仪 仪 夯 一 个 字符 ， 束 要 执行 8x16=128 次 if 语 
句 ， 来 判定 是 否 要 往 VRAM 里 描画 该 像素 。 如 果 判 
定 为 质 男 该 像 了 淼 ， 还 要 执行 内 存 号 入 指令 。 而 且 为 
确定 具体 往 内 存 的 哪个 地 方 写 ， 还 要 做 很 多 地 址 计 
算 。 这 些 事情 ， 在 我 们 看 来 ， 或 许 只 是 一 瞬间 的 
事 ， 但 在 计算 机 看 来 ， 可 不 是 这 样 。 

谁 也 不 知道 其 他 中 断 会 在 哪个 瞬间 到 来 。 事 实 上 ， 


很 可 能 在 键盘 输入 的 同时 ， 就 有 数据 正在 从 网 上 下 
载 ， 而 PIC 正在 等 竺 键盘 中 断 处 理 的 结 


那 该 如 何 是 好 呢 ? 结论 很 简单 ， 束 是 抑 将 按键 的 纺 
人 码 接收 下 来 ， 保 存 到 变量 里 ， 然 后 由 HariMain 倘 和 尔 
KAAS. MRAM SSE, MILE AN 
出 来 。 我 们 融 这 样 试 试 吧 。 


int.c T 4E 


struct KEYBUF { 
unsigned char data, flag; 


}; 
#define PORT_KEYDAT Q@x8060 
struct KEYBUF keybuf; 


void inthandler21(int *esp) 
{ 
unsigned char data; 
io_out8(PIC@ OCW2, 0x61); /* 通知 PIC IRQ-61 已 经 受 
理 完毕 */ 
data = io in8(PORT_KEYDAT); 
if (keybuf.flag == 0) { 
keybuf.data = data; 
keybuf.flag = 1; 
} 


return; 


我 们 先 完成 了 上 面 的 程序 。 考 虑 到 键盘 输入 时 需要 
缓冲 区 ， 我 们 定义 了 一 个 构造 体 ， 命 名 为 keybuf。 


其 中 的 flag 变 量 用 于 表示 这 个 缓冲 区 是 售 为 空 。 如 
来 flag 是 0， 表 示 绥 冲 区 为 空 ， 如 果 flag 是 1， 束 表示 
BAX HEA Be ALA, WREX PEA Z 

Ho MOIR MR SSP, MEADE? 这 没 
ng 我 们 暂时 不 做 任何 处 理 ， 权 且 把 这 个 数据 扔 


下 面 让 我 们 看 看 bootpack.c 的 HariMain 函 数 吧 。 我 们 
对 最 后 的 io_halt 里 的 无 限 循 环 进 行 了 如 下 修改 。 


bootpack.c'# HariMain cf 20 A) 75 1 


for (;;) { 
io_cli(); 
if (keybuf.flag == 0) { 
io_stihlt(); 
} else { 
i = keybuf.data; 
keybuf.flag = ð; 


io_sti(); 

Sprintf(s, "%02X", i); 

boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, ©, 16, 15, 31); 

putfonts8 asc(binfo->vram, binfo->scrnx, ©, 16, 
COL8_FFFFFF, s); 


} 


开始 先 用 io_cli 指 令 屏 蔽 中 断 。 为 什么 这 时 要 屏蔽 中 


WE? 因为 在 执行 其 后 的 处 理 时 ， 如 果 有 中 断 进 
K, MARLES. RIIK PIE, ZE 
看 keybuf.flag 的 值 是 什么 。 


如 果 flag 的 值 是 0， 就 说 明 键 还 没有 被 按 下 ， 
keybuf.data 里 没有 值 保 存 进来 。 在 keybuf.data 里 有 
值 被 保存 进来 之 前 ， 我 们 无 事 可 做 ， 所 以 干脆 惑 去 
执行 io_hlt。 但 是 ， 由 于 已 经 执行 io_cli 屏 蔽 了 中 
断 ， 如 果 就 这 样 去 执行 HLT 指 令 的 话 ， 即 使 有 什么 
键 被 按 下 ， 程 序 也 不 会 有 任何 反应 。 所 以 STI 和 
HLT 两 个 指令 都 要 执行 ， 而 执行 这 两 个 指令 的 函数 
就 是 io_stihltt。 执 行 HLT 指 令 以 后 ， 如 果 收 到 了 PIC 
的 通知 ，CPU 就 会 被 唤醒 。 这 样 ，CPU 首 先 会 去 执 
行 中 断 处 理 程序 。 中 断 处 理 程序 执行 完 以 后 ， 又 回 
到 for 语 句 的 开头 ， 再 执行 io_cli 函 数 。 


1 可 能 有 人 会 认为 ， 不 做 这 个 函数 ， 而 是 

用 “io_stiO;io_hlt0;” 不 也 行 吗 ? 但 是 ， 实 际 上 这 样 
写 有 点 问题 。 如 果 io_sti0 之 后 产生 了 中 断 ， 
keybuf 里 就 会 存 入 数据 ， 这 时 候 让 CPU 进 入 HLT 
状态 ，keybuf 里 存 入 的 数据 束 不 会 被 部 察 到 。 根 
据 CPU 的 规范 ， 机 器 语言 的 STI 指 令 之 后 ， 如 果 紧 
跟着 HLT 指 令 ， 那 么 就 暂 不 受理 这 两 条 指令 之 间 
的 中 断 ， 而 要 等 到 HLT 指 令 之 后 才 受 理 ， 所 以 使 
用 io_stihlt 函 数 束 能 克服 这 一 问题 。 


继续 往 后 读 程 序 ， 我 们 能 找到 else 语 句 。 它 一 定 要 
跟 在 证 语句 后 面 ， 意 思 是 说 只 有 在 让 语句 中 的 条 件 不 
满足 时 ， 才 能 执行 else 后 面 花 括号 中 的 语句 。 如 果 
通过 中 断 处 理 函 数 在 keybuf.data 里 存 入 了 按键 编 

仔 ，else 语 句 束 会 被 执行 。 先 将 这 个 键 码 
(keybuf.data) 值 保 存 到 变量 ij 里， 然后 将 flag 置 为 0 
表示 把 键 权 值 清 为 空 ， 最 后 再 通过 io_sti 语 名 开放 中 
汤 。 虽 然 如 果 在 keybuf 操 作 当 中 有 中 断 进 来 会 造成 
混乱 ， 但 现在 keybuf.data 的 值 已 经 保存 完毕 ， 再 开 
放 中 断 也 束 没 关系 了 。 最 后 ， 就 可 以 在 中 断 己 经 开 
放 的 情形 下 ， 优 哉 优 哉 地 显示 字符 了 。 


回 过 头 来 看 一 看 ， 可 以 发 现 ， 其 实在 屏蔽 中 断 期 间 
所 做 的 处 理 非常 少 ， 中 断 处 理 程 序 本 身 做 的 事情 也 
非常 少 ， 而 这 正 是 我 们 所 期 待 的 。 真 棱 ! 如 果 我 们 
坚持 这 么 做 ， 不 但 中 断 很 少 会 被 遗漏 ， 而 且 最 后 完 
成 的 操作 系统 也 会 非常 利索 。 


我 们 赶紧 来 测试 一 下 吧 。 运 行 “make run”. R, 
以 前 一 样 ， 能 够 顺利 执行 .….. 但 是 ， 发 生 了 一 点 儿 
小 问题 。 请 按 下 键盘 的 右 Ctrl 键 看 看 。 不 管 是 抽 

F, WERT, BRE GRAB “EO”. WRA] 
再 试 试 harib04a， 看 看 情况 如 何 。 结 果 按 下 去 时 显 
示 “1D”， 松 开 时 显示 “9D”。 人 怎么 回 事 ? 与 harib04a 


结 末 不 一 样 就 意味 独 哪 儿 出 了 问题 。 


通过 得 资料 “得 知 ， 当 按 下 右 Ctn 键 时 ， 会 产生 两 个 
字 节 的 键 码 值 E0 1D”， 而 松 开 这 个 键 之 后 ， 会 产 
生 两 个 字 节 的 键 码 值 *E0 9D”。 在 一 次 产生 两 个 字 
节 键 码 值 的 情况 下 ， 因 为 键盘 内 部 电路 一 次 只 能 发 
送 一 个 字 节 ， 所 以 一 次 按键 就 会 产生 两 次 中 断 ， 第 
一 次 中 断 时 发 送 E0， 第 二 次 中 断 时 发 送 1D。 


* http://community.osdev.info/?(AT)keyboard 


按 下 右 Ctrl 键 时 的 情形 


在 harib04a 中 ， 以 上 两 次 中 断 所 发 送 的 值 都 能 收 

到 ， 瞬 间 显 示 E0 之 后 ， 紧 接着 又 显示 1D 或 是 9D。 

Td ¢Eharib04b'#, HariMainek BEY PIEOZ A, X 

ya 前 一 次 按键 产生 的 1D 或 者 9D， 而 这 个 字 节 被 
Jz 


这 么 一 说 ， 可 能 有 人 会 觉得 还 是 以 前 的 harib04a 更 
好 。 但 是 在 harib04a 中 ， 键 盘 控 制 器 (设备 号 人 码 
0x0060) EAMA, RERA” (HEW 
PERRIS) WELT, SFAT, JA 
强 得 到 这 样 看 起 来 还 不 错 的 结果 。 但 这 对 于 硬件 来 
讲 ， 实 在 有 点 太 钢 为 其 难 了 。 在 harib04b 程 序 中 ， 
人 硬件 没有 人 负担， 不 会 数 得 肚子 疼 ， 只 是 笔者 这 里 写 
的 程序 还 是 不 够 好 ， 好 不 容易 接收 到 的 数据 ， 没 能 
很 好 地 利用 起 来 。 


所 以 ， 我 们 来 修改 一 下 程序 ， 让 它 再 聪明 点 儿 。 


3 制作 FIFO 绥 冲 区 Chiarib04c) 


问题 到 底 出 在 哪儿 呢 ? 在 于 笔者 所 创建 的 缓冲 区 ， 
它 只 能 存储 一 个 字 节 。 如 果 做 一 个 能 够 存储 多 字 节 
的 缓冲 区 ， 那 么 它 就 不 会 蕊 上 存 满 ， 这 个 问题 也 就 
HEIR J o 


最 简单 的 解决 方案 是 像 下 面 这 样 增加 变量 。 


struct KEYBUF { 
unsigned char data1, data2, data3, data4, ... 
}; 


a 程序 惑 变 长 了 ， 所 以 将 它 写 成 下 面 这 


struct KEYBUF { 
unsigned char data[4]; 
}; 


当 我 们 使 用 这 些 缓冲 区 的 时 候 ， 可 以 与 成 data[0]、 
data[1] 等 。 全 于 创建 得 是 侣 正常 ， 那 融 是 后 话 了 。 


说 起 缓冲 ， 我 们 在 讲 栈 的 时 候 ， 曾 讲 过 FIFO、 
FILO 等 ， 这 次 我 们 需要 的 是 FIFO 型 。 为 什么 呢 ? 
如 果 输 入 的 是 ABC， 和 输出 的 时 候 ， 却 把 顺序 搞 反 
了 ， 写 成 CBA， 那 可 就 厂 烦 了 。 所 以 需要 按照 输入 


数据 的 顺序 输出 数据 。 

根据 这 种 思路 ， 我 们 制作 了 以 下 程序 : 
int.c jv 

struct KEYBUF { 


unsigned char data[32]; 
int next; 


上 


void inthandler21(int *esp) 
{ 


unsigned char data; 
io_out8(PIC@ OCW2, 0x61); /* 通知 PIC IRQ-61 已 经 受 


io_in8(PORT_KEYDAT) ; 
if (keybuf.next < 32) { 
keybuf.data[keybuf.next] = data; 
keybuf .next++; 


} 


return; 


keybuf.next 的 起 始点 是 “0”， 上 所 以 最 初 存 储 的 数据 是 
keybuf.data[0]。 下 一 个 数据 是 keybuf.data[1]， 接 痢 
是 [2]， 依 此 类 推 ， 一 共有 32 个 存储 位 置 。 


下 一 个 存储 位 置 用 变量 next 来 管理 。next， 就 是 “下 
一 个 ”的 意思 。 这 样 束 可 以 记 住 32 个 数据 ， 而 不 会 
洲 出 。 但 是 为 了 保险 起 见 ，next 的 值 变 成 32 之 后 ， 


束 舍 去 不 要 了 。 
TT 


取得 数据 的 程序 如 下 所 示 。 


for (33) { 

io_cli(); 

if (keybuf.next == 0) { 
io_stihlt(); 

} else { 
i = keybuf.data[@]; 
keybuf.next- -; 
for (j = 03 j < keybuf.next; j++) { 

keybuf.data[j] = keybuf.data[j + 1]; 


io_sti(); 

sprintf(s, "%02X", i); 

boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, ©, 16, 15, 31); 

putfonts8 asc(binfo->vram, binfo->scrnx, ©, 16, 
COL8_FFFFFF, s); 


} 


} 


如 果 next 不 是 0， 则 说 明 至 少 有 一 个 数据 。 最 开始 的 
一 个 数据 肯定 是 放 在 data[0] 中 的 ， 将 这 个 数 存 入 到 
变量 i 中 去 。 这 样 ， 数 就 减少 了 一 个 ， 所 以 将 next 减 
Fl, 


接 下 来 的 for 语 句 ， 我 们 用 下 图 来 说 明 它 所 完成 的 工 


作 。 


data[0]=data[1]; 
data[1]=data[2]; 
data[2]=data[3]; j 


O: 数据 


已 经 谈 过 的 数据 ， X: 空隙 
不 再 需要 了 


AAMA 


像 上 面 这 样 ， 数 据 的 存放 位 置 全 部 都 向 前 移送 了 一 
个 位 置 。 如 果 不 移送 的 话 ， 下 一 次 就 不 能 从 data[0] 
读 入 数据 了 。 


那 好 ， 我 们 赶紧 测试 一 下 ， 看 看 能 不 能 正常 运 
ÍT “make run”， 按 下 右 Ctrl 键 ， 哦 ， 运 行 正 常 ! 


按 下 右边 Ctrl 键 以 后 的 情形 


虽然 现在 想 说 这 个 程序 已 经 OK 了， 但 实际 上 还 是 
有 问题 。 还 有 些 地 方 还 不 尽 如 人 意 。inthandler21 可 
以 了 ， 完 全 没有 问题 。 有 问题 的 是 HariMain。 说 得 
具体 一 点 ， 是 从 data[0] 取 得 数据 后 有 关 数 据 移送 的 
处 理 不 能 让 人 满意 。 


像 这 种 移送 数据 的 处 理 ， 一 般 说 来 也 就 不 超过 3 
个 ， 基 本 上 没有 什么 问题 。 但 运气 不 好 的 时 候 ， 我 
们 可 能 需要 移送 多 达 32 个 数据 。 虽 然 这 远 比 显示 字 
符 所 需 的 128 个 像素 要 少 ， 但 要 是 有 办 法 避免 这 种 
操作 的 话 ， 当 然 是 最 好 不 过 了 。 


数据 移送 处 理 本 里 并 没有 什么 不 好 ， 只 是 在 禁止 中 
断 的 期 间 里 做 数据 移送 处 理 有 问题 。 但 如 果 在 数据 
移送 处 理 前 就 允许 中 断 的话 ， 会 搞 乱 要 处 理 的 数 
据 ， 这 当然 不 行 。 那 该 怎么 办 才 好 呢 ? 接 下 来 的 
harib04d 章 节 就 要 讲述 这 个 问题 了 。 


4 ”改善 FIFO 绥 冲 区 Chiarib04d) 


能 不 能 开发 一 个 不 需要 数据 移送 操作 的 FIFO 型 缓冲 
区 呢 ? 答案 是 可 以 的 。 因 为 我 们 有 个 技巧 可 以 用 。 


这 个 技巧 的 基本 思路 是 ， 不 仅 要 维护 下 一 个 要 写 入 
数据 的 位 置 ， 还 要 维护 下 一 个 要 读 出 数据 的 位 置 。 
这 融 好 像 数据 读 出 位 置 在 追 痢 数据 写 入 位 置 跑 一 

样 。 这 样 做 就 不 需要 数据 移送 操作 了 。 数 据 该 出 位 
置 退 上 数据 写 入 位 置 的 时 候 ， 束 相当 于 缓冲 区 为 

空 ， 没 有 数据 。 这 种 方式 很 好 呆 ! 


tata ofololel fl. 
tt t 


读 出 的 next 写 入 的 next 


但 是 这 样 的 缓冲 区 使 用 了 一 段 时 间 以 后 ， 下 一 个 数 
据 写 入 位 置 会 变 成 31， 而 这 时 下 一 个 数据 读 出 位 置 
可 能 已 经 是 29 或 30 什 么 的 了 。 当 下 一 个 写 入 位 置 变 
成 32 的 时 候 ， 束 走 到 死胡同 了 。 因 为 下 面 没 地 方 可 
以 写 入 数据 了 。 


2 
-一 
> 


iata B] 
i f 


读 出 的 next 写 入 的 next 


如 果 当 下 一 个 数据 写 入 位 置 到 达 绥 冲 区 终点 时 ， 数 
据 读 出 位 置 也 恰好 到 达 绥 冲 区 的 终点 ， 也 束 是 说 组 
冲 区 正好 变 空 ， 那 还 好 说 。 我 们 只 要 将 下 一 个 数据 
写 入 位 置 和 下 一 个 数据 读 出 位 置 都 再 置 为 0 就 行 
T, BURR IBID Mk HOR FF 


但 是 总 还 是 会 有 数据 读 出 位 置 没 有 退 上 数据 写 入 位 
置 的 情况 。 这 时 ， 又 不 得 不 进行 数据 移送 操作 。 原 
来 每 次 都 要 进行 数据 移送 ， 而 现在 不 用 每 次 都 做 ， 
当然 值得 局 兴 ， 但 问题 是 这 样 一 来 ， 用 户 会 

说 :“ 有 时 候 操作 系统 的 反应 不 好 。 这 系统 不 行 
0 


如 果 将 缓冲 区 扩展 到 256 字 市 ， 的 确 可 以 减少 移 位 
操作 的 次 数 ， 但 是 不 能 从 根本 上 解雇 问题 。 


仔细 想来 ， 当 下 一 个 数据 写 入 位 置 到 达 绥 冲 区 最 末 
FEN, Bev DTP hat IY BARES CURR 


有 变 空 ， 说 明 数 据 读 出 跟 不 上 数据 写 入 ， 只 能 把 部 
分 数据 扔 挥 了 〉。 因 此 如 果 下 一 个 数据 写 入 位 置 到 
了 32 以 后 ， 束 强制 性 地 将 它 设 置 为 0。 这 样 一 来 ， 
下 一 个 数据 写 入 位 置 就 跑 到 了 下 一 个 数据 读 出 位 置 
的 后 面 ， 让 人 觉得 怪 怪 的 。 但 这 无 关 紧 要 ， 没 什么 
问题 。 


ist 
OTOL SISAL] | lll 
KR ; 
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对 下 一 个 数据 读 出 位 置 也 做 同样 的 处 理 ， 一 旦 到 了 
32 以 后 ， 就 把 它 设 置 为 从 0 开始 继续 读 取 数据 。 这 
样 32 字 节 的 缓冲 区 惑 能 一 圈 一 圈 地 不 俘 循 环 ， 长 久 
使 用 。 数 据 移 送 操作 一 次 都 不 需要 。 打 个 比方 ， 这 
就 好 像 打 开 一 张 世 界 地 图 ， 一 直 回 右 走 的 话 ， 会 在 
环绕 地 球 一 周 后 ， 叉 从 左边 出 来 。 这 样 一 来 ， 这 个 
绥 冲 区 虽然 只 有 32 字 市 ， 可 只 要 不 注 出 的 话 ， 它 就 
能 够 持续 使 用 下 去 。 


如 朱 不 是 很 理解 以 上 说 明 的 话 ， 可 以 看 看 程序 ， 
Amea HA. 


bootpack.h 节选 


struct KEYBUF { 
unsigned char data[32]; 


int next_r, next_w, len; 


3 


变量 len 是 指 缓冲 区 能 记录 多 少 字 节 的 数据 。 


int.c T Ut 


void inthandler21(int *esp) 
{ 
unsigned char data; 
io _out8(PIC@ OCW2, @x61); 通知 IRQ-61 已 经 受理 完 
毕 */ 
data = io in8(PORT_KEYDAT); 
if (keybuf.len < 32) { 
keybuf.data[keybuf.next_w] = data; 
keybuf. len++; 
keybuf .next_w++; 
if (keybuf.next_w 32) { 
keybuf.next_w ; 
} 


} 


return; 


以 上 无 非 是 将 我 们 的 说 明 写 成 了 程序 而 己 ， 并 没 什 


么 难点 。 倒 不 如 这 样 说 ， 正 是 因为 看 了 以 上 程序 ， 
大 家 才能 搞 消 楚 笔 者 想 要 说 什么 。 读 出 数据 的 程序 
如 下 : 


for (;;) { 
io_cli(); 
if (keybuf.len == @) { 
io_stihlt(); 
} else { 
i = keybuf.data[keybuf.next_r]; 
keybuf.len--; 
keybuf .next_r++; 
if (keybuf.next_ 
keybuf.next_ 


= 32) { 
ð; 


r= 
= 


} 

io_sti(); 

sprintf(s, "%02X", i); 

boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, ©, 16, 15, 31); 

putfonts8 asc(binfo->vram, binfo->scrnx, ©, 16, 
COL8_FFFFFF, s); 


} 


} 


看 吧 ， 没 有 任何 数据 移送 操作 。 这 个 绥 冲 区 可 以 记 
录 大 量 数据 ， 执 行 速度 又 快 ， 真 是 太 棒 啦 。 我 们 训 
试 一 下 ， 运 行 “make run”， 当 然 能 正常 运行 。 耶 ! 


5 整理 FIFO 组 冲 区 (hiarib04e) 


本 来 正 说 看 键盘 中 断 的 话题 ， 中 间 却 择 进 来 一 大 段 
天 于 FIFO 绥 冲 区 基本 结构 的 介绍 ， 不 过 既然 这 样 ， 
我 们 就 来 整理 一 下 ， 让 它 具 有 一 些 通 用 性 ， 在 别 的 
地 方 也 能 发 挥 作用 。 所 谓 “ 列 的 地 方 "”” 是 指 什 么 地 
方 呢 ? 当 然 是 鼠标 啦 。 鼠 标 只 要 和 人 微 动 一 动 ， 就 会 
连续 有 友 送 3 个 字 节 的 数据 。.……. 事实 上 这 次 我 们 之 
所 以 先 做 键盘 的 程序 ， 就 是 想 拿 键 盘 来 练习 一 下 

FIFO 和 和 中断。 因为 如 果 一 上 来 瓯 做 鼠标 程序 ， 数 据 
来 得 太 多 ， 又 要 取出 来 进行 处 理 ， 会 让 人 手 忙 肢 

Hls AAIE o 


首先 我 们 将 结构 做 成 以 下 这 样 。 


struct FIFO8 { 
unsigned char *buf; 


int p, q, size, free, flags; 


}; 


如 果 我 们 将 缓冲 区 大 小 固定 为 32 字 节 的 话 ， 以 后 改 


起 来 就 不 方便 了 ， 所 以 把 它 定 义 成 可 变 的 ， 几 个 字 
节 都 行 。 绥 冲 区 的 总 字 节 数 保存 在 变量 size 里 。 变 
量 free 用 于 保存 绥 冲 区 里 没有 数据 的 字 市 数 。 绥 冲 
区 的 地 址 当然 也 必须 保存 下 来 ， 我 们 把 它 保 存在 变 
量 buf 里 。p 代 表 下 一 个 数据 写 入 地 址 (next w) , q 


代表 下 一 个 数据 谈 出 地 址 (next_r)。 
fifo.ci)fifo8_ init px 数 


void fifo8_init(struct FIFO8 *fifo, int size, unsigned 
char *buf) 

/* 初始 化 FIF0 缓 冲 区 */ 

{ 


fifo->size = size; 

fifo->buf = buf; 

fifo->free = size; /* 缓冲 区 的 大 小 */ 
fifo->flags = 0; 

fifo->p = 0; /* 下 一 个 数据 写 入 位 置 */ 
fifo->q = 0; /* 下 一 个 数据 读 出 位 置 */ 


return; 


fifo8_init 是 结构 的 初始 化 函数 ， 用 来 设 定 各 种 初始 
值 ， 也 就 是 设 定 FIFO8 结 构 的 地 址 以 及 与 结构 有 关 
的 各 种 参数 。 更 具体 的 说 明 束 不 用 了 吧 。 


fifo.c 的 fifo8_put 琐 数 


#define FLAGS OVERRUN Qx0001 


int fifo8 put(struct FIFO8 *fifo, unsigned char data) 
/* 问 FIF0 传 送 数据 并 保存 */ 


if (fifo->free == 0) { 
/* BRA ST, tad */ 
fifo->flags |= FLAGS OVERRUN; 
return -1; 


fifo->buf[fifo->p] = data; 
fifo->p++; 


if (fifo->p == fifo->size) { 
fifo->p = ð; 

} 

fifo->free--; 

return ð; 


fifo8_put 是 往 FIFO 绥 冲 区 存储 1 字 节 信息 的 函数 。 


以 前 如 末次 出 了 ， 残 什么 也 不 做 。 但 这 次 ， 笔 者 
E: “如 果 能 够 事后 确认 古人 否 肥 生 了 海 出 ， 不 是 更 
好 吗 ?” 所 以 束 用 flags 这 一 变量 来 记录 是 人 耕 洲 出 。 
至 于 其 他 内 容 ， 只 是 写法 上 和 有 变化 而 已 。 


啊 ， 要 说 这 里 出 现 的 新 东西 ， 可 能 就 是 return 语 句 
后 面 跟着 数字 的 写法 了 吧 。 如 果 有 人 调用 以 上 也 
数 ， 写 出 类 似 于 “ii = fifo8_put (fifo, data) ;” 这 种 语 
人 句 时 ， 我 们 就 可 以 通过 这 种 方式 指定 赋 给 i 的 值 。 为 
了 能 够 简 蛙 明了 地 确认 到 底 有 没有 发 生 注 出， 笔者 
将 它 设 定 为 -1 或 9， 分 别 表示 有 淤 出 和 没有 洲 出 这 
两 种 情况 。 


fifo.ci‘) fifo8_ get Px 2 


int fifo8_get(struct FIFO8 *fifo) 
/* 从 FIFO 取 得 一 个 数据 */ 
{ 


int data; 
if (fifo->free == fifo->size) { 


/* 如 果 缓 冲 区 为 空 ， 则 返回 -1 */ 


return -1; 


} 
data = fifo->buf[fifo->q]; 


fifo->q++; 

if (fifo->q == fifo->size) { 
fifo->q = Q; 

} 


fifo->free++; 
return data; 


fifo8_get 是 从 FIFO 绥 冲 区 取出 1 字 节 的 函数 。 这 个 
应 该 不 用 再 讲 了 吧 。 

fifo.c 的 fifo8 status 函 数 

int fifo8_status(struct FIFO8 *fifo) 

/* 报告 一 下 到 底 积 攒 了 多 少数 据 */ 

{ 


} 


return fifo->size - fifo->free; 


这 是 附 赠 的 函数 fifo8 _ status， 它 能 够 用 来 调查 缓冲 
区 的 状态 。status 的 意思 是 “状态 ”。 


笔者 把 以 上 这 几 个 函数 总 结 后 写 在 了 程序 fifo.c 里 。 


使 用 以 上 函数 写成 了 下 和 面 的 程序 段 。 


int.c 方 选 
struct FIFO8 keyfifo; 


void inthandler21(int *esp) 
{ 


unsigned char data; 
io_out8(PICO_OCW2, 0x61); /* 通知 PIC， 说 IRQ-61 的 受 


理 已 经 完成 */ 
data = io_in8(PORT_KEYDAT); 
fifo8 put(&keyfifo, data); 
return; 


这 有 段 程序 看 起 来 非常 清晰 ，12 行 变 成 了 5 行 。 在 
fifo8_put 的 参数 里 ， 有 一 个 “&” 符 号， 这 可 不 是 
AND 运 算 符 ， 而 是 取 地 址 运算 符 ， 用 它 可 以 取得 结 
构 体 变量 的 地 址 值 。 变 量 名 的 前 面 加 上 &&， 就 成 了 
取 地 址 运算 符 。 这 稍微 有 点 复杂 。fifo8_put 接 收 的 
第 一 个 参数 是 内 存 地 址 ， 与 之 匹配 ， 这 里 调用 时 传 
递 的 第 一 个 参数 也 要 是 内 存 地 址 。 


MariMain 函 数 内 容 如 下 所 示 : 


char s[4@], mcursor[256], keybuf[32]; 


fifo8 init(&keyfifo, 32, keybuf); 


for (33) { 
io_cli(); 
if (fifo8 status(&keyfifo) == ©) { 
io_stihlt(); 


} else { 

i = fifo8_get(&keyfifo) ; 

io_sti(); 

sprintf(s, "%02X", i); 

boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, ©, 16, 15, 31); 

putfonts8 asc(binfo->vram, binfo->scrnx, ©, 16, 
COL8_FFFFFF, s); 


} 


} 


这 段 程序 简洁 而 清晰 。for 语 句 的 内 容 被 精简 掉 了 5 
行 呀 。 当 然 ， 程 序 运 行 肯定 也 没 问题 。 不 信 的 话 ， 
可 以 用 “make run” 测 试 一 下 (当然 ， 信 的 话 更 要 试 
试 啦 ) 。 看 ， 运 行 正 第 ! 


6 总 算 讲 到 鼠标 了 (harib04f) 


现在 到 了 让 大 和 家 期 竺 己 久 的 讲解 鼠标 的 时 间 了 。 首 
先 说 一 说 ， 为 什么 虽然 我 们 的 电脑 连 着 有 鼠标 ， 却 
一 卫 不 能 用 的 原因 。 


从 计算 机 不 算 短暂 的 历史 来 看 ， 和 鼠标 这 种 装置 属于 
新 兴 一 族 。 早 期 的 计算 机 一 般 都 不 配置 鼠标 。 一 个 
很 明显 的 证 据 就 是 ， 现 在 我 们 要 讲 的 分 配给 鼠标 的 
中 断 号 码 ， 是 IRQ12， 这 已 经 是 一 个 很 大 的 数字 
了 。 与 键盘 的 IRQ1 比 起 来 ， 那 可 差 了 好 多 代 了 。 


所 以 ， 当 鼠标 刚刚 作为 计算 机 的 一 个 外 部 设备 开始 
使 用 的 时 候 ， 几 乎 所 有 的 操作 系统 都 不 文 持 它 。 在 
这 种 情况 下 ， 如 果 只 是 稍微 动 一 动 鼠 标 束 产生 中 断 
的 话 ， 那 在 使 用 那些 操作 系统 的 时 候 ， 就 只 好 先 把 
恨 标 拔 反 了 。IBM 的 大 叔 们 认为 ， 这 对 于 使 用 计算 
机 的 人 来 说 是 很 不 方便 的 。 所 以 ， 虽 然 在 主板 上 做 
了 鼠标 用 的 电路 ， 但 只 要 不 执行 激活 鼠标 的 指令 ， 
就 不 产生 鼠标 的 中 断 信号 (])。 


所 谓 不 产生 中 断 信号 ， 也 就 是 说 ， 即 使 从 鼠标 传 来 
了 数据 ，CPU 也 不 会 接收 。 这 样 的 话 ， 鼠 标 也 残 没 
必要 送 数据 了 ， 人 否则 倒 会 引起 电路 的 混乱 。 所 以 ， 
处 于 初期 状态 的 鼠标 ， 不 管 是 请 动 操 作 也 好 ， 氮 击 


操作 也 好 ， 部 没有 反应 (2)。 


从 前 的 操作 系统 ， 不 知道 什么 是 鼠标 TRE 


(1) 控制 电路 不 向 CPU 发 出 中 断 
(2) 鼠标 也 不 向 控制 电路 报告 任何 信息 


总 而 言 之 ， 我 们 必须 改行 指令 ， 让 下 面 两 个 朔 置 有 
效 ， 一 个 是 鼠标 控制 电路 ， 一 个 是 鼠标 本 身 。 通 过 
上 面 的 说 明 ， 大 家 应 该 已 经 明白 了 ， 要 先 让 鼠标 控 
制 电 路 有 效 。 如 采 先 让 鼠标 有 效 了 ， 那 时 控制 电路 
还 没准 备 好 数据 就 来 了 ， 可 就 及 烦 了 ， 因 为 控制 电 
路 还 处 理 不 了 。 


现在 来 说 说 控制 电路 的 设 定 。 事 实 上 ， 鼠 标 控 制 电 
路 包 合 在 键盘 控制 电路 里 ， 如 末 键 盘 控 制 电路 的 初 


始 化 正和 常 完成， 鼠标 电路 控制 医 的 激活 也 就 完成 
Te 


bootpack.c 节 选 


#define PORT_KEYDAT 0x0060 
#define PORT_KEYSTA 0x0064 
#define PORT_KEYCMD 0x0064 
#define KEYSTA_SEND_NOTREADY 0x02 
#define KEYCMD_WRITE_MODE 0x60 
#define KBC_MODE 0x47 


void wait_KBC_sendready (void) 


/* 等 待 键盘 控制 电路 准备 完毕 */ 
for (33) { 
if ((io0_in8(PORT_KEYSTA) & 
KEYSTA_SEND_NOTREADY) == @) { 
break ; 
} 
} 


return; 


} 


void init_keyboard(void) 


{ 


/* 初始 化 键盘 控制 电路 */ 
wait_KBC_sendready(); 
io_out8(PORT_KEYCMD, KEYCMD_WRITE_MODE) ; 
wait_KBC_sendready(); 
io_out8(PORT_KEYDAT, KBC_MODE) ; 

return; 


首先 我 们 来 看 函数 wait KBC_sendready。 它 的 作用 
是 ， 让 键盘 控制 电路 (keyboard controller, KBC) 
做 好 准备 动作 ， 等 待 控制 指令 的 到 来 。 为 什么 要 做 
这 个 工作 呢 ? 是 因为 虽然 CPU 的 电路 很 快 ， 但 键盘 
控制 电路 却 没 有 那么 快 。 如 果 CPU 不 顾 设 备 接 收 数 
据 的 能 力 ， 只 是 一 个 劲 儿 地 发 指令 的 话 ， 有 些 指令 
会 得 不 到 执行 ， 从 而 导致 错误 的 结果 。 如 果 键 盘 控 
制 电 路 可 以 接受 CPU 指 令 了 ，CPU 从 设备 号 人 码 
0x0064 处 所 读 取 的 数据 的 倒数 第 二 位 《从 低位 开始 
数 的 第 二 位 〉 应 该 是 0。 在 人 确认 到 这 一 位 是 0 之 前 ， 
程序 一 直通 过 for 语 句 循 环 查 询 。 


break 语 句 是 从 for 循 环 中 强制 退出 的 语句 。 退 出 以 
后 ， 只 有 return 语 句 在 那里 等 待 执行 ， 所 以 ， 把 这 
里 的 break 语 句 换 写成 retum 语 句 ， 结 果 一 样 。 


下 面 看 函数 init_keyboard。 它 所 要 完成 的 工作 很 简 
单 ， 也 惑 是 一 边 确认 可 个 往 键盘 控制 电路 传送 信 
Kh, IRIE, THO Pa BBE 
APT. PRU BCE TAS 20x60, AFA bite 
陈 的 模式 号 码 是 0x47， 当 然 这 些 数值 必须 通过 调 奉 
才能 知道 。 我 们 可 以 从 老 地 方 . 得 到 这 些 数据 。 


1 http://community.osdev.info/?ifno(AT)keyboard 


这 样 ， 如 果 在 HariMain 函 数 调 用 init keyboard 函 


数 ， 鼠 标 控制 电路 的 准备 束 完 成 了 。 
CLLD 
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bootpack.c 节 选 


#define KEYCMD SENDTO MOUSE 
#define MOUSECMD ENABLE 


void enable mouse(void) 


{ 


/* 激活 鼠标 */ 


wait_KBC_sendready(); 

io_out8(PORT_KEYCMD, KEYCMD SENDTO MOUSE) ; 
wait _KBC_sendready(); 

io_out8(PORT_KEYDAT, MOUSECMD_ ENABLE) ; 

return; /* 顺利 的 话 ， 键盘 控制 其 会 返 送 回 ACK(@xfa)*/ 


这 个 函数 与 init_keyboard 函 数 非常 相似 。 不 同 点 仅 
在 于 写 入 的 数据 不 同 。 如 果 往 键盘 控制 电路 发 送 指 
令 0xd4， 下 一 个 数据 就 会 自动 友 送 给 鼠标 。 我 们 根 
据 这 一 特性 来 友 送 激活 女 标 的 指令 。 


男 一 方面 ， 一 直 等 着 机 会 露脸 的 鼠标 先生 ， 收 到 泊 
活 指 令 以 后 ， 马 上 就 给 CPU 发 送 答复 信息 : “OK, 


从 现在 开始 吏 要 不 停 地 及 送 鼠标 信息 了 ， 大 托 
了 。” 这 个 答复 信息 就 是 0xfa。 


因为 这 个 数据 马上 束 跟 独 来 了 上 ， 即 使 我 们 保持 鼠标 
完全 不 动 ， 也 一 定 会 产生 一 个 鼠标 中 断 。 


所 以 ， 我 们 将 enable mouse 也 做 成 了 从 HariMain 中 
调用 的 形式 。 好 ， 我 们 马上 测 斌 一下。 运行 “make 


33 
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鼠标 中 断 终 于 来 了 
昭 标 中 断 终于 出 来 了 。 这 可 是 很 了 不 起 的 进步 哟 。 


7 ”从 鼠标 接 有 党 数据 Charib04g ) 


既然 中 断 己 经 来 了 ， 现 在 就 让 我 们 取出 中 断 数 据 
吧 。 前 面 已 经 说 过 ， 鼠 标 和 键盘 的 原理 几乎 相同 ， 
所 以 程序 也 就 非常 相似 。 

int.c 节 选 

struct FIFO8 mousefifo; 


void inthandler2c(int *esp) 
/* 来 自 PS/2 鼠 标的 中 断 */ 
{ 


unsigned char data; 
io_out8(PIC1_OCW2, @x64);  /* 通知 PIC1 IRQ-12 的 受理 


己 经 完成 */ 

io_out8(PIC6_0CN2，6x62); /* 通知 PIC@ IRQ-62 的 受理 
CAM */ 

data = io _in8(PORT_KEYDAT); 

fifo8 put(&mousefifo, data); 

return; 


不 同 之 处 只 有 送 给 PIC 的 中 断 受理 通知 。IRQ-12 是 
从 PIC 的 第 4 号 (MPICHH-4FIRQ-08~IRQ-15) , 
首先 要 通知 IRQ-12 受 理 已 完成 ， 然 后 再 通知 主 
PIC。 这 是 因为 主 /从 PIC 的 协调 不 能 够 自动 完成 ， 
如 果 程 序 不 教 给 主 PIC 该 怎么 做 ， 它 就 会 忽视 从 PIC 
的 下 一 个 中 断 请 求 。 从 PIC 连接 到 主 PIC 的 第 2 号 


上 ， 这 么 做 OK。 


下 面 的 鼠标 数据 取得 方法 ， 后 然 与 键盘 完全 相同 。 
这 不 是 笔者 的 失误 ， 而 是 事实 。 也 许 是 因为 键盘 控 
制 电 路 中 含有 鼠标 控制 电路 ， 才 造成 了 这 种 结 末 。 
BPEL PAE IB, FOGLE OR H BE REID ze BA 
标 ， 要 靠 中 断 号 码 来 区 分 。 


取得 数据 的 程序 如 下 所 示 : 


bootpack.c 节 选 


fifo8 init(&mousefifo, 128, mousebuf); 


for (33) { 
io_cli(); 
if (fifo8_status(&keyfifo) + 
fifo8 status(&mousefifo) == @) { 
io_stihlt(); 
} else { 
if (fifo8 status(&keyfifo) != @) { 
i = fifo8 get(&keyfifo) ; 
io_sti(); 
sprintf(s, "%@2X", i); 
boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, ©, 16, 15, 31); 
putfonts8_asc(binfo->vram, binfo->scrnx, ®, 
16, COL8_FFFFFF, s); 
} else if (fifo8 status(&mousefifo) != @) { 


i = fifo8 get(&mousefifo) ; 
io_sti(); 
sprintf(s, "%@2X", i); 
boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, 32, 16, 47, 31); 
putfonts8 asc(binfo->vram, binfo->scrnx, 
32, 16, COL8 _FFFFFF, s); 
} 
} 


} 


因为 鼠标 往往 会 比 键盘 更 快 地 送出 大 量 数据 ， 上 所 以 
我 们 将 它 的 FIFO 绥 冲 区 增加 到 了 128 字 节 。 这 样 ， 
就 算是 一 下 子 来 了 很 多 数据 ， 也 不 会 洲 出 。 


取得 数据 的 程序 中 ， 如 果 键 各 和 鼠标 的 FIFO 绥 冲 区 
都 为 空 了 ， 束 执行 HLT。 如 果 不 是 两 者 都 空 ， 束 先 
检查 keyinfo， 如 果 有 数据 ， 就 取出 一 个 显示 出 来 。 
如 果 keyinfo 是 空 ， 就 再 去 检查 mouseinfo， 如 果 有 数 
据 ， 就 取出 一 个 显示 出 来 。 很 简单 吧 。 


到 的 能 不 能 执行 呢 ? 好 紧张 呀 。 我 们 来 测试 一 下 。 


运行 “make run”. 


局 动 刚 完成 时 


就 像 上 面 那样 ， 最 初 只 显示 鼠标 发 送 过 来 的 数据 ， 
且 内 容 的 确 是 FA。 


随便 滚动 鼠标 一 下 ， 束 会 像 下 面 这 样 显 示 出 各 种 各 
样 的 数据 来 。 


滚动 鼠标 


如 果 按 下 键盘 ， 当 然 会 像 以 前 一 样 ， 正 常 啊 应 。 


按 下 键盘 之 后 
看 ， 运 行 得 很 正名 很 不 错 叮 。 


好 了 ， 今 天 我 们 做 的 事 已 经 不 少 了 ， 就 先 到 这 吧 。 
明天 我 们 来 解读 鼠标 数据 ， 让 孔 标 指针 在 屏幕 上 动 
起 来 。 真 期 行 蚜 。 啊 ， 今 天 就 不要 再 往 下 读 了 哦 。 
先 睡 千 ， 明 天 再 继续 ， 好 吧 ? 


第 8 大 恨 标 控制 与 32 位 模 陈 切换 


。 鼠标 解读 (1) (harib05a) 
。 稍 事 整 理 (harib05b) 

。 鼠标 解读 (2) Charib05c) 
。 移动 鼠标 指针 Charib05d) 
。 通 往 32 位 模式 之 路 


1 鼠标 解读 (1) Charib05a) 


好 ， 现 在 我 们 已 经 能 从 上 鼠标 取得 数据 了 。 紧 接着 的 
问题 是 要 解读 这 些 数据 ， 调 查 鼠 标 是 怎么 移动 的 ， 
然后 结合 鼠标 的 动作 ， 让 鼠标 指针 相应 地 动 起 来 。 
这 说 起 来 简单 ， 但 做 起 来 呢 .…... 事 实 上 编 起 程序 

来 ， 也 很 简单 。《〈 笑 ) 


我 们 要 先 来 对 bootpack.c 的 HariMain 函 数 进行 一 些 修 
ro 


这 次 HariMain 的 修改 部 分 


unsigned char mouse dbuf[3], mouse phase; 


enable mousel(); 
mouse_phase = 0; /* 进入 到 等 待 鼠 标的 9xfa 的 状态 */ 


for (33) { 
io_cli(); 
if (fifo8_status(&keyfifo) + 
fifo8 status(&mousefifo) == @) { 
io_stihlt(); 
} else { 
if (fifo8 status(&keyfifo) != @) { 
i = fifo8 get(&keyfifo) ; 
io_sti(); 


sprintf(s, "%@2X", i); 
boxfill18(binfo->vram, binfo->scrnx, 


COL8 668484， ©, 16, 15, 31); 
putfonts8_asc(binfo->vram, binfo->scrnx, @, 
16, COL8_FFFFFF, s); 
} else if (fifo8 status(&mousefifo) != @) { 
i = fifo8 get(&mousefifo) ; 
io_sti(); 
if (mouse phase == @) { 
/* 等 待 鼠 标的 exfa 的 状态 */ 
if (i == Oxfa) { 
mouse phase = 1; 
} 
} else if (mouse_phase == 1) { 
/* SERS DAY SB */ 
mouse _dbuf[@] = i; 
mouse phase = 2; 
} else if (mouse_phase == 2) { 
/* SERENA AR */ 
mouse _dbuf[1] = i; 
mouse phase = 3; 
} else if (mouse_phase == 3) { 
/* 等 待 鼠 标的 第 三 字 节 */ 
mouse dbuf[2] = i; 
mouse phase = 1; 
/* BERETS S wan */ 
Sprintf(s, "%02X %02X %02X", 
mouse _dbuf[@], mouse_dbuf[1], mouse_dbuf[2]); 
boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, 32, 16, 32 + 8 * 8 - 1, 31); 
putfonts8_asc(binfo->vram, binfo- 
>scrnx, 32, 16, COL8_FFFFFF, s); 


这 段 程 序 要 做 什么 事情 呢 ? 首先 要 把 最 初恋 到 的 
0xfa 舍 弃 挥 。 之 后 ， 每 次 从 鼠标 那里 送 过 来 的 数据 
者 应 该 是 3 个 字 节 一 组 的 ， 所 以 每 当 数 据 累 积 到 3 个 
ZT, WEE EREHE. 


变量 mouse_phase 用 来 记 住 接收 鼠标 数据 的 工作 进 
展 到 了 什么 阶段 (phase) 。 接 收 到 的 数据 放 在 
mouse_dbuf[0~2] 内 。 


其 他 地 方 没 有 什么 难点 。 不 过 为 了 让 大 家 看 得 更 清 
楚 ， 还 是 在 这 里 写 一 ie 


if (mouse phase == @) { 
各 种 处 理 ; 


} else if (mouse _ phase == 1) { 


各 种 处 理 ; 
} else if oe phase == 2) { 
各 种 处 


} else if a == 3) { 
各 种 处 理 ; 


对 于 不 同 的 mouse_phase 值 ， 相 应 地 做 各 种 不 同 的 
处 理 。 


我 们 赶紧 运行 一 下 试 试看 吧 。“make run”， 然 后 点 
击 鼠 标 或 者 是 滚动 鼠标 ， 可 以 看 到 各 种 反应 。 


显示 出 3 个 字 节 


屏幕 上 会 出 现 类 似 于 “08 12 34” 之 类 的 3 字 节 数字 。 
如 果 移 动 鼠 标 ， 这 个 “08” 部 分 〈 也 就 是 
mouse_dbuf[0]) 的 “02? 那 一 位 ， 会 在 0 一 3 的 范围 内 
变化 。 另 外 ， 如 果 只 是 移动 鼠标 ，08 部 分 的 “8” 那 
一 位 ， 不 会 有 任何 变化 ， 只 有 当 点 击 鼠 标的 时 候 它 
ZEM. METAR, AEA AEP ER e 
NMSA RM. AE BEATE W AAEE AES 
一 F 之 间 变 化 。 


上 述 “12” 部 分 (mouse dbuf[1]) 与 鼠标 的 左右 移动 
有 关系 ,“34” 部 分 (mouse_dbuf[2]) 则 与 鼠标 的 上 
下 移动 有 关系 。 


趁 着 这 个 机 会 ， 请 大 家 仔细 观察 一 下 数字 与 鼠标 动 
作 的 关系 。 我 们 要 利用 这 些 知识 去 解读 这 3 个 字 市 
的 数据 。 


2 稍 事 整 理 (harib05b ) 


HariMain 有 点 乱 ， 我 们 来 整理 一 下 。 


修改 后 的 bootpack.c 节 选 


struct MOUSE DEC { 
unsigned char buf[3], phase; 


}; 


void enable_mouse(struct MOUSE_DEC *mdec); 
int mouse_decode(struct MOUSE_DEC *mdec, unsigned char 


dat); 
void HariMain(void) 


CHH) 
struct MOUSE DEC mdec; 


CHH) 


enable_mouse(&mdec); 


for (;;) { 
io_cli(); 
if (fifo8_status(&keyfifo) + 
Ffifo8_status(&mousefifo) == @) { 
io_stihlt(); 
} else { 
if (fifo8_status(&keyfifo) != @) { 
i = fifo8_get(&keyfifo) ; 
io_sti(); 
Sprintf(s, "%@2X", i); 


boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, ©, 16, 15, 31); 
putfonts8_asc(binfo->vram, binfo- 
>scrnx, ©, 16, COL8_FFFFFF, s); 
} else if (fifo8 status(&mousefifo) != @) { 
i = fifo8 get(&mousefifo) ; 
io_sti(); 
if (mouse decode(&mdec, i) != @) { 
/* 3 字 节 都 竣 齐 了 ， 所 以 把 它们 显示 出 来 */ 
sprintf(s, "%02X %02X %02X", 
mdec.buf[@], mdec.buf[1], mdec.buf[2]); 
boxfill18(binfo->vram, binfo->scrnx, 
COL8 008484, 32, 16, 32 + 8 * 8 - 1, 31); 
putfonts8_asc(binfo->vram, binfo- 
>scrnx, 32, 16, COL8 FFFFFF, s); 


} 
} 
} 
} 
} 
void enable mouse(struct MOUSE DEC *mdec) 
{ 
/* 鼠标 有 效 */ 
wait_KBC_sendready(); 
io_out8(PORT_KEYCMD, KEYCMD_SENDTO MOUSE) ; 
wait_KBC_sendready(); 
io_out8(PORT_KEYDAT, MOUSECMD_ ENABLE) ; 
/* 顺利 的 话 ，ACK(@xfa) 会 被 送 过 来 */ 
mdec->phase = @; /* 等 得 0xfa 的 阶段 */ 
return; 
} 


int mouse decode(struct MOUSE DEC *mdec, unsigned char 
dat) 


{ 


if (mdec->phase == @) { 
/* 等 待 鼠 标的 69xfa 的 阶段 */ 
if (dat == 6xfa) { 
mdec->phase = 1; 
} 


return ð; 


if (mdec->phase == 1) { 
/* ERE ID RPT Be */ 
mdec->buf[@] = dat; 
mdec->phase = 2; 
return ð; 


if (mdec->phase == 2) { 
/* 等 待 鼠 标 第 二 字 节 的 阶段 */ 
mdec->buf[1] = dat; 
mdec->phase = 3; 
return ð; 


if (mdec->phase == 3) { 
/* 等 待 鼠 标 第 二 字 节 的 阶段 */ 
mdec->buf[2] = dat; 
mdec->phase = 1; 
return 1; 


} 
return -1; /* 应 该 不 可 能 到 这 里 来 */ 


上 面 几乎 没有 任何 新 东西 。 我 们 创建 了 一 个 结构 体 
MOUSE DEC。DEC 是 decode 的 缩写 。 我 们 创建 这 
个 结构 体 ， 是 想 把 解读 鼠标 所 需要 的 变量 都 归 总 到 
一 块 儿 。 


在 函数 enable_mouse 的 最 后 ， 笔 者 附加 了 将 phase 归 
零 的 处 理 。 之 所 以 要 舍 去 读 到 的 0xfa， 是 因为 女 标 
己 经 激活 了。 因此 我 们 进行 归 零 处 理 也 不 错 。 


我 们 将 鼠标 的 解读 从 函数 HariMain 的 接收 信息 处 理 
中 剥离 出 来 ， 放 到 了 mouse_decode 函 数 里 ， 
Harimain 又 回 到 了 清晰 的 状态 。3 个 字 节 凌 齐 后 ， 
mouse_decode 函 数 执行 “return 1;”， 把 这 些 数据 显示 
出 来 


测试 一 下 ， 运 行 “make run”， 没 有 问题 ， 能 正常 运 


行 。 太 好 了 ! 


3 鼠标 解读 (2) Charib05c) 


程序 已 经 很 清晰 了 ， 我 们 继续 解读 程序 。 首 先 对 
mouse_decode 函 数 略 加 修改 。 


bootpack.c 节选 


struct MOUSE DEC { 
unsigned char buf[3], phase; 
int x, y, btn; 


上 


int mouse _decode(struct MOUSE DEC *mdec, unsigned char 
dat) 


if (mdec->phase == @) { 
/* 等 待 鼠 标的 9xfa 的 阶段 */ 
if (dat == Oxfa) { 
mdec->phase = 1; 
} 


return ð; 


if (mdec->phase == 1) { 
/* 等 等 鼠标 第 一 字 市 的 阶段 */ 
if ((dat & @xc8) == 0x08) { 
/* 如 果 第 一 字 节 正确 */ 
mdec->buf[6] = dat; 
mdec->phase = 2; 


} 


return ð; 


if (mdec->phase == 2) { 


/* 等 待 鼠 标 第 二 字 节 的 阶段 */ 
mdec->buf[1] = dat; 
mdec->phase = 3; 

return ð; 


if (mdec->phase == 3) { 
/* 等 待 鼠 标 第 三 字 节 的 阶段 */ 
mdec->buf[2] = dat; 
mdec->phase = 1; 
mdec->btn = mdec->buf[@] & 0x07; 
mdec->x = mdec->buf[1]; 


mdec->y = mdec->buf[2]; 
if ((mdec->buf[@] & 0x10) != ð) { 
mdec->x |= 6xffffff66 ; 


} 
if ((mdec->buf[@] & 0x20) != ð) { 
mdec->y |= 6xffffff66 ; 
} 
mdec->y = - mdec->y; /* 鼠标 的 y 方 向 与 画面 符号 相反 


return 1; 


return -1; /* 应 该 不 会 到 这 儿 来 */ 


结构 体 里 增加 的 几 个 变量 用 于 存放 解读 结果 。 这 几 
个 变量 是 x、y 和 btn， 分 别 用 于 存放 移动 信息 和 鼠标 
按键 状态 。 


另外 ， 笔 者 还 修改 了 if (mdec—>phase==1) 语句 。 


这 个 if 语句 ， 用 于 判断 第 一 字 节 对 移动 有 反应 的 部 
分 是 否 在 0~3 的 范围 内 ， 同 时 还 要 判断 第 一 字 节 对 
点 击 有 反应 的 部 分 是 否 在 8~F 的 范围 内 。 如 果 这 个 
字 节 的 数据 不 在 以 上 范围 内 ， 它 就 会 被 舍 去 。 


虽说 基本 上 不 这 么 做 也 行 ， 但 鼠标 连 线 偶尔 也 会 有 
接触 不 恨 、 即 将 断 线 的 可 能 ， 这 时 就 会 产生 不 该 有 
的 数据 丢失 ， 这 样 一 来 数据 会 错开 一 个 字 市 。 数 据 
一 旦 错位 ， 束 不 能 顺利 解读 ， 那 问题 可 束 大 了 。 而 
如 果 添 加 上 对 第 一 字 市 的 检查 ， 就 算出 了 了 问题， 局 
标 也 只 是 动作 上 上 略 有 失误 ， 很 快 就 能 纠正 过 来 ， 所 
以 笔者 加 上 了 这 项 检查 。 


最 后 的 让 (mdec—>phase==3) 部 分 ， 是 解读 处 理 的 
核心 。 鼠 标 键 的 状态 ， 放 在 buf[0] 的 低 3 位 ， 我 们 只 
取出 这 3 位 。 十 六 进 制 的 0x07 相 当 于 二 进 制 的 0000 
0111， 因 此 通过 与 运算 (&) ， 可 以 很 顺利 地 取出 
低 3 位 的 值 。 


x 和 y， 基 本 上 是 直接 使 用 buf[1] 和 buf[2] ， 但 是 需要 
使 用 第 一 字 市 中 对 鼠标 移动 有 反应 的 儿 位 (参考 第 
一 节 的 叙述 ) 信息 ， 将 x 和 y 的 第 8 位 及 第 8 位 以 后 全 
部 都 设 成 1， 或 全 部 都 保留 为 0。 这 样 束 能 正确 地 解 
谈 X 和 vV。 


在 解读 处 理 的 最 后 ， 对 y 的 符号 进行 了 取 反 的 操 
作 。 这 是 因为 ， 鼠 标 与 屏幕 的 y 方 向 正好 相反 ， 为 
了 配合 画面 方向 ， 就 对 y 符 号 进行 了 取 反 操作 。 


这 样 ， 了 鼠标 数 据 的 解读 束 完 成 了 。 现 在 我 们 来 修改 


下 有 显示 部 分 。 


HariMain 节选 


} else if (fifo8_status(&mousefifo) != @) { 
i = fifo8 get(&mousefifo) ; 
io_sti(); 
if (mouse decode(&mdec, i) != @) { 


/* 数据 的 3 个 字 节 都 章 了 ， 显 示 出 来 */ 


sprintf(s, "[lcr %4d %4d]", mdec.x, mdec.y); 
if ((mdec.btn & 6x61) != 6) { 
s[1] = 'L'; 


if ((mdec.btn & 0x02) != @) { 
s[3] = 'R'; 


if ((mdec.btn & 0x04) != @) { 
s[2] = 'C'; 


boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, 32, 16, 32 + 15 * 8 - 1, 31); 

putfonts8 asc(binfo->vram, binfo->scrnx, 32, 
16, COL8_FFFFFF, s); 


虽然 程序 中 会 检查 mdec.btn 的 值 ， 用 3 个 if 语 句 将 s 的 
值 置换 成 相 应 的 字符 串 ， 不 过 这 一 部 分 ， AY GAS 
要 管 了 。 这 样 ， 程 序 就 变 成 以 下 这 样 。 


sprintf(s, "[lcr %4d %4d]", mdec.x, mdec.y); 
boxfill8(binfo->vram, binfo->scrnx, COL8 008484, 32, 
16, 32 +15 * 8 - 1, 31); 


putfonts8 asc(binfo->vram, binfo->scrnx, 32, 16, 
COL8_FFFFFF, s); 


XGA AIEEE, MARERE. Hl 
在 加 上 刚才 的 站 语句 : 


if ((mdec. & Q@x01) != 6) { 
s[1] = ; 


e 如 果 mdec.btmn 的 最 低位 是 1， 束 
把 s 的 第 2 个 字符 〈 注 :第 1 个 字符 是 s[0] ) 换 


pee ales gee BL ge FS SUA 
语句 也 都 这 样 理 解 吧 。 


执行 一 下 看 看 。 


反应 都 很 正常 ， 心 情 大 好 。 


4 移动 鼠标 指针 Charib05d) 


鼠标 的 解读 部 分 已 经 完成 了 ， 我 们 再 改 一 改 图 形 显 
示 部 分 ， 让 鼠标 指针 在 屏 帮 上 动 起 来 。 


HariMain 节选 


} else if (fifo8 status(&mousefifo) != @) { 
= fifo8 get(&mousefifo) ; 

io_sti(); 

if (mouse decode(&mdec, i) != @) { 
/* 数据 的 3 个 字 节 都 章 了 ， 显 示 出 来 ”*/ 
sprintf(s, "[lcr %4d %4d]", mdec.x, mdec.y); 
if ((mdec.btn & 0x01) != 6) { 

s[1] = 'L'; 


} 
if ((mdec.btn & 6x62) != @) { 
s[3] = a 


if ((mdec.btn & 0x04) != @) { 
s[2] = 'C'; 


boxfill8(binfo->vram, binfo->scrnx, 
COL8_008484, 32, 16, 32 + 15 * 8 - 1, 31); 

putfonts8_asc(binfo->vram, binfo->scrnx, 32, 
16, COL8_FFFFFF, s); 

/* WERTET */ 

boxfill8(binfo->vram, binfo->scrnx, 
COL8_008484, mx, my, mx + 15, my + 15); /* 隐藏 鼠标 */ 

mx += mdec.x; 

my += mdec.y; 

if (mx < @) { 


mx = ð; 


} 

if (my < @) { 
my = ð; 

} 


if (mx > binfo->scrnx - 16) { 
mx = binfo->scrnx - 16; 


if (my > binfo->scrny - 16) { 
my = binfo->scrny - 16; 


sprintf(s, "(%3d, %3d)", mx, my); 

boxfill8(binfo->vram, binfo->scrnx, 
COL8 008484, ©, ©, 79, 15); /* 隐藏 坐标 */ 

putfonts8 asc(binfo->vram, binfo->scrnx, ©, @, 
COL8_FFFFFF, s); /* 显示 坐标 */ 

putblock8 8(binfo->vram, binfo->scrnx, 16, 16, 
mx, my, mcursor, 16); /* 描画 鼠标 */ 


这 次 修改 的 程序 ， 到 /* BUD TS ET) */ 之 前 为 
止 ， 与 以 前 相同 ， 不 再 解释 大 家 应 该 也 明白 。 


至 于 其 以 后 的 部 分 ， 则 是 先 隐 藏 挥 鼠 标 指 针 ， 人 然后 
在 鼠标 指 针 的 坐标 上 ， 加 上 解读 得 到 的 位 移 
量 。“mx += mdec.x;”7e“mx = mx + mdec.x;” HY) 4 lig 
EA. KAA RELE Bp te Et Po Bl eee ON, PR 
进行 了 调整 ， 调 整 后 重新 显示 鼠标 坐标 ， 鼠标 指 针 


也 会 重新 描画 。 


好 了 ， 我 们 来 测试 一 下 ， 运 行 “make run”. YA Jay 
一 晃 鼠 标 ， 结 果 如 下 : 


鼠标 指针 总 算 动 起 来 了 ! 经 过 长 期 的 艰苦 奋战 ， 终 
于 胜利 了 。 为 了 让 鼠标 指针 能 动 起 来 ， 我 们 从 第 5 
天 的 下 午 就 开始 准备 ， 到 第 8 天 下 午 才 完成 。 


但 也 正 是 因为 经 过 这 番 兰 战 ， 我 们 既 完 成 了 
GDTIDTPIC 的 初始 化 ， 又 学 会 了 自由 使 用 栈 和 
FIFO 组 冲 区 ， 还 学 会 了 处 理 键 盘 中 断 。 接 下 来 就 会 
轻松 很 多 。 


心里 实在 很 高 兴 ， 于 是 多 动 了 几 下 鼠标 。 喝 ? 
只 要 也 标 一 接触 到 站 饰 在 屏 大 下 部 的 任务 栏 ， 束 会 


变 成 下 页 图 那样 。 这 是 因为 我 们 没有 考虑 到 膨 加 处 
理 ， 所 以 画面 束 出 问题 了 。 这 个 话题 留 到 以 后 再 


说 ， 今 天 剩 下 的 时 间 ， 


asmhead.nas 。 


呵 ， 粳 糕 ! 


5 通 往 32 位 模 陈 之 路 


我 们 一 直 都 没有 说 明 asmhead.nas 中 的 如 同 谜 一 样 的 
大 约 100 行 程序 。 等 笔者 回 过 神 儿 来 ， 已 经 到 了 可 
ee 现在 就 是 个 好 机 会 ， 我 们 来 具体 


在 没有 说 明 的 这 段 程序 中 ， 最 开始 做 的 事情 如 下 : 


asmhead.nas 71 t 


; PICKHI—Y) Fit 
根据 AT 兼容 机 的 规格 ， 如 果 要 初始 化 PIC， 
必须 在 CLI 之 前 进行 ， 否 则 有 时 会 挂 起 。 
随后 进行 PIC 的 初始 化 。 


MOV AL ,6xff 

OUT @x21,AL 

NOP ; 如 果 连 续 执行 OUT 指 令 ， 有 
些 机 种 会 无 法 正常 运行 

OUT Q@xal1,AL 


CLI ; FAIECPUARIAY Fit 


这 段 程序 等 同 于 以 下 内 容 的 C 程 序 。 


io_out(PIC6_IMR，6xff); /* 禁止 主 PIC 的 全 部 中 断 */ 
io_out(PIC1_IMR, Oxff); /* 禁止 从 PIC 的 全 部 中 断 */ 


io_cli(); /* 禁止 CPU 级 别 的 中 断 */ 


如 有 果 当 CPU 进行 模式 转换 时 进来 了 中 断 信 号 ， 那 可 
就 及 烦 了 。 而 且 ， 语 来 还 要 进行 PIC 的 初始 化 ， 初 
始 化 时 也 不 允许 有 中 断 有 发生。 所以， 我 们 要 把 中 断 
全 部 屏蔽 挥 。 


顺便 说 一 下 ，NOP 指 令 什 么 都 不 做 ， 它 只 是 让 CPU 
休息 一 个 时 钟 长 的 时 间 。 


CLLD 
再 往 下 看 ， 会 看 到 以 下 部 分 。 


asmhead.nas {Ji ( 2E) 


; 为 了 让 CPU 能 够 访问 1MB 以 上 的 内 存 空间 ， 设 定 A28GATE 


waitkbdout 

AL,@xd1 

@x64, AL 

waitkbdout 

AL, Oxdf 3 enable A20 
@x60, AL 

waitkbdout 


这 里 的 waitkbdout， 等 同 于 
wait KBC_sendready〈 以 后 还 会 详细 说 明 ) o XE 
程序 在 C 语 言 里 的 写法 大 致 如 下 : 


#define KEYCMD WRITE OUTPORT @xd1 
#define KBC OUTPORT A26G ENABLE 6xdf 


/* A26GATE 的 设 定 */ 

wait_KBC_sendready(); 

io_out8(PORT_KEYCMD, KEYCMD_WRITE_OUTPORT) ; 
wait_KBC_sendready(); 

io_out8(PORT_KEYDAT, KBC_OUTPORT_A2@G ENABLE) ; 


wait_KBC_sendready(); /* 这 人 句 话 是 为 了 等 待 完成 执行 指令 


程序 的 基本 结构 与 init_keyboard 完 全 相同 ， 功 能 仅 
仅 是 往 键 租 控 制 电路 发 送 指令 。 


这 里 发 送 的 指令 ， 和 是 指令 键盘 控制 电路 的 附属 痛 口 
输出 0xdf。 这 个 附属 关口 ， 连 接着 主板 上 的 很 多 地 
方 ， 通 过 这 个 站 口 发 送 不 同 的 指令 ， 融 可 以 实现 各 
种 各 样 的 控制 功能 。 


这 次 输出 0xdf 所 要 完成 的 功能 ， 是 让 A20GATE 信 和 号 
线 变 成 ON 的 状态 。 这 条 信号 线 的 作用 是 什么 呢 ? 
它 能 使 内 存 的 1MB 以 上 的 部 分 变 成 可 使 用 状态 。 最 
初出 现 电 脑 的 时 候 ，CPU 只 有 16 位 模式 ， 所 以 内 存 
最 大 也 只 有 1MB。 后 来 CPU 变 聪明 了 ， 可 以 使 用 很 
大 的 内 存 了 。 但 为 了 兼容 旧版 的 操作 系统 ， 在 执行 
激活 指令 之 前 ， 电 路 被 限制 为 只 能 使 用 1MB 内 存 。 
和 鼠标 的 情况 很 类 似 哟 。A20GATE 信 和 号 线 正 是 用 
来 使 这 个 电路 停止 从 而 让 所 有 内 存 都 可 以 使 用 的 东 
西 。 


最 后 还 有 一 点 , “wait KBC _sendready0;” 是 多 余 
的 。 在 此 之 后， 虽然 个 会 往 键 盘 送 命令 ， 人 从 要 
等 到 下 一 个 命令 入 这 是 为 了 等 
A20GATE 的 处 理 切实 


TECI 
PIE PA 
asmhead.nas fi i (2) 
; 切换 到 保护 模式 


[INSTRSET "i486p"] ;，“ 想 要 使 用 486 指 令 ” 的 叙述 


LGDT [GDTRO] ; 设 定 临时 GDT 
MOV EAX, CRO 
AND EAX,6x7fffffff ; 设 bit31 为 6 (为 了 禁止 分 


OR EAX,6x66666661 ; 设 bite 为 1 (为 了 切换 到 保 
护 模式 ) 

MOV CRO, EAX 

JMP pipelineflush 


pipelineflush: 
MOV AX,1*8 ; ”可 读 写 的 段 32bit 
MOV DS , AX 
MOV ES, AX 
MOV FS,AX 
MOV GS, AX 
MOV SS, AX 


INSTRSET 指 令 ， 是 为 了 能 够 使 用 386 以 后 的 
LGDT，EAX，CR0 等 天 键 字 。 


LGDT 指 令 ， 不 管 三 七 二 十 一 ， 把 随意 准备 的 GDT 
给 读 进 来 。 对 于 这 个 暂 定 的 GDT， 我 们 以 后 还 要 重 
新 设置 。 然 后 将 CR0 这 一 特殊 的 32 位 寄存 需 的 值 代 
入 EAX， 并 将 最 高 位 置 为 0， 最 低位 置 为 1， 再 将 这 
个 值 返 回 给 CR0 寄 存 器 。 这 样 就 完成 了 模式 转换 ， 
进入 到 不 用 颁 的 保护 模式 。CR0， 也 就 是 control 
register 0， 是 一 个 非常 重要 的 寄存 器 ， 只 有 操作 系 
统 才 能 操作 它 。 


保护 模式 -与 先前 的 16 位 模式 不 同 ， 段 寄存 器 的 解 
释 不 是 16 倍 ， 而 是 能 够 使 用 GDT。 这 里 的 “保护 ”， 
来 自身 文 的 “protect”。 在 这 种 模式 下 ， 应 用 程序 既 
不 能 随便 改变 段 的 设 定 ， 义 不 能 使 用 操作 系统 专用 
~ 操作 系统 受到 CPU 的 保护， 所 以 称 为 你 护 模 
工 No 


1 本 来 的 说 法 应 该 是 “protected virtual address 
mode”， 翻 译 过 来 就 是 “ 受 保护 的 虚拟 内 存 地 址 模 
式 ”。 与 此 相对 ， 从 前 的 16 位 模式 称 为 “real 
mode”， 它 是 “real address mode” HJ HSI sk, A 
EDK LAE “SE Pre. KHER A 

的 “virtualj”，“real” 的 区 别 在 于 计算 内 存 地 址 时 ， 
是 使 用 段 寄 存 器 的 值 直接 指定 地 址 值 的 一 部 分 


呢 ， 还 是 通过 GDT 使 用 段 寄 存 器 的 值 指 定 并 非 实 
际 存在 的 地 址 号 码 。 


在 保护 模 陈 中 ， 有 带 保护 的 16 位 模式 ， 和 带 保 护 的 
neers 我 们 要 使 用 的 ， 征 带 保 护 的 32 位 模 
工 No 


讲解 CPU 的 书 上 会 写 到 ， 通 过 代入 CR0 而 切换 到 保 
护 模式 时 ， 要 马上 执行 JMP 指 令 。 所 以 我 们 也 执行 
这 一 指令 。 为 什么 要 执行 JMP 指 令 呢 ? 因为 变 成 保 
护 模 式 后 ， 机 器 语言 的 解释 要 发 生变 化 。CPU 为 了 
加 快 指令 的 执行 速度 而 使 用 了 管道 (pipeline) 这 一 
机 制 ， 束 是 说 ， 前 一 条 指令 还 在 执行 的 时 候 ， 融 开 
始 解释 下 一 条 甚至 是 再 下 一 条 指令 。 因 为 模式 变 
了 ， 就 要 重新 解释 一 遍 ， 所 以 加 入 了 JMP 指 令 。 


而 且 在 程序 中 ， 进 入 保护 模式 以 后 ， 段 寄存 器 的 意 
思 也 变 了 (不 再 是 乘 以 16 后 再 加 算 的 意思 了 ) ， 除 
了 CS 以 外 所 有 上 段 寄存 器 的 值 都 从 0x0000 变 成 了 
0x0008。CS 保 持原 状 是 因为 如 果 CS 也 变 了 ， 会 造 
成 混乱 ， 所 以 只 有 CS 要 放 到 后 面 再 处 理 。0x0008， 
相当 于 “gdt + 1 的 段 。 


我 们 再 往 下 该 程序 。 


asmhead.nas t it (2E) 


; bootpack 的 转送 


MOV ESI, bootpack ; 转送 源 
MOV EDI, BOTPAK ; 转送 目的 地 
MOV ECX,512*1024/4 

CALL memcpy 


; 磁盘 数据 最 终 转 送 到 它 本 来 的 位 置 去 
; 首先 从 司 动 夯 区 开始 


MOV ESI,6x7c66 ; 转送 源 
MOV EDI, DSKCAC ; 转送 目的 地 
MOV ECX,512/4 

CALL memcpy 


; 所 有 剩 下 的 


MOV ESI,DSKCAC@+512 ; 转送 源 

MOV EDI,DSKCAC+512 ; 转送 目的 地 

MOV ECX,6 

MOV CL,BYTE [CYLS] 

IMUL ECX,512*18*2/4 ; 从 柱 面 数 变 换 为 字 节 数 /4 
SUB ECX,512/4 ; 减 去 IPL 

CALL memcpy 


简单 来 说 ， 这 部 分 程序 只 是 在 调用 memcpy 函 数 。 
为 了 让 大 家 掌握 这 段 程 序 的 大 意 ， 我 们 将 这 段 程 序 
写成 了 C 语 言 形 式 。 虽 然 写 法 本 里 可 能 不 很 正确 ， 
但 有 助 于 大 家 抓 住 程序 的 中 心思 想 。 


memcpy(bootpack， BOTPAK， 512*1024/4) ; 
memcpy (@x7ce0, DSKCAC, 512/4 )3 


memcpy(DSKCACO+512, DSKCAC+512, cyls * 512*18*2/4 - 
512/4); 


痕 数 memcpy 是 复制 内 存 的 函数 ， 语 法 如 下 : 


memcpy (转送 源 地 址 ， 转 送 目 的 地 址 ， 转 送 数 据 
的 大 小 ); 

转送 数据 大 小 是 以 双 字 为 单位 的 ， 所 以 数据 大 小 用 
字 节 数 除 以 4 来 指定 。 在 上 面 3 个 memcpy 语 句 中 ， 
我 们 先 来 看 看 中 间 一 句 。 


memcpy (0x7c00, DSKCAC, 512/4); 


DSKCAC 是 0x00100000， 所 以 上 面 这 句 话 的 意思 就 
是 从 0x7c00 复 制 512 字 节 到 0x00100000。 这 正好 是 
将 启动 硝 区 复制 到 1MB 以 后 的 内 存 去 的 意思 。 下 一 


“Smemcpyi# A]: 


memcpy (DSKCAC@+512, DSKCAC+512, cyls * 
512*18*2/4-512/4) ; 


它 的 意思 就 是 将 始 于 0x00008200 的 磁盘 内 容 ， 复 制 
到 0x00100200 那 里 。 


上 文中 “转送 数据 大 小 ?的 计算 有 点 复业 ， 因 为 它 是 


以 柱 面 数 来 计算 的 ， 所 以 需要 减 去 启动 区 的 那 一 部 
分 长 度 。 这 样 始 于 0x00100000 的 内 存 部 分 ， 就 与 磁 
盘 的 内 容 相 吻合 了 。 顺 便 说 一 下 ，IMUL“ 是 乘法 运 
算 ，SUB} 是 减法 运算 。 它 们 与 ADD (加 法 ) 运算 
同属 一 类 。 


?IMUL， 来 自 英文 “integer multipule”( 整 数 乘 
ee 


3 SUB, KA M“substract” (IRIE) 。 


MERATE h A BY R RUR R A Ee Ak 
memcpy 了 。bootpack 是 asmhead.nas 的 最 后 一 个 标 
签 。haribote.sys 是 通过 asmhead.bin 和 bootpack.hrb 连 
接 起 来 而 生成 的 《可 以 通过 Makefile 确 认 ) ， 上 所 以 
asmhead2a RHED, KRE FEA bootpack. hrbix 
前 面 的 部 分 。 


memcpy(bootpack, BOTPAK, 512*1024/4); > 
从 bootpack 的 地 址 开始 的 512KB 内 容 复 制 
到 6x66286666 号 地 址 去 。 


这 了 吏 是 将 bootpack.hrb 复 制 到 0x00280000 号 地 址 的 处 
理 。 为 什么 是 512KB 呢 ?这 是 我 们 酌情 考虑 而 决定 
的 。 内 存 多 一 些 不 会 产生 什么 问题 ， 所 以 这 个 长 度 
要 比 bootpack.hrb 的 长 度 大 出 很 多 。 


后 面 还 剩 50 行 程序 ， 我 们 继续 往 下 看 。 


asmhead.nas {Ji (2) 


; 必须 由 asmhead 来 完成 的 工作 ， 至 此 全 部 完毕 
; ”以 后 就 交 由 bootpack 来 完成 


; bootpack 的 启动 


EBX, BOTPAK 
ECX, [EBX+16] 

ECX, 3 ; ECX += 3; 

ECX, 2 ; ECX /= 4; 

skip ; 没有 要 转送 的 东西 时 
ESI, [EBX+20] ; 转送 源 

ESI, EBX 

EDI, [EBX+12] ; 转送 目的 地 


memcpy 


ESP, [EBX+12] ; 栈 初始 值 
DWORD 2*8:0x@000001b 


结果 我 们 仍然 只 是 在 做 memcpy。 它 对 bootpack.hrb 
的 header〈 头 部 内 容 ) 进行 解析 ， 将 执行 所 必需 的 
数据 传送 过 去 。EBX 里 代入 的 是 BOTPAK， 所 以 值 
如 下 : 


[EBX + 16]...bootpack.hrb 之 后 的 第 16 号 地 
址 。 值 是 ex11a8 


[EBX + 20]......bootpack.hrbz Jaf) 205 Hh 
址 。 值 是 ex16c8 


[EBX + 12]...bootpack.hrb 之 后 的 第 12 号 地 
址 。 值 是 ex66316666 


上 面 这 些 值 ， 是 我 们 通过 二 进 制 编 辑 器 ， 打 开 
harib05d 的 bootpack.hrb 后 确认 的 。 这 些 值 因 harib 的 
版 本 不 同 而 有 所 变化 。 


SHR 指 令 是 同 右 移 位 指令 ， 相 当 于 “ECX >>=2;”, 
与 除 以 4 有 着 相同 的 效果 。 因 为 二 进 制 的 数 右 移 1 
位 ， 值 就 变 成 了 12; 左 移 1 位 ， 值 就 变 成 了 2 倍 。 这 
可 能 不 太 容 易 理解 。 还 是 拿 我 们 熟悉 的 十 进 制 来 思 
考 一 下 吧 。 十 进 制 的 时 候 ， 同 右 移 动 1 位 ， 值 就 变 
成 了 10( 比 如 120 > 12) ; 向 左 移动 1 位 ， 值 就 变 
成 了 10 倍 (比如 3 > 30) 。 二 进 制 也 是 一 样 。 所 
以 ， 问 右 移动 2 位 ， 正 好 与 除 以 4 有 着 同样 的 效果 。 


JZ 是 条 件 跳 转 指令 ， 来 和 目 英文 jump 让 zero， 根 据 前 
一 个 计算 结果 是 否 为 0 来 决定 是 否 跳 转 。 在 这 里 ， 
根据 SHR 的 结果 ， 如 果 ECX 变 成 了 0， 就 跳 转 到 skip 
那里 去 。 在 harib05d 里 ，ECX 没 有 变 成 0， 所 以 不 跳 
FF 


而 最 终 这 个 memcpy 到 底 用 来 做 什么 事情 呢 ? 它 会 


将 bootpack.hrb 第 0x10c8 字 节 开 始 的 0x11a8 字 节 复 制 
到 0x00310000 号 地 址 去 。 大 家 可 能 不 明白 为 什么 要 
做 这 种 处 理 ， 但 这 个 问题 ， 必 须要 等 到 “ 纸 娃娃 系 
统 ” 的 应 用 程序 讲 完 之 后 才能 讲 清楚 ， 所 以 大 家 现 
在 不 懂 也 没关系 ， 我 们 以 后 还 会 说 明 的 。 


最 后 将 0x310000 代 入 到 ESP 里 ， 然 后 用 一 个 特别 的 
JMP 指 令 ， 将 2* 8 代入 到 CS 里 ， 同 时 移动 到 0xlb 
号 地 址 。 这 里 的 0xlb 号 地 址 是 指 第 2 个 段 的 0xlb 号 
地 址 。 第 2 个 段 的 基地 址 是 0x280000， 所 以 实际 上 
是 从 0x28001b 开 始 执 行 的 。 这 也 就 是 bootpack.hrb 的 
0x1b5 HALE. 


这 样 束 开始 执行 bootpack.hrb 了 。 


下 面 要 讲 的 内 容 可 能 有 点 偶 离 主题 ， 但 笔者 还 是 想 
介绍 一 下 “ 纸 娃娃 系统 ”的 内 存 分 布 图 。 


6Xx66666666 - 6x666fffff :虽然 在 启动 中 会 多 
次 使 用 ， 但 之 后 就 变 空 。 (1MB) 


0x00100000 - 6x66267fff : 用 于 保存 软盘 的 内 
容 。 (1446KB ) 


0x00268000 - 90x6626f7ff : 4 (30KB) 


0x0026f800 - Oxee26ffFF: IDT (2KB) 
0x00270000 - 6X6627ffff : GDT (64KB) 


0x00280000 - 9X602ffffTf : 
bootpack .hrb (512KB) 


6x663666668 - 9x663fffff : 栈 及 其 他 (1MB) 
0x00400000 - : 2 


这 个 内 存 分 布 图 当然 是 笔者 所 做 出 来 的 。 为 什么 要 
做 成 这 呢 ? 其 实 也 没有 什么 特别 的 理由 ， 和 觉得 这 样 
还 行 ， 跟 着 感觉 走 束 决定 了 。 男 外 ， 虽 然 没 有 明 

写 ， 但 在 最 初 的 IMB 范 围 内 ， 还 有 BIOS，VRAM 
等 内 容 ， 也 就 是 说 并 不 是 1MB 全 都 空 着 。 


从 软盘 读 出 来 的 东西 ， 之 所 以 要 复制 到 0x00100000 
号 以 后 的 地 址 ， 融 是 因为 我 们 意识 中 有 这 个 内 存 分 
布 图 。 同 样 ， 前 几 天 ， 之 所 以 能 够 确定 正式 版 的 
GDT 和 IDT 的 地 址 ， 也 是 因为 这 个 内 存 分 布 图 。 


如 果 一 开始 就 制作 内 存 分 布 图 ， 那 么 做 起 操作 系统 
来 就 会 顺利 多 了 ，。 


天 于 内 存 分 布 图 束 讲 这 么 多 ， 还 是 让 我 们 回 到 
asmhead.nas 的 说 明 上 来 吧 。 


asmhead.nas t it (2) 


waitkbdout: 


; 空谈 (为 了 清空 数据 接收 


IN 
缓冲 区 中 的 垃圾 数据 ) 

JNZ waitkbdout ; ANDAJ RUR DEO, W 
跳 到 waitkbdout 

RET 


这 就 是 waitkbdout 所 完成 的 处 理 。 基 本 上 ， 如 前 面 
所 说 的 那样 ， 它 与 wait_KBC_sendready 相 同 ， 但 也 
添加 了 部 分 处 理 ， 融 是 从 OX60 号 设备 进行 IN 的 处 
理 。 也 就 是 说 ， 如 果 控 制 器 里 有 和 键盘 代码 ， 或 者 是 
已 经 累积 了 鼠标 数据 ， 束 顺便 把 它们 读 取 出 来 。 


JNZ 与 ]Z 相 反 ， 意 思 是 “jump if not zero”. 


TTTT 
只 剩 下 一 点 点 内 容 了 ， 下 面 是 memcpy 程 序 。 


asmhead.nas {JW (2È) 


memcpy: 
MOV EAX, [ESI] 


ADD ESI,4 


MOV [ EDI], EAX 

ADD EDI,4 

SUB ECX,1 

JNZ memcpy ; 减法 运算 的 结果 如 果 不 是 
96， 就 跳 转 到 memcpy 

RET 


a) 


— 内 存 的 程序 。 不 用 笔者 解释 ， 大 家 也 能 明 


EEHEEHE 

三 | H N Ve. my 
最 后 是 剩 下 来 的 全 部 内 容 。 
asmhead.nas it (22) 

ALIGNB 16 

RESB 8 s NULL selector 

DW Oxf fff, @xe0ee,ex9200,exeecf ; 可 以 读 写 的 
Be (segment) 32bit 

DW Oxf FFF, Ox0000,0x9a28,0x0047 ; 可 以 执行 的 
Py (segment) 32bit (bootpack 用 ) 


DW 0 


DW 8*3-1 
DD GDT6 


ALIGNB 16 
bootpack: 


ALIGNB 指 令 的 意思 是 ， 一 直 添 加 DBO， 直 到 时 机 
合适 的 时 候 为 止 。 什 么 是 “时 机 合适 ” 呢 ? 大 家 可 能 
有 点 不 明白 。ALIGNB 16 的 情况 下 ， 地 址 能 被 16 整 
除 的 时 候 ， 束 称 为 “时 机 合适 ”。 如 果 最 初 的 地 址 能 
被 16 整 除 ， 则 ALIGNB 指 令 不 作 任何 处 理 。 


如 果 标 签 GDT0 的 地 址 不 是 8 的 整数 倍 ， 问 段 寄 存 器 
复制 的 MOV 指 令 束 会 慢 一 些 。 所 以 我 们 插入 了 
ALIGNB 指 令 。 但 是 如 果 这 样 ，“ALIGNB 8” W 
了 ， 用 “ALIGNB 16” 有 点 过 头 了 。 最 后 

的 “bootpack:” 之 前 ， 也 是 “时 机 合适 ”的 状态 ， 上 所 以 
笔者 就 适当 加 了 一 名 “ALIGNB 16”. 


GDT0 也 是 一 种 特定 的 GDT。0 号 是 空 区 域 (null 
sector) ， 不 能 够 在 那里 定义 段 。1 写 和 2 与 分 别 由 
ENRE 

set segmdesc(gdt + 1, Oxffffffff, 0x00000000, 
AR_DATA32_RW); 


set_segmdesc(gdt + 2, LIMIT_BOTPAK, ADR_BOTPAK, 
AR_CODE32_ER); 


M 一下， 然后 用 DW 排列 了 出 


GDTR0 是 LGDT 指 令 ， 意 思 是 通知 GDT0 说 “有 了 
GDT 哆 ”。 在 GDT0 里 ， 写 入 了 16 位 的 段 上 限 ， 和 32 
位 的 段 起 始 地 址 。 


到 此 为 止 ， 关 于 asmhead.nas 的 说 明 就 结束 了 。 就 是 
说 ， 最 初 状态 时 ，GDT 在 asmhead.nas 里 ， 并 不 在 
0x00270000 ~ 0x0027ffff 的 范围 里 。IDT 连 设 定 都 没 
设 定 ， 所 以 仍 处 于 中 断 禁 止 的 状态 。 应 当 趁 着 硬件 
上 积累 过 多 数据 而 产生 误 动 作 之 前 ， 尽 快 开 放 中 
Wr, fC AHR o 


此 ， 在 bootpack.c 的 HariMain 里 ， 应 该 在 进行 调 色 
板 〈palette〉 的 初始 化 以 及 画面 的 准备 之 前 ， 先 赶 
紧 重 新 创建 GDT 和 IDT， 初 始 化 PIC， 并 执 

行 “io_sti();”。 


bootpack.c 节 选 


void HariMain(void) 


{ 


struct BOOTINFO *binfo = (struct BOOTINFO *) 
ADR_BOOTINFO; 

char s[40], mcursor[256], keybuf[32], 
mousebuf[128 ] ; 

int mx, my, ij; 

struct MOUSE DEC mdec; 


init_gdtidt(); 

init_pic(); 

io_sti(); /* IDT/PIC 的 初始 化 已 经 完成 ， 于 是 开放 CPU 的 中 
it */ 

fifo8_init(&keyfifo, 32, keybuf); 

fifo8 init(&mousefifo, 128, mousebuf) ; 


io_out8(PIC6_IMR，6xf9); /* 开放 PIC1 和 键盘 中 晰 
(11111001) */ 
io_out8(PIC1_IMR, Oxef); /* 开放 鼠标 中 断 (11161111) 


init_keyboard(); 


init_palette(); 
init_screen8(binfo->vram, binfo->scrnx, binfo- 
>scrny) ; 


夜 已 经 深 了 ， 今天 就 到 此 为 止 。 在 考虑 明天 要 做 什 
么 的 同时 ， 笔 者 也 决定 要 睡觉 了 。 上 晚安 ! 


第 9 天 “内存 管理 


。 整理 源 文 件 Charib06a ) 

。 内 存 容量 检查 (1) Charib06b) 
。 内 存 容量 检查 (2) (harib06c) 
。 挑 战 内 存 管 理 (harib06d) 


1 整理 源 文件 Charib06a ) 


现在 我 们 还 残留 一 个 问题 ， 就 是 眠 标 指针 的 车 加 处 
理 不 太 顺利 。 不 过 如 果 一 味 进行 鼠标 处 理 的 话 ， 大 
家 可 能 很 容易 腊 迷 ， 所 以 我 们 今天 干 友 儿 列 的 。 鼠 
标 指针 的 登 加 处 理 问 题 迟 早 会 解决 的 ， 大 家 不 用 担 
心 ， 暂 时 先 瑟 卸 这 个 事情 吧 。 


那么 ， 今 天 做 什么 呢 ? BANS ABBA BEI 
好 不 容易 变 成 了 32 位 模式 ， 终 于 可 以 使 用 电脑 的 全 
部 内 存 了 ， 大 家 肯定 也 想 用 一 用 试 试 吧 。 


刚 想 改造 pootpack.c， 却 发 现 为 了 解决 鼠标 处 理 问 
题 而 大 加 修改 程序 导致 程序 变 大 了 很 多 ， 足 足 有 
182 行 。 咽 ， 程 序 太 长 了 ， 怎 么 看 都 不 舒服 ， 所 以 
笔者 决定 将 程序 整理 一 下 。 
本 次 的 程序 整理 表 

移 动 后 


oe decode | pe | ae 
inthandler21 ii] keyboard.c 


z) 前 
ootpack.c 
ootpack.c 

r 
ootpack.c m 
inthandler init.c 


要 做 的 事情 很 简单 ， 仅 仅 是 把 函数 与 到 不 同 的 地 方 


而 已 。 此 时 ， 如 有 条 不 知道 哪个 函数 写 在 什么 地 方 ， 
可 就 抹 烦 了 ， 所 以 在 bootpack.h 里 还 要 加 上 消 数 声 
明 ， 在 Makefile 的 “OBJS_BOOTPACK=” 那 里 ， 要 将 
keyboard.obj 和 mouse.obj 也 补 进去 。 


我 们 顺便 确认 一 下 运行 情况 。“make run”， 不 错 不 
错 ， 还 能 像 以 前 那样 运行 。 这 样 bootpack.c 残 减 到 
S867. Hin! 


2 内 存 容量 检查 (1) (harib06b) 


现在 我 们 要 进行 内 存 管理 了 。 首 先 必须 要 做 的 事 
情 ， 是 搞 清 楚 内 存 完 葛 有 多 大 ， 范 围 是 到 哪里 。 如 
果 连 这 一 把 痢 所 不 清楚 的 话 ， 内 存 演 理 束 无 从 谈 
起 。 


在 最 初 启动 时 ，BIOS 肯 定 要 检查 内 存 容量 ， 所 以 只 
要 我 们 问 一 问 BIOS， 束 能 知道 内 存 容量 有 多 大 。 但 
问题 是 ， 如 果 那 样 做 的 话 ， 一 方面 asmhead.nas 会 变 
长 ， 男 一 方面 ，BIOS 版 本 不 同 ，BIOS 函 数 的 调用 

方法 也 不 相同 ， 麻 烦 事 太 多 了 。 所 以 ， 笔 者 想 与 其 
如 此 ， 不 如 自己 去 检查 内 存 。 


TOLD 
下 面 介 绍 一 下 做 法 。 


首先 ， 和 暂时 让 486 以 后 的 CPU 的 高 速 缓存 (cache) 

功能 无 效 。 回 忆 一 下 最 初 讲 的 CPU 与 内 存 的 关系 

吧 。 我 们 说 过 ， 内 存 与 CPU 的 距离 地 与 CPU 内 部 元 
件 要 远 得 多 ， 因 此 在 寄存 器 内 部 MOV， 要 比 从 寄 
存 器 MOV 到 内 存 快 得 多 。 但 另 一 方面 ， 有 一 个 问 
题 ，CPU 的 记忆 力 太 差 了 ， 即 使 知道 内 存 的 速度 不 
行 ， 还 不 得 不 频繁 使 用 内 存 。 


考虑 到 这 个 问题 ， 瑞 特 尔 的 大 叔 们 在 CPU 里 也 加 进 
了 一 点 存储 器 ， 它 被 称 为 高 速 组 种 存 储 器 《cache 

memory) 。cache 这 个 词 原 是 指 储存 粮食 弹药 等 物 
资 的 仓库 。 但 是 能 够 跟 得 上 CPU 速 度 的 高 速 存储 右 
价格 特别 高 ， 一 个 坊 片 就 有 一 个 CPU 那 么 贵 。 如 果 
128MB 内 存 全 部 都 用 这 种 融 价 和 存储器， 预算 上 肯定 
受 不 了 。 高 速 缓存 ， 容 量 只 有 这 个 数值 的 干 分 之 

一 ， 也 就 是 128KB 左 右 。 高 级 CPU， 也 许 能 有 1MB 
高 速 缓存 ， 但 即便 这 样 ， 也 不 过 就 是 128MB 的 百 分 
pe 


为 了 有 效 使 用 如 此 稀有 的 高 速 缓存 ， 英 特 尔 的 大 叔 
们 决定 ， 每 次 访问 内 存 ， 都 要 将 所 访问 的 地 址 和 内 
容 存 入 到 高 速 缓存 里 。 也 就 是 存放 成 这 样 : 18 号 地 
址 的 值 是 54。 如 果 下 次 再 要 用 18 写 地 址 的 内 容 ， 
CPU 就 不 再 读 内 存 了 ， 而 是 使 用 高 速 缓存 的 信息 ， 
马上 就 能 回答 出 18 号 地 址 的 内 容 是 54。 


往 内 存 里 写 入 数据 时 也 一 样 ， 首 先 更 新 高 速 组 他 的 
信息 ， 然 后 再 写 入 内 存 。 如 果 先 写 入 内 存 的 话 ， 在 
等 待 写 入 完成 的 期 间 ，CPU 处 于 空闲 状态 ， 这 样 就 
会 影响 速度 。 所 以 ， 先 更 新 缓存 ， 绥 存 控 制 电 路 配 
合 内 存 的 速度 ， 然 后 再 慢 慢 友 送 内 存 写 入 命令 。 


观察 机 堪 语 言 的 流程 会 发 现 ，9 成 以 上 的 时 间 耗 费 
在 循环 上 。 上 所 谓 循环 ， 征 指 程序 在 同一 个 地 方 来 回 


打转 。 所 以 ， 那 个 地 方 的 内 存 要 一 通 又 一 过 读 进 
来 。 从 第 2 疾 循 环 开 始 ， 那 个 地 方 的 内 人 存 信息 已 经 
保存 到 缓存 里 了 ， 束 不 需要 执行 费时 的 读 取 内 存 操 
作 了 ， 机 需 语 言 的 执行 速度 因而 得 以 大 幅 提高 。 


AY, Deets, Weak for(i = 0; i < 100; 

it+H{P XR, VR AE S| AG, WERTE, 
初 是 0 ， 紧 接着 是 1 ， 下 一 个 就 是 2 。 也 就 是 说 ， 
要 往 内 存 的 同一 个 地 址 ， 一 次 又 一 次 写 入 不 同 的 

值 。 绥 存 控制 电路 观察 会 这 一 特性 ， 在 写 入 值 不 断 
变化 的 时 候 ， 试 图 不 写 入 绥 慢 的 内 存 ， 而 是 尽量 在 
绥 存 内 处 理 。 循 环 处 理 完 成 ， 最 终 i 的 值 变 成 100 以 
后 ， 才 发 送 内 存 写 入 命令 。 这 样 ， 就 省 略 了 99 次 内 
存 写 入 命令 ，CPU 儿 乎 不 用 等 就 能 连续 执行 机 器 语 


FH 


386 的 CPU 没 有 缓存 ，486 的 缓存 只 有 8-16KB， 但 两 
者 的 性 能 就 差 了 6 倍 以 上 1。286 进 化 到 386 时 ， 性 能 
可 没 提 高 这 么 多 。386 进 化 到 486 时 ， 除 了 缓存 之 外 
还 有 别 的 改善 ， 不 能 光 靠 缓存 来 解释 这 么 大 的 性 能 
和 差异 ， 但 这 个 性 能 和 差异， 居然 比 16 位 改 恨 到 32 位 所 
带 来 的 性 能 差异 还 要 大 ， 笔 者 认为 这 主要 应 该 归功 
TRF. 


1 这 里 用 来 比较 的 是 386DX-33MHz 与 486DX4- 
100MHz (#§ICOMP1.0) 。 


= Ls 
N~n 


内 存 检 查 时 ， 要 往 内 存 里 随便 写 入 一 个 值 ， 然 后 马 
上 读 取 ， 来 检查 读 取 的 值 与 写 入 的 值 是 否 相 等 。 如 
果 内 存 连接 正常 ， 则 写 入 的 值 能 够 记 在 内 存 里 。 如 
果 没 连接 上 ， 则 读 出 的 值 肯定 是 乱七八糟 的 。 方 法 
很 简单 。 但 是 ， 如 果 CPU 里 加 上 了 缓存 会 怎么 样 
E? 写 入 和 读 出 的 不 是 内 存 ， 而 是 缓存 。 结 果 ， 上 所 
有 的 内 存 都 “正常 ”， 检 查处 理 不 能 完成 。 

所 以 ， 只 有 在 内 存 检 查 时 才 将 缓存 设 为 OFF。 具 体 
来 说 ， 就 是 先 查 查 CPU 是 不 是 在 486 以 上 ， 如 果 
是 ， 就 将 缓存 设 为 OFF。 按 照 这 一 思路 ， 我 们 创建 
了 以 下 函数 memtest。 


本 次 的 bootpack.c 节 选 


#define EFLAGS_AC_BIT 6x66646666 
#define CR@_CACHE DISABLE @x60000000 


unsigned int memtest(unsigned int start, unsigned int 
end) 
{ 

char f1g486 = @; 


unsigned int eflg, cr@, i; 


/* 确认 CPU 是 386 还 是 486 以 上 的 */ 

eflg = io load eflags(); 

eflg |= EFLAGS AC BIT; /* AC-bit = 1 */ 

io_store_eflags(eflg) ; 

eflg = io load eflags(); 

if ((eflg & EFLAGS AC BIT) != 0) { /* 如 果 是 386， 即 
使 设 定 AC=1，AC 的 值 还 会 自动 回 到 8 */ 

flg486 = 1; 


eflg &= ~EFLAGS AC BIT; /* AC-bit = © */ 
io store _eflags(eflg) ; 


if (flg486 != @) { 
cr@ = load _cr@(); 
cr@ |= CR@ CACHE DISABLE; /* 禁止 缓存 */ 
store_cr@(cré@) ; 


i = memtest_sub(start, end); 


if (f1g486 != 0) { 
cr@ = load _cr@(); 
cr@ &= ~CR@_CACHE DISABLE; /* 人 允许 缓存 */ 
store_cr@(cré@) ; 


} 


return i; 


最 初 对 EFLAGS 进 行 的 处 理 ， 是 检查 CPU 是 486 以 上 
还 是 386。 如 果 是 486 以 上 ，EFLAGS 寄 存 器 的 第 18 
位 应 该 是 所 谓 的 AC 标 志 位 ;如 果 CPU 是 386， 那 么 


就 没有 这 个 标志 位 ， 第 18 位 一 直 是 0。 这 里 ， 我 们 
有 意识 地 把 1 写 入 到 这 一 位 ， 然 后 再 读 出 EFLAGS 的 
值 ， 继 而 检查 AC 标 志 位 是 否 仍 为 1。 最 后 ， 将 AC 标 
志 位 重 置 为 0。 


将 AC 标 志 位 重 置 为 0 时 ， 用 到 了 AND 运 算 ， 那 里 出 
现 了 一 个 运算 符 “~”， 它 是 取 反 运算 符 ， 就 是 将 所 
有 的 位 都 反 转 的 意思 。 所 以 ，~EFLAGS_AC BIT 
与 Oxfffbffff 一 样 。 


为 了 禁止 缓存 ， 再 要 对 CR0 寄 存 器 的 东 一 你 忘 位 进 
行 操 作 。 对 哪里 操作 ， 怎 么 操作 ， 大 家 一 看 程序 就 
能 明白。 这 时 ， 需 要 用 到 本 数 load_cr0 和 store_cr0， 


只 能 用 汇编 语言 来 写 ， 存 在 naskfunc.nas 里 。 


本 次 的 naskfunc.nas 节 选 


_load_cré@: 3 int load_cr@(void); 
MOV EAX, CRO 
RET 


_store_cré@: ; void store_cr@(int cre) ; 
MOV EAX, [ESP+4] 
MOV CRO , EAX 
RET 


另外 ，memtest_sub 函 数 ， 是 内 存 检 奏 处 理 的 实现 音 


分 。 


最 开始 的 memtest_sub 


unsigned int memtest sub(unsigned int start, unsigned 
int end) 
{ 
unsigned int i, *p, old, pat@ = Oxaa55aa55, pati = 
@x55aa55aa;} 
for z = start; i <= end; i += 4) { 
= (unsigned int *) i; 
T = *p; /* 先 记 住 修改 前 的 值 */ 
*p = pate; fe] 
xp ^= @xffffffff;  /* 反 转 */ 
if (*p != pat1) { /* 检查 反 转 结果 */ 
not_memory: 
*p = old; 
break ; 


} 
tp A= OX EFEET ETS 再 次 反 转 */ 
if (*p != pate) { 检查 值 是 否 恢 复 */ 


goto not memory; 
} 
*p = old; 恢复 为 修改 前 的 值 */ 
} 


return i; 


这 个 程序 所 做 的 是 : 调查 从 start 地 址 到 end 地 址 的 苑 
内 ， 能 够 使 用 的 内 存 的 末尾 地 址 。 要 做 的 事情 很 
简单 。 首 先 如 果 p 不 是 指针 ， 就 不 能 指定 地 址 去 读 


取 内 存 ， 所 以 先 执行 “p=i;”。 紧 接着 使 用 这 个 p， 将 
原 值 保存 下 来 (变量 old) 。 接 着 试 写 0xaa55aa55， 
在 内 存 里 反 转 该 值 ， 检 查 结果 是 否 正 确 *。 如 果 正 
确 ， 束 再 次 反 转 它 ， 检 碍 一 下 是 否 能 回复 到 初始 

值 。 最 后 ， 使 用 old 变 量 ， 将 内 存 的 值 恢 复 回 去 。 

如 果 在 某 个 环节 没 能 恢复 成 预想 的 值 ， 那 么 就 
在 那个 环节 终止 调查 ， 并 报告 终止 时 的 地 址 。 


“有些 机 型 即便 不 进行 这 种 检查 也 不 会 有 问题 

但 有 些 机 型 因为 必 片 组 和 主板 电路 等 原因 ， 如 果 
ee 所 以 要 
反 转 一 下 。 


hy 我 们 用 XOR 运 算 来 实现 ， 其 运算 符 
“HDA = Oxffffffff;” 是 “*p = *pAOXxffffffff:> 的 省 
咯 形式 ， 


i 的 值 每 次 增加 4 是 因为 每 次 要 检查 4 个 字 节 。 之 所 以 
把 变量 命名 为 pat0、pat1 是 因为 这 些 变量 表示 测试 
时 所 用 的 几 种 形式 。 


笔者 试 着 执行 了 一 下 这 个 程序 ， 发 现 运行 速度 特别 
fe, ze stXtmemtest_subfit SHER, MER IA 
了 最 初 的 部 分 。 


本 次 的 bootpack.c 节 选 


unsigned int memtest_sub(unsigned int start, unsigned 
int end) 


| 


OX55aa55aa ; 
for (i = start; i <= end; i += @x1000) { 
p = (unsigned int *) (i + Oxffc); 
old = *p; /* 先 记 住 修改 前 的 值 */ 


unsigned int i, *p, old, pat@ = Oxaa55aa55, pati = 


改变 的 内 容 只 是 for 语句 中 i 的 增值 部 分 以 及 p 的 赋 
值 部 分 。 每 次 只 增加 4， 就 要 检查 全 部 内 存 ， 速 度 
太 慢 了 ， 所 以 改 成 了 每 次 增加 0x1000， 相 当 于 
4KB， 这 样 一 来 速度 就 提高 了 1000 倍 。p 的 赋值 计 
算式 也 变 了 ， 这 是 因为 ， 如 果 不 进行 任何 改变 仍 写 
作 “p=i;” 的 话 ， 程 序 就 会 只 检查 4KB 最 开头 的 4 个 字 
节 。 所 以 要 改 为 “p=i + 0xffc;”*”， 让 它 只 检查 末尾 的 4 
个 字 节 。 


毕竟 在 系统 启动 时 内 存 已 经 被 仔细 检查 过 了 ， 所 以 
像 这 次 这 样 ， 目 的 只 是 确认 容量 的 话 ， 做 到 如 此 程 
度 融 足够 了 。 甚 全 可 以 说 每 次 检查 1MB 都 没什么 问 


H 


题 。 


那 好 ， 下 面 我 们 来 改造 HariMain。 添 加 的 程序 如 
F: 


本 次 的 bootpack.c 节 选 


i = memtest(0x00400000, @xbfffffff) / (1024 * 1024); 
sprintf(s, "memory %dMB", i); 


putfonts8_asc(binfo->vram, binfo->scrnx, @, 32, 
COL8_FFFFFF, s); 


FT Se ee A L EFE 1. 0x00400000 ~ Oxbf ffffftyts E] 
的 内 存 进 行 检查 。 这 个 程序 最 大 可 以 识别 3GB 范 围 
的 内 存 。0x00400000 号 以 前 的 内 存 已 经 被 使 用 了 
(参考 8.5 节 的 内 存 分 布 图 ) ， 没 有 内 存 ， 程 序 根 本 
运行 不 到 这 里 ， 所 以 我 们 没 做 内 存 检查 。 如 果 以 
byte 或 KB 为 单位 来 显示 结果 不 容易 看 明白 ， 所 以 我 
们 以 MB 为 单位 。 


也 不 知道 能 不 能 正常 运行 。 如 来 在 REMU 上 运行 ， 
根据 模拟 硕 的 设 定 ， 内 存 应 该 为 22MB。 运 行 “make 


Eer A 
memory 3072MB 


Es i 


内 存 容量 怎么 不 对 呀 ? 


I? 怎么 回 事 ? 内 存 容 量 怎么 不 是 32MB， 而 是 
3072MB? 这 不 就 是 3GB 吗 ? 为 什么 会 失败 呢 ? 明 
明 已 经 将 缓冲 OFF 挥 了 了 。 


3 WEREMA (2) Charib06c) 


这 种 做 法 本 和 丑 没 有 问题 ， 笔 者 在 OSASK 上 确认 过 ， 
所 以 看 到 上 述 结果 很 纳闷 。 这 种 内 存 检查 方法 在 很 
多 机 型 上 都 能 运行 ， 所 以 笔者 非常 自信 地 同 大 家 推 
荐 了 它 。 虽 然 笔 者 坚信 程序 没有 问题 ， 可 运行 结 


经 过 多 方 调查 ， 终 于 搞 清 楚 了 原因 。 如 果 我 们 不 

用 “make run”， 而 是 用 “make -r bootpack.nas” 来 运行 
的 话 ， 就 可 以 确认 bootpack.c 被 编译 成 了 什么 样 的 
机 器 语言 。 用 文本 编辑 器 看 一 看 生成 的 bootpack.nas 
会 发 现 ， 最 下 边 有 memtest_sub 的 编译 结果 。 我 们 将 
编译 结果 列 在 下 耐 。〈 为 了 读 起 来 方便 ， 笔 者 还 添 
加 了 注释 。) 


harib06b 中 ，memtest sub 的 编译 结果 


_memtest_sub: 


PUSH EBP ; “编译 器 的 固定 语句 

MOV EBP,ESP 

MOV EDX,DWORD [12+EBP] ; EDX = end; 

MOV EAX,DWORD [8+EBP] ; EAX = start; /* EAX 是 
i */ 

CMP EAX, EDX ; if (EAX > EDX) goto 
L30; 

JA L30 


L36: 


ADD EAX,4696 ; EAX += 0x1000; 
CMP EAX, EDX ; if (EAX <= EDX) goto 
L36; 
JBE L36 
L30: 
POP EBP ; 接收 前 文中 PUSH 的 EBP 
RET ; return; 


有 些 细 节 大 家 可 能 不 太 明 白 ， 但 是 可 以 跟 
memtest_sub 比 较 一 下 。 可 以 友 现 ， 以 上 的 编译 结果 
Al FAAS IE o 


harib06b 中 ，memtest sub 的 内 容 


unsigned int memtest_sub(unsigned int start, unsigned 
int end) 


{ 


unsigned int i, *p, old, pat@ = Q@xaa55aa55, pati = 
@x55aa55aa; 
for (i = start; i <= end; i += @x1000) { 
p = (unsigned int *) (i + Oxffc); 
old = *p; /* 先 记 住 修改 前 的 值 */ 
*p = pate; a y 
*p ^= @xffffffff; /* 反 转 */ 
if (*p != pat1) { /* 检查 反 转 结果 */ 
not_memory: 
*p = old; 
break; 
} 
*p ^= @xffffffff; /* 再 次 反 转 */ 
if (*p != pato) { /* 检查 值 是 否 恢复 */ 


goto not_memory; 


} 
*p = old; /* 恢复 为 修改 前 的 值 */ 


return i; 


} 


大 家 会 发 现 ， 编 译 后 没有 XOR 等 指令 ， 而 且 ， 好 像 
编译 后 只 剩 下 了 for 语 句 。 怪 不 得 显示 结果 是 3GB 
呢 。 但 是 ， 为 什么 会 这 样 呢 ? 


笔者 开始 以 为 这 是 C 编 译 如 有 的 bug， 但 仔细 查 一 但 ， 
发 现 并 非 如 此 。 反 倒是 编译 项 太 过 优秀 了 。 


纺 诺 囊 在 编译 时 ， 应 该 是 按 下 面 思 路 考虑 问题 的 。 


首先 将 内 存 的 内 容 保存 到 old 里 ， 然 后 写 入 pat0 的 
值 ， 再 反 转 ， 最 后 跟 pat1 进 行 比较 。 这 不 是 肯定 
相等 的 吗 ? 证 语句 不 成 立 ， 得 不 到 执行 ， 所 以 把 
CMH. TRA? FB AEE FEN? 这 家 伙 好 像 吏 
喜欢 反 转 。 这 次 是 不 是 要 比较 部 和 pat0 呀 ? 这 不 
是 也 肯定 相等 吗 ? 这 些 处 理 不 是 多 余 么 ? 为 了 提 
将 这 部 分 也 删 挥 吧 。 这 样 一 来 ， 程 序 就 
ARM J: 


Fa Ea GE TARY) C1) 


unsigned int memtest_sub(unsigned int start, 
unsigned int end) 


{ 
unsigned int i, *p, old, pat@ = Q@xaa55aa55, 


pati = @x55aa55aa; 
for (i = start; i <= end; i += @x1000) { 
= (unsigned int *) (i + Oxffc); 


/* 先 记 住 修改 前 的 值 */ 
/* KS */ 
ac Oxf tE. of Sei Fy 
^= @xffffffff; /* 再 次 反 转 */ 
= old; /* 恢复 为 修改 前 的 值 */ 
} 


return 工 ; 


反 转 了 两 次 会 变 回 之 前 的 状态 ， 所 以 这 些 处 理 也 
可 以 不 要 呆 。 因 此 程序 就 变 成 了 这 样 : 


An Eas HGP PAB) C2) 


unsigned int memtest_sub(unsigned int start, 
unsigned int end) 


{ 


unsigned int i, *p, old, pat@ = @0xaa55aa55, 
pat1 = @x55aa55aa; 

for (i = start; i <= end; i += @x1000) { 
p = (unsigned int *) (i + Oxffc); 


old = *p; /* 先 记 住 修改 前 的 值 */ 
*p = pat; fe as "7 
*p = old; /* 恢复 为 修改 前 的 值 */ 


} 


return i; 


?7 | 


还 有 ，“*#p i. ae 
old 的 值 赋 给 s p。 因 此 程序 就 变 成 了 : 


编 详 项 脑 中 所 想 的 〈3) 


unsigned int memtest_sub(unsigned int start, 
unsigned int end) 


{ 
unsigned int i, *p, old, pat@ = Q@xaa55aa55, 


pati = @x55aa55aa; 
for 5 = start; i <= end; i += 0x1000) { 


unsigned int *) (i + Oxffc); 
/* 先 记 住 修改 前 的 值 */ 
/* 恢复 为 修改 前 的 值 */ 
} 


return 工 ; 


这 程序 是 什么 呆 ? 结果 ， 郑 里 面 不 是 没 写 进 任何 
AA? 这 有 什么 意义 ? 


编译 占 脑 中 所 想 的 (4) 


unsigned int memtest sub(unsigned int start, 
unsigned int end) 


{ 


unsigned int i, *p, old, pat@ = Oxaa55aa55, 
pat1 = @x55aa55aa; 
for (i = start; i <= end; i += @x1000) { 
= (unsigned int *) (i + Oxffc); 


} 
return i; 
} 


这 里 的 地 址 变量 p， 虽 然 计算 了 地 址 ， 却 一 次 也 没 
有 用 到 。 这 么 说 来 ，old、pat0、patl 也 都 是 用 不 
到 的 变量 。 全 部 都 舍弃 挥 吧 。 


编译 占 脑 中 所 想 的 (5) 


unsigned int memtest sub(unsigned int start, 
unsigned int end) 


{ 


unsigned int i; 


for (i = start; i <= end; i += @x1000) { } 
return i; 


} 


好 了 ， 这 样 修改 后 ， 速 度 能 提高 许多 。 用 户 肯定 


会 说 : “这 编译 器 真 好 ， 速 度 特别 快 ! ” 


根据 以 上 编 详 化 的 囊 路 ， 我 们 可 以 看 出 ， 它 进行 了 
最 优化 处 理 。 但 其 实 这 个 工作 本 来 是 不 需要 的 。 用 
于 应 用 程序 的 C 编 译 器 ， 根 本 想不到 会 对 没有 内 存 
的 地 方 进行 读 与 。 


如 条 更 改编 详 选 项 ， 是 可 以 停止 最 优化 处 理 的 。 可 
是 在 其 他 地 方 ， 我 们 还 是 需要 如 此 考虑 周密 的 最 优 
化 处 理 的 ， 所 以 不 想 更 改编 译 选 项 。 那 怎样 来 解决 


个 问题 呢 ? 想来 想 去 ， 还 是 觉得 很 及 烦 ， 于 是 决 
ack ance 汇编 来 写 算 了 


这 次 C 编 译 器 只 是 好 心 干 了 坏事 ， 但 意外 的 是 ， 
居然 会 考虑 得 如 此 周到 、 续 密 来 进行 最 优化 处 

理 ..……... 这 个 编译 器 真是 聪明 啊 ! 顺便 说 一 句 ， 这 种 
事 偶 尔 还 会 有 的 ， 所 以 能 够 看 见 中 途 结果 很 有 用 。 
Tro Ht 汇编 语 SIREH, 


笔者 用 汇编 语言 写 的 程序 列举 如 下 。 


本 次 的 naskfunc.nas 节 选 


_memtest_sub: ; unsigned int memtest_sub(unsigned int 
start, unsigned int end) 

PUSH EDI ; 《由 于 还 要 使 用 
EBX, ESI, EDI) 

PUSH ESI 

PUSH EBX 

MOV ESI,OXxaa55aa55 ; bat = 
OXaa55aa525 ; 

MOV EDI ,@x55aa55aa ; pati = 
Q@x55aa55aa; 

MOV EAX, [ESP+12+4 ] ; i = start; 
mts_loop: 

MOV EBX, EAX 

ADD EBX, Oxffc > p=it 
Oxffc; 


MOV EDX, [EBX] ; old = *p; 


MOV 
XOR 
Oxffffffff; 
CMP 
pat1) goto fin; 
JNE 
XOR 
Oxffffffff; 
CMP 
pat®) goto fin; 
JNE 
MOV 
ADD 
CMP 
goto mts_loop; 


JBE 
POP 
POP 
POP 
RET 

mts fin: 
MOV 
POP 
POP 
POP 
RET 


[EBX], ESI 
DWORD [EBX], Oxffffffff 


EDI, [EBX] 


mts_fin 
DWORD [EBX], Oxfffff fff 


ESI, [EBX] 


mts_ fin 

[ EBX], EDX 

EAX, 0x1000 
EAX, [ESP+12+8] 


mts_loop 


EBX 
ESI 
EDI 


[EBX], EDX 
EBX 
ESI 
EDI 


Wwe 


*p A= 
*p = old; 


i += 0x1000; 
if (i <= end) 


笔者 好 久 没 写 过 这 么 长 的 汇编 程序 了 。 程 序 里 加 上 
了 足够 的 注释 ， 应 该 很 好 外 。 虽 然 XOR 指 令 〈 开 
或 ) 是 第 一 次 出 现 ， 不 过 不 用 特别 解释 大 家 也 应 该 


能 明白 。 


那 好 ， 我 们 删除 bootpack.c 中 的 memtest_sub 函 数 ， 
运行 一 下 看 看 。“make run”。 结 果 怎 么 样 呢 ? 


内 存 容量 显示 正常 了 


太 好 了 ! 现在 可 以 回 到 内 存 管理 这 个 正题 上 来 了 。 


4 挑战 内 存 管理 (harib06d ) 


刚才 笔者 一 个 劲 儿 地 说 内 存 管理 长 ， 内 存 党 理 短 
的 ， 那 到 展 什 么 是 内 存 管理 呢 ? 为 什么 要 进行 内 存 
管理 呢 ? 


比如 说 ， 假 设 内 存 大 小 是 128MB， 应 用 程序 A 暂时 
需要 100KB， 男 耐 控制 需要 1.2MB......， 像 这 样 ， 
操作 系统 在 工作 中 ， 有 了 时 需要 分 配 一 定 大 小 的 内 
存 ， 用 完 以 后 义 不 再 需要 ， 这 种 事 会 频繁 发 生 。 为 
了 应 付 这 些 需求 ， 必 须 恰 当 管 理 好 哪些 内 存 可 以 使 
H ENETH) ， 哪 些 内 存 不 可 以 使 用 (正在 
SE) ， 这 就 是 内 存 管理 。 如 果 不 进行 管理 ， 系 统 
会 变 得 一 塌 糊 涂 ， 要 么 不 知道 哪里 可 用 ， 要 人 么 多 个 
应 用 程序 使 用 同一 地 址 的 内 存 。 


内 存 管 理 的 基础 ， 一 是 内 存 分 配 ， 一 是 内 存 释 
放 。“ 现 在 要 启动 应 用 程序 B 了 ， 需 要 84KB 内 存 ， 
MAB L284 Me? ”如 果 问 内 存 管 理 程序 这 么 一 个 问 
题 ， 内 存 管理 程序 就 会 给 出 一 个 能 够 自由 使 用 的 
84KB 的 内 存 地 址 ， 这 就 是 内 存 分 配 。 男 一 方 

面 , “内存 使 用 完了 ， 现 在 把 内 存 归 还 给 内 存 管 理 
程序 ”， 这 一 过 程 就 是 内 存 的 释放 过 程 。 


先 假 说 有 128MB 的 内 存 吧 。 也 丈 是 说 ， 有 
0x08000000 个 字 节 。 男 外 我 们 假设 以 0x1000 个 字 市 
(AKB) 为 单位 进行 管理 。 大 家 会 如 何 管理 昵 ? 答 
案 有 很 多 ， 我 们 从 人 科 单 的 方法 开始 介绍 。 


0x08000000/0x1000 = 0x08000 = 32768， 上 所 以 首先 
我 们 来 创建 32768 字 节 的 区 域 ， 可 以 往 其 中 写 入 0 或 
者 1 来 标记 哪里 是 空 着 的 ， 哪 里 是 正在 使 用 的 。 


char a[ 32768]; 
for (i = 0; i < 1024; i++) { 
afi] = 1; /* 一 直到 4MB 为 止 ， 标 记 为 正在 使 用 */ 


for (i = 1024; i < 32768; i++) { 
ali] = 0; /* 剩 下 的 全 部 标记 为 空 */ 
} 


比如 需要 100KB 的 空间 ， 那 么 只 要 从 a 中 找 出 连续 
25 个 标记 为 0 的 地 方 就 可 以 了 。 


j = 9; 
再 来 一 次 : 
for (i = ð; i < 25; i++) { 
if (a[j + i] != 6) { 
j++; 
if (j < 32768 - 25) goto 再 来 一 次 ; 
"没有 可 用 内 存 了 "; 
} 


} 
"从 a[j] 到 a[j + 24] 为 止 ， 标 记 连 续 为 6" ; 


如 果 找 到 了 标记 连续 为 0 的 地 方 ， 暂 时 将 这 些 地 方 
标记 为 “正在 使 用 *， 然 后 从 j 的 值 计 算出 对 应 的 地 
址 。 这 次 是 以 0x1000 字 而 为 管理 单位 的 ， 所 以 将 j 放 
大 0x1000 倍 就 行 了 。 
for (i = ð; i < 25; i++) { 

a[j + i] = 1; 


} 
"从 j * 0x1000 开始 的 166KB 空 间 得 到 分 配 "; 


如 果 要 释放 这 部 分 内 存 空间 ， 可 以 像 下 面 这 样 做 。 
比如 ， 如 果 过 到 这 种 情况 :“ 刚 才 取 得 的 从 
0x00123000 开 始 的 100KB， 己 经 不 用 了 ， 现 在 归 
还 。 谢 谢 你 呀 。” 那 该 怎么 办 呢 ? 用 地 址 值 除 以 
0x1000， 计 算出 j 残 可 以 了 。 


j = 0x@0123000 / 0x1000; 
FOr (i= 0; i< 25; 144) 4 


a[j + i] = 9; 
} 
很 简单 吧 。 以 后 再 有 需要 内 存 的 时 候 ， 这 个 地 方 又 
可 以 绸 次 衫 使 用 了 。 


上 上面 这 个 方法 虽然 很 好 懂 ， 但 是 有 一 点 问题 。 如 果 


内 存 是 128MB， 管 理 表 只 需要 32768 字 节 
(32KB) ; 如 果 内 存 最 大 是 3GB， 管 理 表 是 多 大 
We? 0xc0000000 / 0x1000 = 0xc0000 = 786432， 也 
就 是 说 光 管 理 表 就 需要 768KB。 当 然 ， 虽 说 768KB 
不 小 ， 但 从 3GB 看 来 ， 只 不 过 是 0.02%。 


事实 上 ，0.02% 的 比例 是 与 容量 没有 关系 的 。 用 
32KB 管 理 128MB 时 ， 比 例 也 是 0.02%。 如 果 容 量 是 
个 问题 ， 这 个 管理 表 可 以 不 用 char 来 构成 ， 而 是 使 
HM Obit) 来 构成 。 归 根 到 奔 ， 储 存 的 只 有 0 和 1， 
用 不 了 一 个 字 节 ， 一 位 就 够 了 。 这 样 做 ， 程 序 会 变 
得 复杂 些 ， 但 是 管理 表 的 大 小 可 缩减 到 原来 的 1/8。 
如 果 是 3GB 内 存 ， 只 需要 96KB 就 可 以 管理 整个 内 存 
了 。 这 个 比例 只 有 0.003%。 


我 们 后 面 还 会 讲 到 ， 这 虽然 不 是 最 好 的 方法 ， 但 
Windows 的 软盘 管理 方法 ， 与 这 个 方法 很 接近 
(1.44MB 的 容量 ， 以 512 字 节 为 单位 分 块 管理 ) 。 


除了 这 个 管理 方法 之 外 ， 还 有 一 种 列表 管理 的 方 
法 ， 是 把 类 似 于 “从 xxx 瑟 地 址 开始 的 yyy 字 节 的 至 
间 是 空 着 的 ”这 种 信息 都 列 在 表 里 。 


struct FREEINFO { /* 可 用 状况 */ 
unsigned int addr, size; 


}; 


struct MEMMAN { /* 内 存 管 理 */ 
int frees; 
struct FREEINFO free[1666 ] ; 

}; 


struct MEMMAN memman ; 

memman .frees = 1; /* 可 用 状况 1ist 中 只 有 1 件 */ 

memman .free[6].addr = 0x00400000; /* 从 6x66466666 
号 地 址 开始 ， 有 124MB 可 用 */ 

memman .free[6].size = 0x07c00000; 


大 体 束 是 这 个 样子 。 之 所 以 有 1000 个 free， 是 考虑 
到 即使 可 用 内 存 部 分 不 连续 ， 我 们 也 能 写 入 到 这 
1000 个 free 里 。memman 是 笔者 起 的 名 字 ， 人 代表 
memory manager。 


比如 ， 如 果 和 需要 100KB 的 空间 ， 只 要 查看 memman 
中 free 的 状况 ， 从 中 找到 100MB 以 上 的 可 用 空间 丈 


for (i = 0; i < memman.frees; i++) { 
if (memman.free[i].size >= 100 * 1024) { 
"找到 可 用 空间 ! "; 
"从 地 址 memman .free[i].addr 开 始 的 168KB 空 间 ， 可 以 使 


HRI"; 
} 


} 
"没有 可 用 空间 "; 


如 果 找 到 了 可 用 内 存 空间 ， 束 将 这 一 段 信息 从 “可 


用 内 存 空间 管理 表 ” 中 删除 。 这 相当 于 给 这 一 段 内 


存 贴 上 了 “正在 使 用 ”的 标签 。 


memman.free[i].addr += 100 * 1024; /* 可 用 地 址 向 后 推进 了 


100KB */ 
memman.free[i].size -= 100 * 1024; /* 减 去 166KB */ 


size hk £0, WA a A AAG ee 
了 ’ 将 这 条 eset! 除 ， frees FIBA LA J o 
释放 内 存 时 ， 增 加 一 条 可 用 信息 ，frees 加 1。 而 
有 日， 还 要 调查 一 下 这 上段 新 释放 出 来 的 内 存 ， 与 相 令 人 
的 可 用 空间 能 不 能 连 到 一 起 。 如 果 能 连 到 一 起 ， 右 
把 它们 归纳 为 一 条 。 

能 够 归纳 为 一 条 的 例子 : 


free[6]: 地 址 96x66466666 号 开始 ，6x66619666 
“ron Ay A 


free[1]: 地 址 96x66419666 号 开始 ，6x67be7666 
zH 


可 以 归纳 为 


free[6]: 地 址 9x66466666 号 开始 ，6x67c686666 
字 市 可 用 


如 果 不 将 它们 归纳 为 一 条 ， 以 后 系统 要 求 “请 给 我 
提供 0x07bf0000 字 节 的 内 存 ” 时 ， 本 来 有 这 么 多 的 可 
用 空间 ， 但 以 先前 的 查找 程序 却 会 找 不 到 。 


上 述 新 方法 的 优点 ， 首 先 就 是 占用 内 存 少 。 
memman 是 8x1000 + 4 = 8004， 还 不 到 8KB。 与 上 
一 种 方法 的 32KB 相 比 ， 差 得 可 不 少 。 而 且 ， 这 里 
的 1000 是 个 很 充裕 的 数字 。 可 用 空间 不 可 能 如 此 零 
全 分 散 〈( 当 然 ， 这 与 内 存 的 使 用 方法 有 关 ) 。 所 
以 ， 这 个 数字 或 许 能 降 到 100。 这 样 的 话 ， 只 要 804 
字 节 就 能 管理 128MB 的 内 存 了 。 


如 果 用 这 种 新 方法 ， 束 算是 管理 3GB 的 内 存 ， 也 只 
需要 8KB 左 右 就 够 了。 当然 ， 可 用 内 存 可 能 更 零碎 
些 ， 为 了 安全 起 见 ， 也 可 以 设 定 10000 条 可 用 区 域 
管理 信息 。 即 使 这 样 也 只 有 80KB。 


这 样 新 方法 ， 还 有 其 他 优点 ， 那 就 是 大 块 内 存 的 分 
配 和 释放 都 非常 迅速 。 比 如 我 们 考虑 分 配 10MB 内 

存 的 情形 。 如 果 按 前 一 种 方法 ， 束 要 写 入 2560 

个 “内 存 正在 使 用 ”的 标记 “1”， 而 释放 内 存 时 ， 要 写 
入 2560 个 “0”。 这 些 都 需要 人 花费 很 长 的 时 间 。 


尺 一 方面 ， 这 种 新 方 法 在 分 配 和 内 人 存 时 ， 只 要 加 法 运 


算 和 减法 运算 各 执行 一 次 束 结 束 了 。 不 管 是 10OMB 
也 好 ，100MB 也 好 ， 还 是 40KB， 任 何 情况 都 一 

样 。 释 放 内 存 的 时 候 虽 然 没 那么 快 ， 但 是 与 写 入 
2560 个 “02” 相 比 ， 速 度 快 得 可 以 用 “一 瞬间 ”来 形容 。 


事情 总 是 有 两 面 性 的 ， 丘 用 内 存 少 ， 分 配 和 释放 内 
存 速度 快 ， 现 在 看 起 来 全 是 优点 ， 但 是 实际 上 也 有 
缺 操 ， 冯 先是 管理 程序 变 复 杂 了。 特别 是 将 可 用 信 
恩 归 纳 到 一 起 的 处 理 ， 变 得 相当 复杂 。 


还 有 一 个 缺点 是 ， 当 可 用 空间 被 摘 得 零 夫 散 散 ， 怎 
么 都 归纳 不 到 一 块 儿 时 ， 会 将 1000 条 可 用 空间 寡 理 
信息 全 部 用 完 。 虽 然 可 以 认为 这 几乎 不 会 有 发生 ， 但 
也 不 能 保证 绝对 不 能 发 生 。 这 种 情况 下 ， 要 么 做 一 
个 更 大 的 MEMMAN， 要 么 束 只 能 割舍 挥 小 块 内 
存 。 被 制 尘 挥 的 这 部 分 内 存 ， 里 然 实际 上 空 看 ， 但 
是 却 被 误 认为 正在 使 用 ， 而 再 也 不 能 使 用 。 


为 了 解决 这 一 问题 ， 实 际 上 操作 系统 想 尽 了 各 种 办 
法 。 有 一 种 办 法 是 ， 暂 时 先 制 舍 挤 ， 当 memman 有 
空余 时 ， 再 对 使 用 中 的 内 存 进行 检查 ， 将 割舍 挥 的 
那 部 分 内 容 再 失 回 来 。 还 有 一 种 方法 是 ， 如 果 可 用 
内 存 太 零 信 了 ， 歌 上 自动 切换 到 之 前 那 种 管理 方法 。 


那么 ， 我 们 的 “ 纸 娃娃 系统 ”(haribote OS) 会 采用 
什么 办 法 呢 ? 笔 者 经 过 其 酌 ， 采 用 了 这 样 一 种 做 
法 ， 即 “ 制 舍 挥 的 东西 ， 只 要 以 后 还 能 找 回 来 ， 整 
暂时 不 去 管 它 。”。 如 果 我 们 陷 在 这 个 问题 上 不 能 
目 拔 ， 花 上 好 几 天 时 间 ， 大 家 了 束 会 厌烦 的 。 笔 者 还 
是 希望 大 家 能 开 开 心心 心地 开发 “ 纸 娃 娃 系 统 ”。 而 
且 万 一 出 了 问题 ， 到 时 候 我 们 再 回 过 头 来 重新 修正 
内 存 管 理 程序 也 可 以 。 


CLLD 
根据 这 种 思路 ， 笔 者 首先 创建 了 以 下 程序 。 


本 次 的 bootpack.c 节 选 


#define MEMMAN_FREES 4090 /* 大 约 是 32KB#/ 


struct FREEINFO { /* 可 用 信息 */ 
unsigned int addr, size; 


}; 
struct MEMMAN { /* 内 存 管 理 */ 
int frees, maxfrees, lostsize, losts; 
struct FREEINFO free[MEMMAN_FREES]; 
}; 
void memman_init(struct MEMMAN *man) 
{ 
man->frees = ®; /* 可 用 信息 数目 */ 
man->maxfrees = 6; /* 用 于 观察 可 用 状况 : frees 的 


最 大 值 */ 


man->lostsize = Q; /* 释放 失败 的 内 存 的 大 小 总 和 
sy 

man->losts = 6; /* 释放 失败 次 数 */ 

return; 


} 


unsigned int memman_total(struct MEMMAN *man) 


/* 报告 空余 内 存 大 小 的 合计 */ 


{ 
unsigned int i, t = 0; 
for (i = ð; i < man->frees; i++) { 
t += man->free[i].size; 
} 
return t; 
} 
unsigned int memman_alloc(struct MEMMAN *man, unsigned 
int size) 
PPh. 
{ 


unsigned int i, a; 
for (i = ð; i < man->frees; i++) { 
if (man->free[i].size >= size) { 
/* 找到 了 足够 大 的 内 存 */ 
a = man->free[i].addr; 
man->free[i].addr += size; 
man->free[i].size -= size; 
if (man->free[i].size == @) { 
/* 如 果 free[i] 变 成 了 86， 就 减 掉 一 条 可 用 信息 
man->frees--; 
for (; i < man->frees; i++) { 
man->free[i] = man->free[i + 1]; /* 


代入 结构 体 */ 


return a; 
} 
} 


return 0; /* 没有 可 用 空间 */ 


一 开始 的 struct MEMMAN， 只 有 1000 组 的 话 ， 可 能 
不 够 。 所 以 ， 我 们 创建 了 4000 组 ， 留 出 不 少 余 量 。 
这 样 一 来 ， 管 理 空 间 大 约 是 32KB。 其 中 还 有 变量 
maxfrees、lostsize、losts 等 ， 这 些 变量 与 管理 本 丑 
没有 关系 ， 不 用 在 意 它 们 。 如 果 特 别 想 了 解 的 话 ， 
可 以 看 看 函数 memman init 的 注释 ， 里 面 有 介绍 。 


国 数 memman_init 对 memman 进 行 了 初始 化 ， 设 定 为 
空 。 主 要 工作 ， 是 将 frees 设 为 0， 而 其 他 的 都 是 附 
属性 设 定 。 这 里 的 init， 是 initialize (MIA) 的 缩 


7 


5 
函数 memman_total 用 来 计算 可 用 内 存 的 合计 大 小 并 


建 了 这 么 一 个 函数 。 原 理 很 简单 ， 不 用 解释 大 家 也 
会 明白 。total 这 个 更 文 单词 ， 是 “合计 ”的 意思 。 


最 后 的 memman_alloc 函 数 ， 功 能 是 分 配 指定 大 小 的 
内 存 。 除 了 freeli].size 变 为 0 时 的 处 理 以 外 的 部 分 ， 

在 前 面 已 经 说 过 了 。alloc 是 英文 allocate (分 配 ) 的 
缩写 。 在 编程 中 ， 需 要 分 配 内 存 空间 时 ， 常 常会 使 


用 allocate 这 个 词 。 

memman alloc 国 数 中 free[i.size 等 于 0 的 处 理 ， 与 
FIFO 绥 冲 区 的 处 理 方 法 很 相似 ， 要 进行 移 位 处 理 。 
希望 大 家 注意 以 下 与 法 : 

man->free[i].addr = man->free[i+1].addr; 
man->free[i].size = man->free[i+1].size; 
我 们 在 这 里 将 其 归纳 为 了 : 

man->free[i] = man->free[i+1]; 


这 种 方法 被 称 为 结构 体 赋 值 ， 其 使 用 方法 如 上 所 
示 ， 可 以 写成 简单 的 形式 。 


释放 内 存 了 沙 数 ， 也 束 是 往 memman 里 退 加 可 用 内 存 
言 恩 的 函数 ， 稍 微 有 点 复杂 。 


本 次 的 bootpack.c 节 选 


int memman_free(struct MEMMAN *man, unsigned int addr, 
unsigned int size) 

/* 释放 */ 

{ 


int i, j; 


/* 为 便于 归纳 内 存 ， 将 free[ ] 按 照 addr 的 顺序 排列 */ 
/* 所 以 ， 先 决定 应 该 放 在 哪里 */ 
for (i = ð; i < man->frees; i++) { 
if (man->free[i].addr > addr) { 
break; 


} 


} 
/* free[i - 1].addr < addr < free[i].addr */ 
if (i > @) { 
/* 前 面 有 可 用 内 存 */ 
if (man->free[i - 1].addr + man->free[i - 
1].size == addr) { 


/* 可 以 与 前 面 的 可 用 内 存 归 纳 到 一 起 */ 
man->free[i - 1].size += size; 
if (i < man->frees) { 
/* 后 面 也 有 */ 
if (addr + size == man->free[i].addr) { 
/* 也 可 以 与 后 面 的 可 用 内 存 归 纳 到 一 起 */ 
man->free[i - 1].size += man- 
>free[i].size; 
/* man->free[i] 删 除 */ 
/* free[i] 变 成 6 后 归纳 到 前 面 去 */ 
man->frees--; 
for (; i < man->frees; i++) { 
man->free[i] = man->free[i + 


1]; /* 结构 体 赋值 */ 
} 


} 
return 0; /* 成 功 完成 */ 
} 


} 
/* 不 能 与 前 面 的 可 用 空间 归纳 到 一 起 */ 
if (i < man->frees) { 


/* 后 面 还 有 */ 


if (addr + size == man->free[i].addr) { 
/* 可 以 与 后 面 的 内 容 归纳 到 一 起 */ 
man->free[i].addr = addr; 
man->free[i].size += size; 
return 0; /* 成 功 完成 */ 

} 


} 
/* 既 不 能 与 前 面 归 纳 到 一 起 ， 也 不 能 与 后 面 归 纳 到 一 起 */ 
if (man->frees < MEMMAN_FREES) { 
/* free[i] 之 后 的 ， 同 后 移动 ， 腾 出 一 点 可 用 空间 */ 
for (j = man->frees; j > i; j--) { 
man->free[j] = man->free[j - 1]; 
} 
man->frees++; 
if (man->maxfrees < man->frees) { 
man->maxfrees = man->frees; /* 更 新 最 大 值 */ 


man->free[i].addr = addr; 
man->free[i].size = size; 
return 0; /* 成 功 完成 */ 


} 

/* 不 能 往 后 移动 */ 
man->losts++; 
man->lostsize += size; 
return -1; /* 失败 */ 


程序 太 长 了 ， 用 文字 来 描述 不 易于 理解 ， 所 以 笔者 
在 程序 里 加 了 注释 。 如 果 理 解 了 以 前 讲解 的 原理 ， 
现在 只 要 细 细 读 一 读 程 序 ， 大 家 肯定 能 看 懂 。 


另外 ， 我 们 前 面 已 经 说 过 ， 如 果 可 用 信息 表 满 了 ， 
束 按 照 汗 去 之 后 市 来 损失 最 小 的 原则 进行 割舍。 但 


是 在 这 个 程序 里 ， 我 们 并 没有 对 损失 程度 进行 比 
较 ， 而 是 舍 去 了 刚刚 进来 的 可 用 信息 ， 这 只 是 为 了 
图 个 方便 。 


最 后 ， 将 这 < 个 程序 应 用 于 HariMain， 结果 就 变 成 了 
~ XIF. Bae CPE) WRT, EERE 
Bis 


本 次 的 bootpack.c 节 选 


#define MEMMAN_ADDR 0x003c0000 


void HariMain(void) 


CHH) 

unsigned int memtotal; 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

CHH) 

memtotal = memtest(0x00400000, Əxbfffffff); 

memman_init(memman); 

memman_free(memman, @x0@0001000, Əx0009e000); /* 
0x00001000 - exeee9effF */ 

memman_free(memman, 0x00400000, memtotal - 
0x00400000) ; 

CHH) 

sprintf(s, “memory %dMB free : %dKB", 

memtotal / (1024 * 1024), 

memman_total(memman) / 1024); 

putfonts8 asc(binfo->vram, binfo->scrnx, 0, 32, 


COL8_FFFFFF, s); 


memman 需 要 32KB， 我 们 暂时 决定 使 用 目 
0x003c0000 开 始 的 32KB 〈0x00300000 号 地 址 以 

后 ， 今 后 的 程序 即使 有 所 增加 ， 预 计 也 不 会 到 达 
0x003c0000， 所 以 我 们 使 用 这 一 数值 ) ， 然 后 计算 
内 存 总 量 memtotal， 将 现在 不 用 的 内 存 以 0x1000 个 
字 节 为 单位 注册 到 memman 里 。 最 后 ， 显 示 出 合计 
可 用 内 存 容 量 。 在 QEMU 上 执行 时 ， 有 时 会 注册 成 
632KB 和 28MB。632+28672=29304， 所 以 屏幕 上 会 
显示 出 29304KB。 


那 好 ， 运 行 一 下 “make rr A. R, BrE 
今天 已 经 很 晚 了 ， 我 们 明天 继续 吧 。 


EE] E 


能 正常 显示 出 29304KB 


第 10 天 ÆJ 


© HFE (Œ) (harib07a) 

e JAIE Charib07b) 

。 提 高 登 加 处 理 速度 (1) (harib07c) 
。 提 高 登 加 处 理 速度 (2) (harib07d) 


1 内 存 管理 (Œ) (harib07a) 


得 荔 于 昨天 的 努力 ， 我 们 终于 可 以 进行 内 存 管 理 

了 。 不 过 仔细 一 看 会 注意 到 ，bootpack.c 都 已 经 有 
254 行 了。 笔者 感觉 这 段 程 序 太 长 了 ， 决 定 整 理 一 
下 ， 分 出 一 部 分 到 memory.c 中 去 。【〔 整 理 中 ) ...... 
好 了 ， 整 理 完了 。 现 在 bootpack.c 变 成 95 行 了 。 


为 了 以 后 使 用 起 来 更 加 方便 ， 我们 还 是 把 这 些 内 存 
管理 国 数 再 整理 一 下 。memman alloc 和 

memman free 能够 以 1 字 节 为 单位 进行 内 存 管 理 ， 这 
种 方式 虽然 不 错 ， 但 是 有 一 点 不 足 一 在 反复 进行 
AEA ACMA ERE Za, AES HES A 
连续 的 小 段 未 使 用 空间 ， 这 样 束 会 把 man 一 >frees 消 
FEA S o 


因此 ， 我 们 要 编写 一 些 总 是 以 0x1000 字 节 为 单位 进 
行内 存 分配 和 释放 的 函数 ， 它 们 会 把 指定 的 内 存 大 
小 按 0x1000 字 节 为 单位 同上 舍 入 (roundup) ， 而 
之 所 以 要 以 0x1000 字 节 为 单位 ， 是 因为 笔者 党 得 这 
个 数 比 较 规 整 。 另 外 ，0x1000 字 节 的 大 小 正好 是 
4KB。 


本 次 的 smemory.c 节 选 


unsigned int memman_alloc_4k(struct MEMMAN *man, 


unsigned int size) 


{ 
unsigned int a; 
size = (size + Oxfff) & 6xfffff660 ; 
a = memman_alloc(man, size); 
return a; 
} 


int memman_free_4k(struct MEMMAN *man, unsigned int 
addr, unsigned int size) 


int i; 

size = (size + Oxfff) & 6xfffff660 ; 
i = memman_free(man, addr, size); 
return i; 


下 面 我 们 来 看 看 这 次 增加 的 部 分 ， 这 里 的 关键 是 问 
上 舍 入 ， 可 是 如 果 上 来 就 讲 向 上 舍 入 的 话 可 能 不 大 
wE, MARIETA FEA (round down) 
讲 起 吧 。 


讲 数字 问题 时 ， 以 钱 为 例 大 家 可 能 更 容易 理解 ， 所 
以 我 们 就 用 钱 来 举例 说 明 。 比 如 ， 把 123 元 以 10 元 
为 单位 进行 同 下 舍 入 ， 束 是 120 元 ; 把 456 元 以 100 
元 为 单位 进行 向 下 舍 入 ， 就 是 400 元 。 通 过 这 些 例 
子 ， 你 会 发 现 “ 所 谓 同 下 舍 入 ， 束 是 把 最 后 几 位 数 
字 强 制 变 为 0”。 


所 以 如 果 将 0x12345678 以 0x1000 为 单位 进行 向 下 爹 
入 ， 得 到 的 就 应 该 是 0x12345000 吧 ? 没 错 ， 这 就 是 
正确 答案 。 这 样 一 来 ， 用 纸 笔 就 可 以 进行 向 下 舍 入 
运算 了 。 不 过 ， 如 果 我 们 要 写 个 程序 让 电脑 来 做 同 
样 的 事 ， 那 该 怎么 办 才 好 呢 ? 


在 二 进 制 下 ， 如 果 我 们 想 把 某 位 变 为 0， 只 要 进 
行 “与 运 径 ” 束 可 以 了 ， 这 在 4.2 节 已 经 介绍 过 了 。 而 
十 六 进 制 其 实 残 是 把 二 进 制 数 4 位 4 位 地 排 在 一 起 ， 
所 以 要 想 把 十 六 进 制 的 某 一 位 设置 为 0%， 同 样 只 进 
行 “与 运算 ”就 可 以 。 


0x12345678 & 0xfffff666 = 0x12345000 


因此 把 变量 i 中 的 数字 以 0x1000 为 单位 进行 向 下 舍 入 
的 式 子 如 下 : 


i = i & Oxfffffee0; 


顺便 告诉 大 家 一 下 ， 以 0x10 为 单位 向 下 含 入 的 式 子 
是 “i =i & Oxfffffffo;”. PPR EJE ST Rae A 
的 方法 。 


下 面 我 们 来 看 看 向 上 舍 入 。 如 果 把 123 元 以 10 元 为 
单位 进行 回 上 舍 入 ， 就 是 130 元 ; 把 456 元 以 100 元 


为 单位 进行 同上 售 入 ， 束 是 500 元 。 咽 虽 ， 原 来 如 
此 ， 看 来 先 疝 下 舍 入 ， 再 在 它 的 结果 上 做 个 加 法 运 
算 束 可 以 了 。 


以 0x1000 为 单位 对 0x12345678 进 行 向 上 侈 入 的 结果 
为 0x12346000。 所 以 有 人 可 能 会 问 :“ 要 是 用 程序 
来 表达 这 个 过 程 的 话 就 应 该 写成 这 样 吧 ? ” 


i = (i & Oxfffff000) + 0x10e0; 


看 起 来 貌似 确实 不 错 ， 但 其 实 这 并 不 是 正确 答案 。 
因为 如 果 “i = 0x12345000;” 时 执行 上 述 命 令 ， 结 果 
就 变 成 了 “i=0x12346000;”。 这 当然 不 对 啦 。 这 就 相 
当 于 ， 以 10 元 为 单位 对 120 元 进行 向 上 舍 入 ， 结 果 
为 130 元 ， 但 实际 上 120 元 同上 使 入 后 应 该 还 是 120 
Ie 

所 以 我 们 要 对 程序 进行 改进 。 有 具体 做 法 是 : 先 判断 
最 后 几 人 位， 如果 本 来 就 是 零 则 什么 也 不 做 ， 如 果 不 
是 零 就 进行 下 面 的 运算 。 


if ((i & Oxfff) != 0){i= (1 & 
OXxfffff6606) + 0x1000; } 


这 样 回 题 丈 解决 了 。 大 功 告 成 。 


MERNIH ARI A BTA REAM ERA 
了 ， 而 实际 上 同上 舍 入 还 有 改进 的 “ 穷 门 ”， 那 就 


H 
KE? 


= (i + Oxfff) & Oxfffffoee; 


这 是 怎么 回 事 呢 ? 实际 上 这 是 “加 上 0xfff 后 进行 向 
下 人 镶 入 ”的 运算 。 不 论 最 后 几 位 是 什么 ， 都 可 以 用 
这 个 公式 进行 问 上 舍 入 运算 。 真 的 吗 ? 


由 于 十 六 进 制 不 易 理 解 ， 所 以 我 们 还 是 以 钱 的 十 进 
制 运算 为 例 来 说 明 吧 。 如 使 用 这 个 方法 以 100 元 为 
单位 对 456 元 进行 问 上 舍 入 ， 束 相当 于 先 加 上 99 元 
再 进行 问 下 舍 入 。456 元 加 .上 99 元 是 555 元 。 Re 
入 后 就 是 500 元 了 。 咽 ， 这 方法 做 出 来 的 答案 没 

错 ，456 元 同上 舍 入 的 结果 确实 束 是 500 元 。 


那么 如 果 对 400 元 进行 回 上 舍 入 呢 ? 先 加 上 99 元 ， 
得 到 499 元 ， 再 进行 回 下 舍 入 ， 结 果 是 400 元 。 看 ， 
400 元 同上 舍 入 的 结果 还 是 400 元 。 


这 种 方法 多 方便 呀 ， 可 比 计 语句 什么 的 好 用 多 了 。 

不 过 其 中 的 原理 是 什么 呢 ? 其 实 加 上 99 元 就 是 判断 
进位 ， 如 采 最 后 两 位 不 是 00， 就 要 回 前 进 一 位 ， 只 
有 妆 最 后 两 位 是 00 时 ， 才 不 需要 进位 。 接 下 来 再 问 
下 舍 入 ， 这 样 就 正好 把 因为 加 法 运算 而 改变 的 后 两 


位 设置 成 00 了 。 看 ， 问 上 舍 入 就 成 功 了 。 


这 个 技巧 并 不 是 笔者 想 出 来 的 ， 筷 了 是 从 哪 本 书 上 
看 到 的 。 能 想到 这 么 做 的 人 真是 相当 聪明 呢 。 既 然 
有 了 这 人 么 方便 的 技巧 ， 我 们 没 道理 不 用 ， 在 此 笔者 
大 力 推 荐 给 大 家 。 而 在 memman_alloc_4k 和 
memman _free_4k 中 也 大 量 使 用 了 该 技 巧 。 


那么 试 痢 “make run” 一 下 吧 。 可 是 没有 任何 反应 
WE! 那 当然 了 ， 这 次 做 的 新 函数 ， 还 没有 被 调用 
HE- 


COLUMN-6 THEA Ie] RA 


上 面 介 绍 了 “与 运算 ?可 以 应 用 于 二 进 制 数 和 十 六 
BEACH) Ra A, ASA OTP Ba AT A AY PE 
HCA IA RA, the EA is OP? 


以 0x10 为 单位 对 变量 i 进行 问 下 舍 入 时 ， 实 际 上 
是 进行 了 “i =i & 0xfffffff0; ”处 理 ,可 以 将 它 看 
成 *i = i &(0x100000000 - 0x10); ”。 同 样 ， 以 
0x100 为 单位 进行 回 下 舍 入 时 ， 进 行 的 是 和 = i & 
0xffffff00; ”处 理 ， 所 以 这 也 可 以 看 成 是 i = i& 
(0x100000000 - 0x100); ”。 也 就 是 说 ， 我 们 好 像 
可 以 归纳 出 “i = i & (0x100000000 - 向 下 舍 入 单 


NL); sae 


按照 以 上 思路 ， 如 果 以 100 为 单位 对 变量 i 进行 向 
FEA, REET LIZE“ = i & (0x100000000 - 
100); ”, BN “i=i & Oxffffff9c; ”来 处 理 。 但 这 样 
做 并 不 成 功 。 假 设 “"i = 123; ”， 结 果 是 123& 
0xffffff9c=24， 没 有 得 到 我 们 的 预期 答案 100。 


不 愿 轻易 放弃 的 人 可 以 尝试 更 多 的 计算 式 ， 不 过 
没有 一 个 能 成 功 ,因为 不 能 用 “与 运算 ”来 进行 十 进 
Hill CA [a] Bae AAS, “与 运算 ”只 能 用 于 二 进 制 
数 的 同 下 舍 入 处 理 。 而 十 六 进 制 数 因为 是 4 位 4 位 
排 在 一 起 的 二 进 制 数 ， 所 以 凑巧 成 功 了 。 


这 倒 不 是 说 无 法 对 二 进 制 和 十 六 进 制 以 外 的 数 进 
行 问 下 舍 入 人 处理 ,只 不 过 是 不 能 使 用 “与 运算 ”而 
己 。 如 果 人 允许 使 用 其 他 方法 ， 一 样 可 以 轻松 地 进 
‘Tite. Pdi =(i/100)*100; ”, 只 需要 先 除 以 
100 再 乘 以 100 就 可 以 了 。 我 们 来 假设 “i=123”， 
123 除 以 100， 结 果 是 1〈 当 整数 除 以 整数 时 ， 答 案 
还 是 整数 ， 所 余 的 数值 叫做 “余数 ”) ， 再 用 1 乘 以 
100 就 得 到 了 我 们 的 预期 结果 100。 再 假设 “i = 
456; ”， 那 么 先 除 以 100 得 到 4， 再 扩大 100 倍 结果 
束 是 400， 这 个 答案 也 是 正确 的 。 


我 们 还 可 以 把 计算 方法 进一步 改进 一 下 ， 写 成 4 = 
i-(i%100); ”， 意思 是 用 i 减 去 i 除 以 100 所 得 的 
余数 。 这 种 方法 只 用 了 除法 和 减法 计算 ， 比 既 用 


除法 又 用 乘法 要 快 。 


不 管 采用 以 上 哪 种 方法 ， 在 以 2_n_ (n>0) 以 外 的 
数 为 单位 进行 向 下 舍 入 和 向 上 舍 入 处 理 时 ， 都 必 
须要 使 用 除法 命令 ， 而 它 恰 恰 是 CPU 最 不 好 处 理 
的 命令 之 一 ， 所 以 计算 过 程 要 花费 较 长 的 时 间 
(当然 ， 在 我 们 看 来 是 一 瞬间 束 结 束 了 )。 

而 “与 ?命令 是 所 有 CPU 命令 中 速度 最 快 的 命令 之 
一 ， 和 除法 命令 相 比 其 执行 速度 要 快 10 倍 到 100 


倍 。 


由 此 可 见 ， 如 果 以 1000 字 节 或 4000 字 节 单 位 进行 
内 存 管理 的 话 ， 每 次 分 配 内 存 时 ， 都 不 得 不 进行 
党 琐 的 除法 计算 。 但 如 果 以 1024 字 节 或 4096 字 节 
为 单位 进行 内 存 管理 的 话 《〈 两 者 都 是 在 二 进 制 下 
易于 取 整 的 数字 。 附 带 说 明 :0x1000 = 4096) ,在 
癌 上 人 铭 入 的 计算 中 惑 可 以 使 用 “与 运算 ”， 这 样 也 
能 够 提高 操作 系统 的 运行 速度 ， 因 此 笔者 认为 这 


个 设计 很 高 明 。 


2 车 加 人 处理 (harib07b) 


上 一 市 我 们 为 了 转换 心情 ， 做 了 内 存 写 理 的 探讨 ， 
现在 还 是 回 过 头 来 ， 继 续 解 决 鼠 标的 问题 吧 。 从 各 
方面 深入 思考 鼠标 的 登 加 处 理 确实 很 有 意思 ， 不 过 
考 夸 到 今后 我 们 还 面临 痢 窗 口 的 登 加 处 理 问 题 ， 所 
以 笔者 想 做 这 么 一 段 程序 ， 让 它 不 仅 适 用 于 鼠标 的 
登 加 处 理 ， 也 能 直接 适用 于 窗口 的 登 加 处 理 。 


其 实在 画面 上 进行 登 加 显示 ， 类 似 于 将 绘制 了 图 案 
的 透明 图 层 登 加 在 一 起 。 


“读者 朋友 如 条 对 图 像 处 理 软件 中 的 “ 层 2”? 有 所 了 
解 ， 也 许 脑 海中 会 立刻 浮现 出 这 个 概念 。 


实际 上 ， 我 们 并 不 是 像 上 面 那样 仅仅 把 两 张大 小 相 
同 的 图 层 重 登 在 一 起 ， 而 是 要 从 大 到 小 准备 很 多 张 


图 层 。 


最 上 面 的 小 图 层 用 来 描绘 鼠标 指针 ， 它 下 面 的 几 张 
图 层 是 用 来 存放 窗口 的 ， 而 最 下 和 面 的 一 张 图 层 用 来 
存放 时 面壁 纸 。 同 时 ， 我 们 还 要 通过 移动 图 层 的 方 
法 实现 鼠标 指针 的 移动 以 及 窗口 的 移动 。 


实际 的 画面 画面 的 概念 


EEHEHE 
我 们 想法 已经 有 了 ， 下 面 就 把 它们 变 成 程序 吧 。 首 
先 来 考虑 如 何 将 一 个 图 层 的 信息 编 成 程序 。 


struct SHEET { 
unsigned char *buf; 


int bxsize, bysize, vx®, vy@, col_inv, height, 
flags; 
} 


暂时 先 写 成 这 样 就 可 以 了 。 程 序 里 的 sheet 这 个 词 ， 


表示 “透明 图 层 ” 的 意思 。 笔 者 党 得 英文 里 没有 

和 “透明 网 层 ?" 接 近 的 词 ， 就 赁 感觉 选 了 它 。buf 是 用 
来 记录 图 层 上 所 描画 内 容 的 地 址 〈buffer 的 略 

W) 。 图 层 的 整体 大 小 ， 用 bxsize*bysize 表 示 。vx0 
和 vy0 是 表示 图 层 在 画面 上 位 置 的 坐标 ，v 是 VRAM 
的 略语 。col_inv 表 示 透 明 色 色 号 ， 它 是 color GR 
fa) 和 invisible〈 透 明 ) 的 组 合 略语 。height 表 示 图 
层 高 度 。Flags 用 于 存放 有 关 图 层 的 各 种 设 定 信息 。 


只 有 一 个 图 层 是 不 能 实现 县 加 处 理 的 ， 所 以 下 面 我 
们 来 创建 一 个 管理 多 重 图 层 信 息 的 结构 。 


#define MAX_SHEETS 


struct SHTCTL { 
unsigned char *vram; 


int xsize, ysize, top; 
struct SHEET *sheets[MAX_SHEETS]; 
struct SHEET sheets@[MAX_SHEETS]; 


我 们 创建 了 SHTCTL 结 构 体 ， 其 名 称 来 源 于 sheet 
control 的 略语 ， 意 思 是 “图 层 管理 ”。 
MAX_SHEETS 是 能 够 管理 的 最 大 图 层 数 ， 这 个 值 
设 为 256 应 该 够 用 了 。 


变量 vram、xsize、ysize 代 表 VRAM 的 地 址 和 画面 的 
大 小 ， 但 如 果 每 次 都 从 BOOTINFO 查 询 的 话 就 太 麻 


烦 了 ， 上 所 以 在 这 里 预先 对 它们 进行 赋值 操作 。top 代 
表 最 上 面 图 层 的 高 度 。sheets0 这 个 结构 体 用 于 存放 
我 们 准备 的 256 个 图 层 的 信息 。 而 sheets 是 记忆 地 址 
变量 的 领域 ， 所 以 相应 地 也 要 先 准备 256 份 。 这 是 

干什么 用 呢 ? 由 于 sheets0 中 的 图 层 顺 序 混乱 ， 所 以 
我 们 把 它们 按照 高 上 度 进行 升序 排列 ， 然 后 将 其 地 址 
写 入 sheets 中 ， 这 样 束 方便 多 了 。 


NAIR BRN CAS SIRES, DRIED aT 
大 家 还 不 太 明 日 ， 与 其 在 这 纸上谈兵 ， 不 如 直接 看 
程序 更 易于 理解 。 所 以 前 面 的 说 明 部 分 ， 大 家 即使 
MEA ATER, FTE PAE. 


在 这 里 我 们 稍微 说 一 下 结构 体 吧 。 内 容 不 难 ， 只 
是 确认 大 家 是 不 是 真正 理解 了 这 个 概念 。struct 
SHTCTL 结 构 体 的 内 部 既 有 子 结构 体 ， 义 有 结构 
体 的 指针 数组 ， 稍 舟 有 些 复杂 ， 不 过 却 是 一 个 不 
钳 的 例子 。 


我 们 的 这 个 例子 并 不 是 用 文字 来 解说 ， 而 是 通过 
图 例 展示 给 大 家 。 请 大 家 看 看 下 面 这 幅 图 ， 确 认 
一 下 是 否 理解 了 结构 体 。 


我 们 提 到 的 网 层 控制 变量 中 ， 仅 仅 sheets0 的 部 分 大 
小 就 有 32x 256=8 192， 即 8KB， 如 果 再 加 上 sheets 
的 话 ， 就 超过 了 9KB。 对 于 空间 需要 如 此 大 的 变 


量 ， 我 们 想 赶紧 使 用 memman alloc 4k 来 分 配 内 存 
， 所 以 就 编号 了 对 内 存 进 行 分 配 和 初始 化 的 函 


(4 字 节 x4) 5 
sheets[0]( 地 址 ) buf( 地 址 ) 
1042 字 节 sheets[1]( 地 址 ) 
~ 
9232 字 节 sheets[255]( 地 址 = 
(Ait) ó 


; =D 
sheet0[0]( 构 造 体 ) | 
ee 
2 25 ; : 


sheet0[255]( 构 造 体 


本 次 的 *sheet.c 节 选 


struct SHTCTL *shtctl_init(struct MEMMAN *memman, 
unsigned char *vram, int xsize, int ysize) 


{ 


struct SHTCTL *ctl; 

int i; 

ctl = (struct SHTCTL *) memman_alloc_4k(memman, 
sizeof (struct SHTCTL)); 

if (ctl == 0) { 

goto err; 

} 

ctl->vram = vram; 

ctl->xsize = xsize; 


ctl->ysize = ysize; 

ctl->top = -1; /*# 一 个 SHEET 没 都 有 */ 

for (i = @; i < MAX_SHEETS; i++) { 
ctl->sheets@[i].flags = 0; /* 标记 为 未 使 用 */ 


return ctl; 


这 上 段 程 序 是 什么 的 呢 ? 首先 使 用 memman_alloc_4k 
来 分 配 用 于 记忆 图 层 控 制 变 量 的 内 存 空 间 ， 这 时 必 
须 指定 该 变量 所 占 空 间 的 大 小 ， 不 过 我 们 可 以 使 用 
sizeof (struct SHTCTL) 这 种 写法 ， 让 C 编 译 器 日 
动 计算 。 只 要 写 sizeof (变量 型 ) ，C 编 译 器 束 会 计 
算出 该 变量 型 所 需 的 字 节 数 。 


接着 ， 我 们 给 控制 变量 赋值 ， 给 其 下 的 所 有 图 层 变 
量 都 加 上 “未 使 用 ”标签 。 做 完 这 一 步 ， 这 个 函数 就 
SCM So 


ee 一 个 函数 ， 用 于 取得 新 生成 的 未 使 用 
FR. 


本 次 的 *sheet.c 节 选 


#define SHEET USE 1 


struct SHEET *sheet_alloc(struct SHTCTL *ct1l) 


struct SHEET *sht; 
int i; 
for (i = ð; i < MAX_SHEETS; i++) { 
if (ctl->sheets@[i].flags == ð) { 
sht = &ctl->sheets@[i]; 
sht->flags = SHEET USE; /* 标记 为 正在 使 用 */ 
sht->height = -1; /* 隐藏 */ 
return sht; 
} 
} 


return @; /* 所 有 的 SHEET 都 处 于 正在 使 用 状态 */ 


在 sheets0[ ] 中 寻找 坟 使 用 的 图 层 ， 如 来 找到 了 ， 整 
将 其 标记 为 “正在 使 用 ， 并 返回 其 地 址 残 可 以 了 ， 
这 里 没有 什么 难点 。 高 度 设 为 -1， 表 示 图 层 的 高 度 
还 没有 设置 ， 因 而 不 是 显示 对 象 。 


FEJT A E Eh AY) &cctl—>sheetsO[i]  “ctl—>sheetsO[i] MJ 
THR re. thie, JE (ctl 
>sheetsO[i]) ， 而 不 是 〈&ctl) 一 > sheets0[i]。 


本 次 的 *sheet.c 节 选 


void sheet_setbuf(struct SHEET *sht, unsigned char 
*buf, int xsize, int ysize, int col_inv) 


{ 


sht->buf = buf; 


sht->bxsize 
sht->bysize 


xsize; 
ysize; 


sht->col_inv = col_inv; 
return; 


Xe WOE ARAB A) Bs BA ES PR, HH, 
PEAT Z MER o 


接 下 来 我 们 写 设 定 底板 高 上 度 的 函数 。 这 稍微 有 些 复 
如， 所 以 我 们 在 程序 中 加 入 了 不 少 注释 。 这 里 的 
updown 束 是 “上 下 ”的 意思 。 


本 次 的 *sheet.c 节 选 


void sheet_updown(struct SHTCTL *ctl, struct SHEET 
*sht, int height) 
{ 


py. 


int h, old = sht->height; /* 存储 设置 前 的 高 度 信 息 */ 


/* 如果 指定 的 高 度 过 高 或 过 低 ， 则 进行 修正 */ 
if (height > ctl->top +1) { 
height = ctl->top + 1; 


} 
if (height < -1) { 
height = -1; 


sht->height = height; /* RERE */ 


/* 下 面 主 要 是 进行 sheets[ ] 的 重新 排列 */ 


if (old > height) { /* 比 以 前 低 */ 
if (height >= 0) { 
/* 把 中 间 的 往 上 提 */ 
for (h = old; h > height; h--) { 
ctl->sheets[h] = ctl->sheets[h - 1]; 
ctl->sheets[h]->height = h; 
} 
ctl->sheets[height] = sht; 
} else { /* 隐藏 */ 
if (ctl->top > old) { 
/* FEMA PR */ 
for (h = old; h < ctl->top; h++) { 


ctl->sheets[h] = ctl->sheets[h + 
1]; 
ctl->sheets[h]->height = h; 
} 
} 
ctl->top--; /* 由 于 显示 中 的 图 层 减 少 了 一 个 ， 所 
以 最 上 面 的 图 属 高 度 下 降 */ 


} 
sheet_refresh(ctl); /* 投 新 图 层 的 信息 重新 绘制 画面 
yd 
} else if (old < height) { /* 比 以 前 高 */ 
if (old >= @) { 
/* 把 中 间 的 拉 下 去 */ 
for (h = old; h < height; h++) { 
ctl->sheets[h] = ctl->sheets[h + 1]; 
ctl->sheets[h]->height = h; 
} 
ctl->sheets[height] = sht; 
} else { /* 由 隐藏 状态 转 为 显示 状态 */ 
/* 将 已 在 上 面 的 提 上 来 */ 
for (h = ctl->top; h >= height; h--) { 
ctl->sheets[h + 1] = ctl->sheets[h]; 
ctl->sheets[h + 1]->height = h + 1; 


ctl->sheets[height] = sht; 


ctl->top++; /* 由 于 已 显示 的 图 层 增 加 了 1 个 ， 所 以 
最 上 面 的 图 层 高 度 增加 */ 


sheet_refresh(ctl); /* 投 新 图 层 信息 重新 绘制 画面 


return; 


程序 稍稍 有 些 长 ， 不 过 既然 大 家 能 看 懂 前 面 的 程 
序 ， 那 么 这 个 程序 应 该 也 是 可 以 看 明白 的 。 每 一 条 
语句 并 不 比 之 前 的 语句 难 ， 只 是 整个 程序 变 长 了 而 
己 。 最 初 可 能 很 难看 进去 ， 但 是 如 果 一 直 坚 持 读 下 
去 的 话 ， 阅 读 程 序 的 能 力 就 会 越 来 越 强 。 


程序 中 间 有 “ct 一 >sheets[h] 一 >height = h; ”这 样 
一 句 话 。 两 个 [一 >] 一 起 出 现 估计 还 是 第 一 次 ， 不 
过 大 家 应 该 异 吧 。 这 当然 是 “(* 
(*ctl).sheets[h]).height=h; ”的 意思 了 。 


要 是 改 与 为 下 面 这 样 ， 残 好 理解 了 。 


下 面 来 说 说 在 sheet_updown 中 使 用 的 sheet_refresh 函 
数 。 这 个 函数 会 从 下 到 上 摘 绘 所 有 的 图 层 。refresh 
是 “刷新 ”的 意思 。 电 视屏 大 束 是 在 1 秒 内 完成 多 帧 
的 描绘 才 做 出 动画 效果 的 ， 这 个 动作 束 被 称 为 刷 
新 。 而 这 种 对 图 层 的 刷新 动作 ， 与 电视 屏幕 的 动作 
有 些 相 似 ， 所 以 我 们 也 给 它 起 名 字 叫 做 刷新 。 


本 次 的 *sheet.c 节 选 


void sheet_refresh(struct SHTCTL *ct1l) 
{ 


int h, bx, by, vx, vy; 
unsigned char *buf, c, *vram = ctl->vram; 
struct SHEET *sht; 
for (h = ð; h <= ctl->top; h++) { 
sht = ctl->sheets[h]; 
buf = sht->buf; 
for (by = ð; by < sht->bysize; by++) { 
vy = sht->vy@ + by; 


for (bx = 0; bx < sht->bxsize; bx++) { 
vx = sht->vx®@ + bx; 
c = buf[by * sht->bxsize + bx]; 
if (c != sht->col_inv) { 
vram[vy * ctl->xsize + vx] = C; 


} 
} 


return; 


对 于 已 设 定 了 高 度 的 所 有 图 层 而 言 ， 要 从 下 往 上 ， 


将 透明 以 外 的 所 有 像 际 都 复制 到 VRAM 中 。 由 于 是 
een 所 以 最 后 最 上 面 的 内 容 就 留 在 了 男 
aoe 


‘TTTIT 

现在 我 们 来 看 一 下 不 改变 图 层 高 度 而 只 左右 移 
BAAR YY ek sheet_slide. slide 原 意 ree Zh, 
这 里 指 上 下 左右 移动 图 层 。 

AN YY) *sheet.c i 126 


void sheet_slide(struct SHTCTL *ctl, struct SHEET *sht, 

int vx®@, int vyð) 

{ 
sht->vx® = vx; 
sht->vy@ = vy@; 


if (sht->height >= 6) { /* 如 果 正 在 显示 */ 


sheet_refresh(ctl); /* 按 新 图 层 的 信息 刷新 画面 */ 
} 


return; 


a Ki sheet free. iX 
AS fa] Fg 


本 次 的 *sheet.c 节 选 


void sheet_free(struct SHTCTL *ctl, struct SHEET *sht) 
{ 


if (sht->height >= @) { 
sheet_updown(ctl, sht, -1); /* 如 果 处 于 显示 状态 ， 
则 先 设 定 为 隐藏 */ 


} 
sht->flags = 0; /* "未 使 用 "标志 */ 
return; 


下 面 我 们 将 以 上 与 图 层 相 关 的 程序 汇总 到 sheet.c 
中 ， 所 以 就 要 改造 HariMain 函 数 了 。 


本 次 的 sbootpack.c 节 选 


void HariMain(void) 


CHEK) 

struct SHTCTL *shtctl; 

struct SHEET *sht_back, *sht_mouse; 
unsigned char *buf_back, buf_mouse[256]; 


CHH) 


init_palette(); 

shtctl = shtctl_init(memman, binfo->vram, binfo- 
>scrnx, binfo->scrny); 

sht_back = sheet_alloc(shtctl); 

sht_mouse = sheet_alloc(shtctl); 

buf_back = (unsigned char *) 
memman_alloc_4k(memman, binfo->scrnx * binfo->scrny); 


sheet_setbuf(sht_back, buf_back, binfo->scrnx, 
binfo->scrny, -1); /* 没有 透明 色 */ 
sheet_setbuf(sht_mouse, buf_mouse, 16, 16, 99); /* 
透明 色 号 99 */ 
init_screen8(buf_back, binfo->scrnx, binfo->scrny); 
init_mouse_cursor8(buf_mouse, 99); /* 背景 色 号 99 */ 
he _Slide(shtctl, sht back, ©, ©); 
= (binfo->scrnx - 16) / 2; /* 按 显 示 在 画面 中 央 来 计 
算 举 标 */ 
= (binfo->scrny - 28 - 16) / 2; 
sheet_slide(shtctl, sht_mouse, mx, my); 
sheet_updown(shtctl, sht_back, @); 
sheet_updown(shtctl, sht_mouse, 1); 
sprintf(s, "(%3d, %3d)", mx, my); 
putfonts8_asc(buf_back, binfo->scrnx, ©, @, 
COL8_FFFFFF, s); 
sprintf(s, “memory %dMB free : %dKB", 
memtotal / (1024 * 1024), 
memman_total(memman) / 1024); 
putfonts8 asc(buf_back, binfo->scrnx, ©, 32, 
COL8_FFFFFF, s); 
sheet_refresh(shtct1) ; 


for (33) { 
io_cli(); 
if (fifo8_status(&keyfifo) + 
fifo8 status(&mousefifo) == @) { 
io_stihlt(); 
} else { 
if (fifo8 status(&keyfifo) != @) { 
= fifo8 get(&keyfifo) ; 
io_sti(); 
sprintf(s, "%@2X", i); 
boxfill8(buf_back, binfo->scrnx, 
COL8 008484, ©, 16, 15, 31); 
putfonts8_asc(buf_back, binfo->scrnx, 


©, 16, COL8_FFFFFF, s); 
sheet_refresh(shtct1) ; 
} else if (fifo8 status(&mousefifo) != ©) { 

i = fifo8_get(&mousefifo) ; 

io_sti(); 

if (mouse decode(&mdec, i) != @) { 
/* 因为 已 得 到 3 字 节 的 数据 所 以 显示 */ 
sprintf(s, "[lcr %4d %4d]", mdec.x, 


mdec.y); 
if ((mdec.btn & 0x01) != 6) { 
s[1] = 'L'; 


if ((mdec.btn & 0x02) != @) { 
s[3] = 'R'; 


if ((mdec.btn & 6x64) != @) { 
S12) Sees 


boxfil18(buf_back, binfo->scrnx, 
COL8 008484, 32, 16, 32 + 15 * 8 - 1, 31); 
putfonts8_asc(buf_back, binfo- 
>scrnx, 32, 16, COL8 FFFFFF, s); 
/* 移动 光标 */ 
mx += mdec .x; 
my += mdec.y; 
if (mx < 0) 
mx = ð; 
} 
if (my < @) 
my = ð; 
} 
if (mx > binfo->scrnx - 16) { 
mx binfo->scrnx - 16; 


} 
if (my > binfo->scrny - 16) { 


my = binfo->scrny - 16; 


} 

sprintf(s, "(%3d, %3d)", mx, my); 

boxfill8(buf back, binfo->scrnx, 
COL8 008484, ©, ©, 79, 15); /* 消 坐 标 */ 

putfonts8_asc(buf_back, binfo- 
>scrnx, ©, @, COL8_FFFFFF, s); /* 写 坐 标 */ 

sheet_slide(shtctl, sht_mouse, mx, 
my); /* 包含 sheet_refresh 售 sheet _ refresh */ 


我 们 准备 了 2 个 图 层 ， 分 别 是 sht_back 和 

sht_mouse， 还 准备 了 2 个 缓冲 区 buf _ back 和 
buf_mouse， 用 于 在 其 中 描绘 图 形 。 以 前 我 们 指定 
为 binfo 一 > vram 的 部 分 ， 现 在 有 很 多 都 改 成 了 

buf back。 而 且 每 次 修改 缓冲 区 之 后 都 要 刷新 。 这 
ee 
理解 。 


好 了 ， 终 于 可 以 “make run” 了 ， 真 是 激动 人 心 的 一 
刻 ! 


成 功 地 运行 啦 ! 真 开心 ! 由 于 使 用 的 内 存 增加 ， 从 
而 导致 剩余 内 存 相 对 减少 ， 但 这 也 是 不 可 避免 的 ， 
现在 这 样 就 可 以 了 。 


不 过 其 实 这 里 面 偿 是 有 问题 。 从 图 请 来 看 硝 实 很 完 
关 ， 可 实际 操作 一 下 ， 你 写 怕 丈 要 喊 “< 吐 血 啦 ! ”。 
没 错 ， 它 太 慢 了， 而 且 夯 面 还 一 内 一 内 的 。 动 一 下 
上限 标 束 要 郁 间 一次， 哪个 用 户 想 用 这 样 的 操作 系统 
呢 ? 所 以 下 面 我 们 惑 来 解决 这 个 问题 吧 。 


3 提高 车 加 人 处理 速度 (1) 
(harib07c ) 


那么 怎样 才能 提高 速度 呢 ? 既然 其 他 操作 系统 都 能 
EMAR, MBEAN. Am, RIA 
恨 标 指针 的 移动 ， 也 就 是 图 层 的 移动 来 思考 一 下 。 


鼠标 指针 虽然 最 多 只 有 16x16=256 个 像素 ， 可 根据 
harib07b 的 原理 ， 只 要 它 稍 一 移动 ， 程 序 就 会 对 整 
个 画面 进行 刷新 ， 也 就 是 重新 描绘 320x200=64 000 
个 像素 。 而 实际 上 ， 只 重新 描绘 移动 相关 的 部 分 ， 
也 就 是 移动 前 后 的 部 分 束 可 以 了 ， 即 256x2=512 个 
像素 。 这 只 是 64 000 像 素 的 0.8% 而 已 ， 所 以 有 望 提 
速 很 多 。 现 在 我 们 根据 这 个 思路 写 一 下 程序 。 


本 次 的 *sheet.c 节 选 


void sheet_refreshsub(struct SHTCTL *ctl, int vx@, int 
vyð, int vx1, int vy1) 
{ 


int h, bx, by, vx, vy; 
unsigned char *buf, c, *vram = ctl->vram; 
struct SHEET *sht; 
for (h = ð; h <= ctl->top; h++) { 
sht = ctl->sheets[h]; 


buf = sht->buf; 
for (by = ð; by < sht->bysize; by++) { 
vy = sht->vy@ + by; 
for (bx = 0; bx < sht->bxsize; bx++) { 
vx = sht->vx@ + bx; 
if (vx® <= vx && vx < vx1 && vy@ <= vy 
&& vy < vyl) { 
c = buf[by * sht->bxsize + bx]; 
if (c != sht->col_inv) { 
vram[ vy * ctl->xsize + vx] = C; 


return; 


这 个 函数 几乎 和 sheet_refresh 一 样 ， 唯 一 的 不 同 点 
在 于 它 能 使 用 vx0~ vy1l 指 定 刷 新 的 范围 ， 而 我 们 只 
所 加 了 一 个 if 语 句 就 实现 了 这 个 新 功能 。 男 外 ， 程 
序 中 的 && 运 算 符 是 我 们 之 前 没有 见 过 的 ， 所 以 在 
这 里 详细 解释 一 下 。 


&& 运 算 符 是 把 多 个 条 件 关 系 陈 连接 起 来 的 运算 

符 。 当 用 它 连 接 的 所 有 条 件 都 满足 时 ， 束 执行 { } 中 
的 程序 ， 只 要 有 一 个 条 件 不 满足 ， 束 不 执行 (如 来 
有 else， 束 执行 else 后 的 语句 ) 。 力 外 ， 还 有 一 个 跟 
它 很 像 的 运算 符 “ 下 。“ 也 是 把 多 个 条 件 关 系 式 连 
接 起 来 的 运算 从， 不 过 由 它 连 接 的 各 个 条 件 ， 只 要 


其 中 一 个 满足 了 ， 就 执行 { } 中 的 程序 。 简 而 言 之 ， 
&& 就 是 “而 且 "， 而 是 “或 者 ”。 


条 件 “vx 大 于 等 于 vx0 且 小 于 vx1” 可 以 用 数学 式 vx0 
<= VX<VX1 来 表达 ， 但 在 C 语 言 中 不 能 这 样 写 ， 我 
们 只 能 写成 vx0 <= vx & & vx < vxl. 


现在 我 们 使 用 这 个 refreshsub 函 数 来 提高 sheet_slide 
的 运行 速度 


本 次 的 *sheet.c 节 选 
void sheet_slide(struct SHTCTL *ctl, struct SHEET *sht, 


int vx®, int vy@) 
{ 


int old_vx@ = sht->vx@, old_vy@ = sht->vyð; 

sht->vx® = vx; 

sht->vy@ = vy@; 

if (sht->height >= 0) { /* 如 果 正 在 显示 ， 则 按 新 图 层 的 
言 轧 刷 新 画面 */ 


sheet_refreshsub(ctl, old_vx@, old_vy@, old vx0 
+ sht->bxsize, old_vy@ + sht->bysize) ; 
sheet_refreshsub(ctl, vx@, vy@, vx@ + sht- 
>bxsize, vy@ + sht->bysize); 
} 


return; 


这 段 程序 所 做 的 是 : 首先 记 住 移 动 前 的 显示 位 置 ， 


再 设 定 新 的 显示 位 置 ， 最 后 只 要 重新 朱 绘 移动 前 和 
移动 后 的 地 方 就 可 以 了 。 


估计 大 家 会 认为 “这 次 鼠标 的 移动 束 快 了 吧 ”， 但 移 
动 鼠 标 时 ， 由 于 要 在 画面 上 显示 坐标 等 信息 ， 结 
又 执行 了 sheet_refresh 程 序 ， 所 以 还 是 很 慢 。 为 了 
不 浪费 我 们 付出 的 各 种 努力 ， 下 面 我 们 束 来 解决 一 
下 图 层 内 文字 显示 的 问题 。 


我 们 所 说 的 在 图 层 上 显示 文字 ， 实 际 上 并 不 是 改写 
图 层 的 全 部 内 容 。 假 设 我 们 已 经 写 了 20 个 字 ， 那 么 
8x16x20=2560， 也 就 是 仅仅 重 写 2560 个 像素 的 内 容 
就 应 该 足够 了 。 但 现在 每 次 却 要 重 写 64 000 个 像素 
的 内 容 ， 所 以 速度 才 那 么 慢 。 


这 么 说 来 ， 这 里 好 像 也 可 以 使 用 refreshsub， 那 么 我 
们 融 来 重新 编写 函数 sheet_refresh 吧 。 


本 次 的 *sheet.c 节 选 


void sheet_refresh(struct SHTCTL *ctl, struct SHEET 
*sht, int bx@, int by@, int bx1, int by1) 


if (sht->height >= 0) { /* 如 果 正 在 显示 ， 则 按 新 图 层 的 
信息 刷新 画面 */ 
sheet_refreshsub(ctl, sht->vx@ + bx@, sht->vy@ 
+ by®@, sht->vx@ + bx1, sht->vy@ + by1); 


} 


return; 


} 


所 谓 指 定 范围 ， 并 不 是 直接 指定 男 面 内 的 坐标 ， 而 
是 以 缓冲 区 内 的 坐标 来 表示 。 这 样 一 来 ，HariMain 
就 可 以 不 考虑 图 层 在 画面 中 的 位 置 了 。 


我 们 改动 了 refresh， 所 以 也 要 相应 改造 updown。 做 
了 改动 的 只 有 sheet_refresh (ctl) 这 部 分 (有 两 
处 ) ， 修 改 后 的 程序 如 下 : 


sheet_refreshsub(ctl, sht->vx@, sht->vy@, sht->vx@ + 
sht->bxsize, sht->vy@ + sht->bysize); 


最 后 还 要 改写 HariMain 。 


本 次 的 sbootpack.c 节 选 


void HariMain(void) 


CHH) 

sprintf(s, "(%3d, %3d)", mx, my); 

putfonts8_asc(buf_back, binfo->scrnx, ©, @, 
COL8_FFFFFF, s); 

sprintf(s, "memory %dMB free : %dKB", 

memtotal / (1024 * 1024), 

memman_total(memman) / 1024); 

putfonts8 asc(buf_back, binfo->scrnx, ©, 32, 


COL8_FFFFFF, s); 
sheet_refresh(shtctl, sht_back, ©, ©, binfo->scrnx, 
48); /* 这 里 ! */ 


for (33) { 
io_cli(); 
if (fifo8_status(&keyfifo) + 
fifo8 status(&mousefifo) == @) { 
io_stihlt(); 
} else { 
if (fifo8 status(&keyfifo) != ©) { 
CREK) 
sheet_refresh(shtctl, sht_back, ©, 16, 
16, 32); /* 这 里 ! */ 
} else if (fifo8_status(&mousefifo) != @) { 
i = fifo8_get(&mousefifo); 
io_sti(); 
if (mouse decode(&mdec, i) != @) { 
(中 上 略 ) 
boxfil18(buf_back, binfo->scrnx, 
COL8 008484, 32, 16, 32 + 15 * 8 - 1, 31); 
putfonts8_asc(buf_back, binfo- 
>scrnx, 32, 16, COL8 FFFFFF, s); 
sheet_refresh(shtctl, sht_back, 32, 
16, 32 + 15 * 8, 32); /* 这 里 ! */ 
(中 上 略 ) 
sprintf(s, "(%3d, %3d)", mx, my); 
boxfill8(buf back, binfo->scrnx, 
COL8_008484, ©, ©, 79, 15); /* 消去 坐标 */ 
putfonts8_asc(buf_back, binfo- 
>scrnx, ©, @, COL8_FFFFFF, s); /* 写 出 坐标 */ 
sheet_refresh(shtctl, sht back, @, 
ð, 80, 16); /* 这 里 ! */ 
sheet_slide(shtctl, sht_mouse, mx, 
my); 


这 里 我 们 仅仅 改写 了 sheet_refresh， 变 更 点 共有 4 


个 。 只 有 每 次 要 往 buf back 中 写 入 信息 时 ， 才 进行 
ee 


这 样 应 该 可 以 顺利 运行 了 。 我 们 赶 案 试 一 


试 。“make run”. IR, SE So ARE 
J, FOE! 不 过 还 是 欠缺 一 些 东西 .……. 


4 fee SAFE (2) 
(harib07d) 

虽然 我 们 想 了 如 此 多 的 办 法 ， 但 结果 还 是 没有 达到 
我 们 的 期 望 ， 真 让 人 郁 问 。 到 底 是 怎么 回 事 呢 ? 原 


来 还 是 refreshsub 有 些 问 题 。 


不 是 太 快 的 refreshsub 


void sheet_refreshsub(struct SHTCTL *ctl, int vx@, int 
vyð, int vx1, int vy1) 
{ 


int h, bx, by, vx, vy; 
unsigned char *buf, c, *vram = ctl->vram; 
struct SHEET *sht; 
for (h = ð; h <= ctl->top; h++) { 
sht = ctl->sheets[h]; 
buf sht->buf; 
for (by = ð; by < sht->bysize; by++) { 
vy = sht->vy@ + by; 
for (bx = ð; bx < sht->bxsize; bx++) { 
vx = sht->vx®@ + bx; 
if (vx® <= vx && vx < vx1 && vy@ <= vy 


&& vy < vyl) { 
c = buf[by * sht->bxsize + bx]; 
if (c != sht->col_inv) { 
vram[ vy * ctl->xsize + vx] = C; 


} 


} 


return; 


} 


依照 这 个 程序 ， 即 使 不 写 入 像素 内 容 ， 也 要 多 次 执 
行 f 语 句 ， 这 一 扣 不 太 好 ， 如 果 能 改善 一 下 ， 速 度 
应 该 会 提高 不 少 。 


按照 上 面 这 种 写法 ， 即 便 只 刷新 图 层 的 一 部 分 ， 也 
要 对 所 有 疼 层 的 全 部 像素 执行 让 语句 ， 判 断 “ 是 与 入 
了 呢 ， 还 是 不 写 呢 ?。 而 对 于 刷新 范围 以 外 的 部 分 ， 
就 算 执行 让 判断 语句 ， 最 后 也 不 会 进行 刷新 ， 所 以 
这 纯粹 束 是 一 种 浪费 。 既 然 如 此 ， 我 们 最 初 束 应 该 
把 for 语 句 的 范围 限定 在 刷新 范围 之 内 。 


底板 整体 


刷新 的 范围 〈 能 再 描绘 的 范围 ) 


基于 以 上 思路 ， 我 们 做 好 了 改 民 版 本 。 


本 次 的 *sheet.c 节 选 


void sheet_refreshsub(struct SHTCTL *ctl, int vx@, int 

vy@, int vx1, int vy1) 

{ 
int h, bx, by, vx, vy, bx@, by@, bx1, by1; 
unsigned char *buf, c, *vram = ctl->vram; 
struct SHEET *sht; 
for (h = ð; h <= ctl->top; h++) { 

sht = ctl->sheets[h]; 
buf = sht->buf; 
/* 使 用 vxe 一 vy1， 对 bxe@ 一 by1 进 行 倒 推 / 
bx@ vx@ - sht->vx0; 
by6 = vy@ - sht->vy@; 
bx1 vx1 - sht->vx@; 
by1 = vy1 - sht->vy@; 
if (bxð < @) { bxe = @; } /* 说 明 (1) */ 
if (byð < @) { by@ = ð; } 
if (bx1 > sht->bxsize) { bx1 = sht->bxsize; } 
/* 说 明 (2) */ 
if (by1 > sht->bysize) { by1 = s 
for (by = by@; by < by1; by++) { 
vy = sht->vy@ + by; 
for (bx = bx@; bx < bx1; bx++) { 
vx = sht->vx® + bx; 
c = buf[by * sht->bxsize + bx]; 
if (c != sht->col_inv) { 
vram[vy * ctl->xsize + vx] = C; 


ht->bysize; } 


} 


i; 
} 


return; 


改良 的 关键 在 于 ，bx 在 for 语 句 中 并 不 是 在 0 到 bxsize 
之 加 循环 ， 而 是 在 bx0 到 bx1 之 间 循 坏 (对 于 by 也 一 
KE) 。 而 bx0 和 bx1 都 是 从 刷新 范围 “ 倒 推 ? 求 得 的 。 
倒 推 其 实 束 是 把 公式 变形 转换 了 一 下 ， 有 具体 如 下 : 


vx = sht->vx@ + bx; > bx = vx - sht- 
>VXO ; 


计算 wx0 的 坐标 相当 于 bx 中 的 哪个 位 置 ， 然 后 把 它 
作为 bx0。 其 他 的 坐标 处 理 方法 也 一 样 。 


这 样 算 完 以 后 ， 束 该 执行 以 上 程序 中 说 明 (1) 的 地 方 
了 。 这 行 代码 用 于 处 理 刷 新 范围 在 图 层 外 侧 的 情 
况 。 什 么 时 候 会 出 现 这 种 情况 呢 ? 比如 在 sht_back 
中 写 入 字符 并 进行 刷新 ， 而 且 刷 新 范围 的 一 部 分 被 
鼠标 履 盖 的 情况 。 


鼠标 已 经 重合 了 。 
ERB BAZ J 


新 范围 与 鼠标 的 图 层 像 这 样 重 


假设 在 这 种 情况 下 h=1， 且 想 要 重复 刷新 鼠标 的 图 
层 ， 那 么 就 变 成 了 下 面 这 样 。 


(18, 10)=(bx1, byl) 


Xf sheets[1 #47 bx0 ~ bx1t+ H MHK 

在 这 里 必须 要 进行 重复 描绘 的 只 有 与 鼠标 图 层 重 登 
的 那 一 小 块 范 围 ， 而 其 他 部 分 并 没有 被 要 求 刷 新 ， 
所 以 不 能 刷新 。 这 样 的 话 ， 可 以 把 bx0 和 by0 置 0。 


程序 ihe 明 (2)2” 部 分 所 做 的 ， 是 为 了 应 对 不 同 的 重 
登 方 式 。 


REBATE 


需要 执行 “说 明 (2)” 部 分 的 情形 


在 这 种 情况 下 ，bx0 和 by0 虽 然 可 以 从 vx0 和 vy0 顺 利 
求 取 ， 但 bx1 和 byl 就 变 得 太 大 了 “超出 了 图 层 的 苑 
Fel) ， 因 此 要 修改 这 里 。 


第 三 种 情况 是 完全 不 重 登 的 情况 。 例 如 ， 鼠 标的 图 
层 往 左 移动 直至 不 再 重 登 。 此 时 当然 完全 不 需要 进 
行 重复 描绘 ， 那 么 程序 是 否 可 以 正和 营运 行 呢 ? 


利用 倒 推 计算 得 出 的 bx0 和 bx1 都 是 负 值 ， 在 说 明 (1) 
中 ， 仅 仅 bx0 被 修正 为 0， 而 在 说 明 (2) 中 bx1 没 有 被 
修正 ， 还 是 负 的 。 这 样 的 话 ，for (bx = bx0;bx < 
bx1;bx++) 这 个 语句 里 的 循环 条 件 bx < bx1 从 最 开 
吏 不 成 立 ， 所 以 for 语 句 中 的 命令 得 不 到 循环 ， 这 样 
LIC A SIT BSA S, RE. 


仪 仪 改 了 这 些 地 方 ， 束 可 以 提高 速度 吗 ? 我 们 来 试 
一 下 。“make run”( 要 等 待 一 会 儿 ) W? 哦 ， 这 次 
感觉 很 好 ， 操 作 系 统 正 在 迅速 地 运行 ， 太 开心 了 ! 
虽然 从 表面 上 看 不 出 有 什么 不 同 ， 不 过 这 次 我 们 要 
MERK, ERR- E. AH J! 


太 好 了 ! 真 开 心 。 


纪念 照片 也 拍 完 了 “〈 笑 ) ， 在 这 里 我 们 看 一 下 
haribote.sysHJ A/) HE. Wk, 721110477. BRYA 
1024 的 话 ， 大 约 是 10.8， 也 就 是 10.8KB。..….. 我 们 
的 系统 正在 范 间 成 长 ! 到 这 里 可 以 暂时 告 一 段落 
了 ， 屠 好， 我 们 今天 就 到 此 结束 吧 。 明 天 见 ! 
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11 天 制作 窗口 


鼠标 显示 问题 Charib08a ) 
实现 画面 外 的 支持 (harib08b) 
shtctl 的 指定 省 略 (harib08c) 
显示 窗口 (harib08d) 

小 实验 (harib08e ) 
高 速 计数 器 (harib08f) 

消除 闪烁 (1) (harib08g) 
消除 闪烁 (2) (harib08h) 


1 了 妥 标 显示 问题 (harib08a) 


大 家 早上 好 ! 我 们 直接 进入 主题 ， 移 来 看 看 下 面 这 
SKK A 


Ller 1 0] 
memory 32MB tree : 29228KB 


al EE 
把 鼠标 移 到 右 侧 时 的 情形 
在 harib07d 中 鼠标 移动 到 右 侧 后 束 不 能 再 往 右 移 
了 ， 大 家 有 没有 和 觉得 别扭 ? 没 错 ， 在 Windows 中 ， 
鼠标 应 该 可 以 同 右 或 同 下 移动 到 画面 之 外 隐藏 起 来 


的 ， 可 是 我 们 的 操作 系统 却 还 不 能 实现 这 样 的 功 


这 是 为 什么 呢 ? 我 们 还 是 先 来 看 一 看 HariMain 吧 。 


if (mx > binfo->scrnx - 16) { 
mx = binfo->scrnx - 16; 


if (my > binfo->scrny - 16) { 
my = binfo->scrny - 16; 


PR 


CATO Pal, W AA ETAL BTV 
那么 我 们 来 修改 一 下 ， 很 简单 。 


binfo->scrnx 
= binfo->scrnx 


binfo->scrny 
binfo->scrny 


现在 “make run” 一 下 ， 然 后 回 右 移动 鼠标 。 能 不 能 
成 功 呢 ? 


‘ 4 i 
Ller i eo) 
memory 32MB tree : 29228KBR 


E] E 


哎 ? 这 是 怎么 回 事 ? 


我 们 遇 到 了 一 个 有 麻烦 一 一 只 要 图 层 一 跑 到 画面 的 外 
HAS eS Tal el. AA ATER AEA BI RO, A 
看 怎么 解决 这 个 问题 吧 。 


2 实现 画面 外 的 文 持 Charib08b ) 


怎么 才能 让 图 层 位 于 画面 以 外 时 也 不 出 问题 呢 ? 因 
为 只 有 sheet_refreshsub 隐 数 在 做 把 图 屋内 容 写 入 
VRAM 的 工作 ， 所 以 我 们 决定 把 这 个 函数 做 得 完美 
一 些 ， 让 它 不 刷新 画面 以 外 的 部 分 。 


本 次 的 sheet.c 节 选 


void sheet_refreshsub(struct SHTCTL *ctl, int vx@, int 
vyð, int vx1, int vy1) 


int h, bx, by, vx, vy, bx@, by@, bx1, by1; 
unsigned char *buf, c, *vram = ctl->vram; 
struct SHEET *sht; 

/* 如 果 refresh 的 范围 超出 了 画面 则 修正 */ 

if (vx® < @) { vx® = ð; } 


if (vyð < @) { vy@ = ð; } 
if (vx1 > ctl->xsize) { vx1 = ctl->xsize; } 
if (vy1 > ctl->ysize) { vy1 = ctl->ysize; } 
for (h = ð; h <= ctl->top; h++) { 

CHH) 


} 


return; 


这 里 不 需要 特别 解释 了 吧 ， 我 们 来 “make run”. 


i wel 
2MB free : 


成 功 啦 ! 
运行 成 功 啦 ! 只 稍 作 修 改 束 解 决 了 问题 ， 太 厉害 
了 


fe} 


3 shtctli fae AES Charib08c ) 
我 们 先 来 看 一 看 bootpack.h。 


上 次 的 bootpack.h 节 选 


struct SHTCTL *shtctl_init(struct MEMMAN *memman, 
unsigned char *vram, int xsize, int ysize); 

struct SHEET *sheet_alloc(struct SHTCTL *ctl); 
void sheet_setbuf(struct SHEET *sht, unsigned char 
*buf, int xsize, int ysize, int col_inv); 

void sheet_updown(struct SHTCTL *ctl, struct SHEET 


*sht, int height) ; 

void sheet_refresh(struct SHTCTL *ctl, struct SHEET 
*sht, int bx@, int by@, int bx1, int by1); 

void sheet_slide(struct SHTCTL *ctl, struct SHEET *sht, 
int vx®@, int vy@); 

void sheet_free(struct SHTCTL *ctl, struct SHEET *sht); 


其 实 笔者 对 sheet_ updown 函 数 不 六 满意， 因为 仅 是 
上 下 移动 图 层 ， 束 必须 指定 ctll， 太 有 抹 烦 。 不 过 这 仪 
仅 是 个 人 喜好 问题 〈 笑 ) 


要 想 改 善 这 个 问题 ， 首 先 我 们 需要 在 struct SHEET 
中 加 入 struct SHTCTL *ctl 。 


本 次 bootpack.h 节 选 


struct SHEET { 


unsigned char *buf; 


int bxsize, bysize, vx®, vy@, col_inv, height, 
flags; 


struct SHTCTL *ctl; 


ie 


SK a XI A Ashtctl_initthigt {FIG AW, Mae HN BY 
可 。 


本 次 的 sheet.c 节 选 


struct SHTCTL *shtctl_init(struct MEMMAN *memman, 
unsigned char *vram, int xsize, int ysize) 
{ 

struct SHTCTL *ctl; 

int i; 

ctl = (struct SHTCTL *) memman_alloc_4k(memman, 
sizeof (struct SHTCTL)); 

if (ctl == 0) { 

goto err; 
} 


ctl->vram = vram; 


ctl->xsize = xsize; 

ctl->ysize = ysize; 

ctl->top = -1; /* 没有 一 张 SHEET */ 

for (i = @; i < MAX_SHEETS; i++) { 
ctl->sheets@[i].flags = 0; /* 未 使 用 标记 */ 
ctl->sheets@[i].ctl = ctl; /* 记录 所 属 */ /* 这 


return ctl; 


还 有 ， 函 数 sheet_updown 也 要 修改 。 


本 次 的 sheet.c 节 选 


void sheet_updown(struct SHEET *sht, int height) 
{ 


struct SHTCTL *ctl = sht->ctl; 
int h, old = sht->height; /* 将 设置 前 的 高 度 记录 下 来 


a 
} 


CHH) 


WE, R I o XFE— R Esheet_updown K žr E wit 
AAA Ect o RAE H T 


最 后 ， 我 们 将 sheet refresh、sheet_slide、sheet free 
这 几 个 函数 全 部 修改 一 下 ， 让 它们 都 不 用 指定 ctl。 


本 次 的 sheet.c 节 选 


void sheet_refresh(struct SHEET *sht, int bx@, int by6， 


int bx1, int by1) 


{ 
if (sht->height >= 0) { /* 如 果 正 在 显示 ， 则 按 新 图 层 的 
信息 进行 刷新 */ 
sheet_refreshsub(sht->ctl, sht->vx@ + bx®@, sht- 
>vy@ + byð, sht->vx®@ + bx1, sht->vy@ + by1); 
} 


return; 


void sheet_slide(struct SHEET *sht, int vxð, int vy@) 
{ 
int old_vx@ = sht->vx@, old_vy@ = sht->vy@; 
sht->vx® = vx; 
sht->vy@ = vy@; 
if (sht->height >= 0) { /* 如 果 正 在 显示 ， 则 按 新 图 层 的 
言 奶 进行 刷新 */ 
sheet_refreshsub(sht->ctl, old_vx@, old_vy@, 
old vx + sht->bxsize, old_vy@ + sht->bysize); 
sheet_refreshsub(sht->ctl, vx@, vy@, vx@ + sht- 
>bxsize, vy@ + sht->bysize); 
} 


return; 


} 


void sheet_free(struct SHEET *sht) 


{ 
if (sht->height >= 0) { 


sheet_updown(sht, -1); /* 如 果 正 在 显示 ， 则 先 设置 
为 隐藏 */ 
} 
sht->flags = 0; /* 未 使 用 标记 */ 
return; 


改 好 了 。 这 样 ， 所 有 的 函数 都 更 好 用 了 。 


由 于 我 们 进行 了 以 上 这 些 变 更 ， 所 以 要 在 
bootpack.c 鸭 HariMain 中 ， 把 相应 的 shtctl 也 删 挥 。 
一 共 要 修改 9 个 地 方 。 


sheet_slide(shtctl, sht_back, ©, ©); 
sheet slide(sht back, ©, 0); 
sheet_slide(shtctl, sht_mouse, mx, my); 
sheet_slide(sht_mouse, mx, my); 
sheet_updown(shtctl, sht back, @); 
sheet_updown(sht_back, @); 
sheet_updown(shtctl, sht_mouse, 1); 
sheet_updown(sht_mouse, 1); 
sheet_refresh(shtctl, sht_back, ©, ©, binfo->scrnx, 
48); 

> sheet_refresh(sht_back, ©, ©, binfo->scrnx, 
48); 
sheet_refresh(shtctl, sht_back, ©, 16, 16, 32); 

> sheet refresh(sht back, ©, 16, 16, 32); 
sheet_refresh(shtctl, sht_back, 32, 16, 32 + 15 * 8, 
32); 

> sheet_refresh(sht_back, 32, 16, 32 + 15 * 8, 
32); 
sheet_refresh(shtctl, sht_back, ©, ©, 80, 16); 

> sheet_refresh(sht_back, ©, ©, 80, 16); 
sheet_slide(shtctl, sht_mouse, mx, my); > 
sheet_slide(sht_mouse, mx, my); 


这 样 HariMain 也 稍稍 变 短 了 ， 太 好 了 。 
我 们 来 “make run” 一 下 看 看 ， 不 错 不 错 ， 运 行 正 


fe) 


ai 


4 显示 窗口 (harib08d ) 


我 们 现在 做 出 来 的 图 层 构架 ， 已 经 完全 可 以 完成 窗 
口 的 对 加 处 理 了 ， 所 以 下 面 我 们 束 来 尝试 一 下 制作 
窗口 吧 。 


其 实 方法 很 简单 ， 束 像 前 面 制作 背景 和 鼠标 那样 ， 
只 要 先 准 备 一 张 图 层 ， 人 然后 在 图 层 缓冲 区 内 描绘 一 
个 貌似 窗口 的 图 就 可 以 了 。 那 么 我 们 就 来 制作 一 个 
具有 这 种 功能 的 函数 make_window8 吧 ，。 


本 次 的 bootpack.c 节 选 


void make_window8 (unsigned char *buf, int xsize, int 
ysize, char *title) 


{ 


static char closebtn[14][16] = { 
"0000000000000000" , 
"0QQQ2Q20000200F@" , 
“0QQQQQQQQQQQQQ9$O , 
"OQQQ@@QQQQ@@QQF@" , 
"OQQQQ@A@QQA@@QQQF@" , 
"0QQQQQ@@@AQQQQF@" , 
"0QQQQQQ@AQQQQQF@" , 
"0QQQQQ@@@AQQQQF@" , 
"OQQQQ@A@QQA@@QQQF@" , 
"OQQQ@@QQQQ@@QQF@"  ， 
“0QQQQQQQQQQQQQ9O , 
“0QQQQQQQQQQQQQ9O , 
"O$$$$$$$$$$$$$$0", 


“0000000000000000 


}; 

int x, y; 

char C; 

boxfill8(buf, xsize, COL8 C6C6C6, ©, 
xsize - 1, 0 ); 

boxfill8(buf, xsize, COL8 FFFFFF, 1, 
xsize - 2, 1 ); 

boxfill8(buf, xsize, COL8 C6C6C6, ©, 
Q, ysize - 1); 

boxfill8(buf, xsize, COL8_FFFFFF, 1, 
1, ysize - 2); 


boxfill8(buf, xsize, COL8 848484, xsize - 2, 
xsize - 2, ysize - 2); 
boxfill8(buf, xsize, COL8 900000, xsize - 1, 
xsize - 1, ysize - 1); 
boxfill8(buf, xsize, COL8 C6C6C6, 2, 
xsize - 3, ysize - 3); 
boxfill8(buf, xsize, COL8 900084, 3, 
xsize - 4, 20 ); 
boxfill8(buf, xsize, COL8 848484, 1, 
- 2, xsize - 2, ysize - 2); 
boxfill8(buf, xsize, COL8 9090000, ®©, 
- 1, xsize - 1, ysize - 1); 
putfonts8 asc(buf, xsize, 24, 4, COL8 FFFFFF, 
title); 
for (y = 0; y < 14; y++) { 
for (x = ð; x < 16; x++) { 
c = closebtn[y][x]; 
if (c == '@') { 
c = COL8 000000; 
} else if (c == '$') { 
c = COL8 848484; 
} else if (c == 'Q') { 
c = COL8 C6C6C6; 
} else { 


c = COL8_FFFFFF; 


buf[(5 + y) * xsize + (xsize - 21 + x)] = 
C; 


} 


} 


return; 


正如 大 家 所 看 到 的 那样 ， 其 实 我 们 只 是 对 graph.c 的 
init _screen8 函 数 稍微 进行 了 改造 ， 而 x 按 钮 的 功能 
则 是 通过 修改 init mouse_cursor8 而 得 到 的 。 


我 们 在 HariMain 里 也 添加 了 一 些 内 容 。 因 为 功能 很 
简单 ， 所 以 添加 的 内 容 个 多 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 

struct SHEET *sht_back, *sht_mouse, *sht_win; /* 这 
BE 

unsigned char *buf_back, buf_mouse[256], *buf_win; 


[Pe ty 
CHATS ) 


init_palette(); 

shtctl = shtctl_init(memman, binfo->vram, binfo- 
>scrnx, binfo->scrny) ; 

sht_back = sheet_alloc(shtct1l); 
sht_mouse = sheet_alloc(shtct1l); 


sht_win = sheet_alloc(shtctl); /* 这 里 ! */ 

buf_back = (unsigned char *) 
memman_alloc_4k(memman, binfo->scrnx * binfo->scrny); 

buf_win = (unsigned char *) 
memman_alloc_4k(memman, 160 * 68); /* 这 里 ! */ 

sheet_setbuf(sht_back, buf_back, binfo->scrnx, 
binfo->scrny, -1); /* 没有 透明 色 */ 

sheet_setbuf(sht_mouse, buf_mouse, 16, 16, 99); 

sheet_setbuf(sht_win, buf_win, 160, 68, -1); /* KA 
eH */ /* RH! */ 

init_screen8(buf_back, binfo->scrnx, binfo->scrny); 

init_mouse_cursor8(buf_mouse, 99); 

make_window8(buf_win, 160, 68, "window"); /* 这 里 ! 
f 

putfonts8 asc(buf_win, 160, 24, 28, COL8_000000, 
"Welcome to"); /* 这 里 ! */ 

putfonts8 asc(buf_win, 160, 24, 44, COL8_000000, " 
Haribote-OS!"); /* 这 里 ! */ 

sheet_slide(sht_back, ©, @); 

mx = (binfo->scrnx - 16) / 2; /* 为 使 其 处 于 画面 的 中 央 
位 置 ， 计 算 坐 标 */ 

my = (binfo->scrny - 28 - 16) / 2; 

sheet_slide(sht_mouse, mx, my); 

sheet_slide(sht_win, 80, 72); /* 这 里 ! */ 

sheet_updown(sht_back, @); 

sheet_updown(sht_win, 1); /* 这 里 ! */ 

sheet_updown(sht_mouse, 2); 

sprintf(s, "(%3d, %3d)", mx, my); 

putfonts8_asc(buf_back, binfo->scrnx, ©, @, 
COL8_FFFFFF, s); 

sprintf(s, "memory %dMB free : %dKB", 

memtotal / (1024 * 1024), 

memman_total(memman) / 1024); 

putfonts8 asc(buf_back, binfo->scrnx, ©, 32, 
COL8_FFFFFF, s); 

sheet_refresh(sht_back, @, @, binfo->scrnx, 48); 


中略 ) 
} 


窗口 里 还 号 了 点 东西 ， 大 家 一 起 来 读 一 下 程序 ， 看 
看 写 了 些 什么 吧 。 


下 面 我 们 来 “make run”， 到 底 能 不 能 成 功 呢 ? 


(270, 143) 


Mer aa o 
memory 32MB free : 29216KB 


window 


Welcome to 
Hari bote-0§! 


— eee 
哦 ! 太 帅 了 了 ! 
感觉 真有 点 操作 系统 的 样子 了 ， 非 常 满意 ! 


5 小 实验 Charib08e) * 


这 一 节 我 们 来 做 一 个 小 实验 。HariMain 中 有 设置 图 
层 蜗 度 的 地 方 ， 如 果 像 下 面 这 样 ， 把 窗口 图 层 放 在 
最 上 和 面 ， 光 标 图 层 放 在 其 次 ,会 变 成 什么 样 呢 ? 
sheet_updown(sht_back, 90); 


sheet updown(sht mouse, 1); 
sheet updown(sht win, 2); 


我 们 还 是 来 “make run” 试 试看 吧 。 


S 3 6 
[ler -1 0] 
memory 32MB free : 29216KB 


Wi ndow 


elcome to 
Hari bote-0§! 


a | 


原来 会 变 成 这 样 蚜 。 如 果 从 图 层 的 架构 来 考虑 的 话 
当然 会 这 样 了 ， 看 来 sheet.c 运 行 下 第。 


6 高速 计 数 器 (harib08f ) 


实验 顺利 结束 了 ， 我 们 还 把 图 层 的 高 度 设置 恢复 原 
样 ， 然 后 再 试 着 做 个 动作 更 丰富 的 窗口 。 做 成 什么 
样 呢 ?我 们 就 做 一 个 能 够 计数 ， 并 将 计数 结果 显示 
出 来 的 窗口 吧 。 计 数 嚣 在 瑞 语 中 是 counter， 所 以 我 
们 束 将 窗口 的 名 称 改 为 counter。 


我 们 只 改写 了 10 行 残 得 到 了 下 面 这 个 程序 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


{ 


struct BOOTINFO *binfo = (struct BOOTINFO *) 


ADR_BOOTINFO; 


char s[40], keybuf[32], mousebuf[128] ; 

int mx, my, ij; 

unsigned int memtotal, count = @; /* 这 里 ! */ 
struct MOUSE DEC mdec; 

struct MEMMAN *memman = (struct MEMMAN *) 


MEMMAN_ADDR; 


struct SHTCTL *shtctl; 
struct SHEET *sht_back, *sht_mouse, *sht_win; 
unsigned char *buf_back, buf_mouse[256], *buf_win; 


中略) 


init_palette(); 
shtctl = shtctl_init(memman, binfo->vram, binfo- 


>scrnx, binfo->scrny) ; 

sht_back = sheet_alloc(shtctl); 

sht_mouse = sheet_alloc(shtct1l); 

sht win = sheet_alloc(shtctl); 

buf_back = (unsigned char *) 
memman_alloc_4k(memman, binfo->scrnx * binfo->scrny); 

buf_win = (unsigned char *) 
memman_alloc_4k(memman, 160 * 52); /* 这 里 ! */ 

sheet_setbuf(sht_back, buf_back, binfo->scrnx, 
binfo->scrny, -1); /* 没有 透明 色 */ 

sheet_setbuf(sht_mouse, buf_mouse, 16, 16, 99); 

sheet_setbuf(sht_win, buf_win, 160, 52, -1); /* 没有 
A */ /* XI */ 

init_screen8(buf_back, binfo->scrnx, binfo->scrny); 

init_mouse_cursor8(buf_mouse, 99); 

make _window8(buf_win, 160, 52, "counter"); /* 这 里 ! 
*/ 

sheet_slide(sht_back, ©, @); 

mx = (binfo->scrnx - 16) / 2; /* 为 使 其 处 于 画面 中 央 位 
置 ， 计 算 坐 标 */ 

my = (binfo->scrny - 28 - 16) / 2; 

sheet_slide(sht_mouse, mx, my); 

sheet_slide(sht_win, 80, 72); 

sheet_updown(sht_back, @); 

sheet_updown(sht_win, 1); 

sheet_updown(sht_mouse, 2); 

sprintf(s, "(%3d, %3d)", mx, my); 

putfonts8_asc(buf_back, binfo->scrnx, ©, @, 
COL8_FFFFFF, s); 

sprintf(s, “memory %dMB free : %dKB", 

memtotal / (1024 * 1024), 

memman_total(memman) / 1024); 

putfonts8 asc(buf_back, binfo->scrnx, ©, 32, 
COL8_FFFFFF, s); 

sheet_refresh(sht_back, ©, ©, binfo->scrnx, 48); 


for (33) { 
count++; /* 从 这 里 开始 */ 
sprintf(s, "%@10d", count); 
boxfill8(buf_win, 160, COL8 C6C6C6, 40, 28, 
119, 43); 
putfonts8 asc(buf_win, 160, 40, 28, 
COL8 900000, s); 


sheet_refresh(sht_win, 40, 28, 120, 44); /* 到 这 
里 结束 */ 


io_cli(); 
if (fifo8_status(&keyfifo) + 
fifo8 status(&mousefifo) == @) { 
io_sti(); /* 不 做 HLT */ 
} else { 
CREK) 


这 次 不 再 采用 HLT， 因 为 与 其 让 CPU 有 和 衬 睡 党 
(HLT 命 令 ) ， 还 不 如 让 它 在 电力 许可 的 范围 内 去 
全 力 计 数 。 正 因为 这 个 原因 ， 我 们 的 计数 姻 才 被 称 
AA fet LEAT BLAS o 


安 腿 惯例 ， 我 们 来 “make run”. 


( 43, 69 
[ler -1 0] 
memory 32MB free : 29216KB 


cour 


0 


计数 啦 ! 


运行 成 功 ， 动 作 正 第 ， 真 顺利 呀 ! 可 是 再 仔细 一 
A, SZ ROOTS NA EA PRE CEE: 在 上 面 
截图 中 看 不 出 来 〉》? 这 可 不 行 。 


为 什么 会 出 现 这 种 现象 呢 ? 这 是 由 于 在 刷新 的 时 
候 ， 总 是 先 刷 新 refresh 范 围 内 的 背景 图 层 ， 然 后 再 
刷新 窗口 图 层 ， 所 以 肯定 就 会 内 烁 了 。 可 是 我 们 使 
用 Windows 的 时 候 束 没 见 过 这 种 闪烁， 因此 肯 宪 有 
什么 好 的 解决 方法 。 


于 是 解决 这 个 问题 就 成 了 我 们 下 节 内 容 的 主题 。 


7 消除 闪烁 (1) Charib08g) 


窗口 图 层 刷新 是 因为 窗口 的 内 容 有 变化 ， 所 以 要 在 
画面 上 显示 变化 后 的 新 内 容 。 基 本 上 来 讲 ， 可 以 认 
为 其 他 图 层 的 内 容 没有 变化 《如 末 其 他 图 层 的 内 容 
也 变 了 ， 那 么 应 该 会 随后 执行 该 图 层 的 刷新 ) 。 


既然 如 此 ， 图 层 内 容 没 有 变化 也 进行 刷新 的 话 束 太 
IRS So WIR Awe BAR YL, BERMA AA Mill 
Jo Fab, (aN ETA RE EREEREER 
化 ， 那 我 们 应 该 刷新 吗 ? 必须 要 刷新 。 窗 口 的 刷 
新 ， 可 能 会 禾 六 鼠标 的 一 部 分 显示 区 域 。 


综 上 所 述 ， 仪 对 refresh 对 象 及 其 以 上 的 图 层 进 行 刷 
新 束 可 以 了 。 那 么 我 们 赶紧 按照 这 个 思路 修改 程序 
ae 


AE ELA Fk TEAT LE HY sheet_refreshsub K 
BN 


本 次 的 sheet.c 节 选 


void sheet_refreshsub(struct SHTCTL *ctl, int vx@, int 
vyð, int vx1, int vy1, int hð) 


CHI) 
for (h = hð; h <= ctl->top; h++) { 
CHI) 


} 


return; 


我 们 追加 了 ho 参数 ， 只 对 在 此 参数 以 上 的 图 层 进 行 
刷新 。 然 后 还 要 把 所 有 调用 了 sheet_refreshsub 的 函 
数 都 修改 一 下 。 


本 次 的 sheet.c 节 选 


void sheet_refresh(struct SHEET *sht, int bx@, int by@, 


int bx1, int by1) 


{ 
if (sht->height >= 0) { /* 如 有 果 正 在 显示 ， 则 按 新 图 层 的 
信息 进行 刷新 */ 
sheet_refreshsub(sht->ctl, sht->vx@ + bx@, sht- 
>vy@ + byð, sht->vx@ + bx1, sht->vy@ + by1， 
sht->height) ; 
po Piel. Tey, 


} 


return; 


} 


void sheet_slide(struct SHEET *sht, int vx®, int vy@) 
{ 
int old_vx@ = sht->vx@, old_vy@ = sht->vy@; 
sht->vx® = vx@; 
sht->vy@ = vy@; 
if (sht->height >= 6) { /* 如 果 正 在 显示 ， 则 按 新 图 层 的 


音 奶 进行 刷新 */ 
sheet_refreshsub(sht->ctl, old_vx@, old _vy@, 
old_vx®@ + sht->bxsize, old_vy@ + sht->bysize, 0); 
sheet_refreshsub(sht->ctl, vx@, vy@, vx@ + sht- 
>bxsize, vy@ + sht->bysize, sht->height) ; 
/* OCS saw | 
} 


return; 


} 
void sheet_updown(struct SHEET *sht, int height) 
CHH) 
/* 以 下 主要 是 对 sheets[] 的 重新 排列 */ 


if (old > height) { /* 比 以 前 低 */ 
if (height >= 0) { 
/* 中 间 的 提起 */ 
for (h = old; h > height; h--) { 
ctl->sheets[h] = ctl->sheets[h - 1]; 
ctl->sheets[h]->height = h; 
} 
ctl->sheets[height] = sht; 
/* 这 里 */ ~~ sheet_refreshsub(ctl, sht->vx@, sht->vy@, 
sht->vx@ + sht->bxsize, sht->vy@ + sht->bysize, height 
#1); 
} else { /* 隐藏 */ 
if (ctl->top > old) { 
/* 把 上 面 的 降下 来 */ 
for (h = old; h < ctl->top; h++) { 
ctl->sheets[h] = ctl->sheets[h + 
1]; 
ctl->sheets[h]->height = h; 


ctl->top--; /* 正在 显示 的 图 层 减少 了 一 个 ， 故 最 
上 面 的 高 度 也 减少 */ 
/* 这 里 */ sheet refreshsub(ctl, sht->vx®, sht->vyð, 
sht->vx@ + sht->bxsize, sht->vy@ + sht->bysize, ®©); 


} 
} else if (old < height) { /* 比 以 前 高 */ 
if (old >= @) { 
/* PAKER TA * 
for (h = old; h < height; h++) { 
ctl->sheets[h] = ctl->sheets[h + 1]; 
ctl->sheets[h]->height = h; 
} 
ctl->sheets[height] = sht; 
} else { /* 从 隐藏 状态 变 为 显示 状态 */ 
/* 把 在 上 面 的 图 层 往 上 提高 一 层 */ 
for (h = ctl->top; h >= height; h--) { 
ctl->sheets[h + 1] = ctl->sheets[h]; 
ctl->sheets[h + 1]->height = h + 1; 


ctl->sheets[height] = sht; 
ctl->top++; /* 显示 中 的 图 层 增加 了 一 个 ， 故 最 上 
面 的 高 度 也 增加 */ 
} 


sheet_refreshsub(ctl, sht->vx@, sht->vy@, sht- 
>vx@ + sht->bxsize, sht->vy@ + sht->bysize, height); 
/* 个 这 里 */ 


} 


return; 


修改 的 内 容 很 少 ， 我 们 逐一 来 看 一 下 。 a; 
sheet_refreshý 20, RIZENS EKE E K i 
新 指定 的 图 层 和 它 上 面 的 图 层 。 


在 sheet_slide 函 数 里 ， 图 层 的 移动 有 时 会 导致 下 面 
的 图 层 露 出 ， 所 以 要 从 最 下 面 开 始 刷 新 。 男 一 方 

面 ， 在 移动 目标 处 ， 比 新 移 来 的 图 层 位 置 还 要 低 的 
图 层 没 有 什么 变化 ， 而 且 只 是 隐藏 起 来 了 ， 所 以 只 
要 刷新 移动 的 图 层 和 和 它 上 面 的 图 层 束 可 以 了 。 


在 sheet_updown 函 数 里 ， 按 照 同 样 的 思路 ， 针 对 个 

别 不 需要 目下 而 上 全 部 刷新 的 部 分 只 进行 局 部 刷 

新 。 这 样 修 改 以 后 ， 内 烁 现象 应 该 瓯 会 消失 了 。 
TELT 


完成 了 ， 我 们 来 “make run” 看 看 。 


TER 
Ller 4 0] 
memory 32MB free : 29216KB 


counter 
0000001632 


== La 
闪烁 现象 消 失 了 


不 错 ， 性 能 越 来 越 完善 了 。 哎 ? 等 等 ， 怎 么 稍微 一 
动 ， 鼠 标 就 又 出 问题 了 ! 


count 


Ler 
0000024 e 


BBs 38 — DJ — TA FY 


数字 部 分 的 背景 内 烁 问题 是 解决 了 ， 可 是 把 鼠标 放 
在 上 面 时 ， 鼠 标 又 闪烁 起 来 了 《不 过 ， 从 截图 看 不 
出 来 ) 。 喝 ， 这 可 是个 问题 。 


8 消除 闪烁 (2) Charib08h) 


怎么 样 才能 让 鼠标 不 再 闪烁 昵 ? 闪烁 现象 是 由 于 一 
会 儿 描 绘 一 会 儿 消 除 造成 的 。 所 以 说 要 想 消 除 闪 
烁 ， 就 要 在 刷新 窗口 时 避 开 局 标 所 在 的 地 方 对 
VRAM 进 行 写 入 处 理 。 这 好 像 挺 难 的 ， 但 不 管 怎 样 
我 们 还 是 要 努力 一 下 。 

而 且 如 果 这 里 做 好 了 ， 刷 新 窗口 时 束 不 需要 重 绘 中 
标 了 ， 这 样 速度 也 能 相应 提高 。 一 想到 这 里 ， 职 充 
满 了 克服 困难 的 勇气 和 动力 ! 


这 样 也 不 行 ， 那 样 也 不 行 ， 左 思 右 想 之 后 我 们 决定 
采用 下 面 这 种 方法 。 首 先 ， 开 辟 一 块 内 存 ， 大 小 和 
VRAM 一 样 ， 我 们 先 称 之 为 map〈 地 图 ) 吧 。 至 于 
为 什么 要 叫做 地 图 ， 我 们 马上 残 来 讲解 。 


本 次 的 bootpack.h 和 sheet.c 程 序 的 节选 


struct SHTCTL { 
unsigned char *vram, *map; /* 这 里 ! */ 
int xsize, ysize, top; 
struct SHEET *sheets[MAX_SHEETS]; 
struct SHEET sheets@[MAX_SHEETS]; 


}; 


struct SHTCTL *shtctl_init(struct MEMMAN *memman, 
unsigned char *vram, int xsize, int ysize) 
{ 

struct SHTCTL *ctl; 

int i; 

ctl = (struct SHTCTL *) memman_alloc_4k(memman, 
sizeof (struct SHTCTL)); 

if (ctl == 0) { 

goto err; 


} 
/* 从 这 里 开始 */ 
ctl->map = (unsigned char *) 
memman_alloc_4k(memman, xsize * ysize); 
if (ctl->map == @) { 
memman_free_4k(memman, (int) ctl, sizeof 
(struct SHTCTL)); 
goto err; 


} 

/* 到 这 里 结束 */ 

ctl->vram = vram; 

ctl->xsize = xsize; 

ctl->ysize = ysize; 

ctl->top = -1; /* 没有 一 张 SHEET */ 

for (i = ð; i < MAX_SHEETS; i++) { 
ctl->sheets@[i].flags = 0; /* 未 使 用 标记 */ 
ctl->sheets@[i].ctl = ctl; /* 记录 所 属 */ 


} 


err: 
return ctl; 


这 块 内 存 用 来 表示 画面 上 的 点 是 哪个 图 层 的 像 系 ， 
所 以 它 束 相当 于 是 图 层 的 地 图 。 
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by1; 


画面 的 状态 


罗 不 必 担 心 图 层 1 和 疼 层 2 重 登 的 


X 


> 
人 


当 刷 新 图 层 1 的 时 候 ， 如 果 一 边 看 看 这 个 map 一 边 刷 


新 的 话 ， 


im S 


入 1、2 等 图 层 写 码 的 函 


写 同 map 中 写 


下 面 我 们 来 


数 。 


本 次 的 sheet.c 节 选 


p(struct SHTCTL *ctl, int VXx8，int 


vyð, int vx1, int vy1, int hð) 


void sheet_refreshma 


int h, bx, by, vx, vy, bx®, by@, bx1, 


unsigned char *buf, sid, *map = ctl->map; 


struct SHEET *sht; 


} 
} 


3 


ð: 
O: 


if (vxð < @) { vx = 


3 


if (vyð < @) { vy@ = 


if (vx1 > ctl->xsize) { vx1 = ctl->xsize; } 
if (vy1 > ctl->ysize) { vy1 = ctl->ysize; 


for (h 


hð; h <= ctl->top; h++) { 


sht = ctl->sheets[h]; 

sid = sht - ctl->sheetse; /* 将 进行 了 减法 计算 的 地 
址 作为 图 层 号 码 使 用 */ 

buf = sht->buf; 


bxð = vx@ - sht->vx0; 
by6 = vy@ - sht->vy@; 
bx1 = vx1 - sht->vx@; 
by1 = vy1 - sht->vy@; 


if (bx® < 6) { bx® = ð; } 
if (byð < @) { byð = ð; } 
if (bx1 > sht->bxsize) { bx1 = 
if (by1 > sht->bysize) { by1 = s 
for (by = by@; by < by1; by++) { 
vy = sht->vy@ + by; 
for (bx = bx@; bx < bx1; bx++) { 
vx = sht->vx@ + bx; 
if (buf[by * sht->bxsize + bx] != sht- 


sht->bxsize; } 
ht->bysize; } 


>col_inv) { 
map[vy * ctl->xsize + vx] = sid; 


return; 


这 个 函数 与 以 前 的 refreshsub 函 数 基本 一 样 ， 只 是 用 
BERB SRR Simo. RRA StS ssid 
fe “sheet 1D1 ”的 缩写 


“ID 是 英文 identification 的 缩写 ， 意 为 “用 来 表示 身 
份 的 证 件 以 及 某 一 映 份 所 对 应 的 证 件 号 人 码 或 记号 


FH zæsheet_refreshsub KA žit. RIX EITAS, 
让 它 可 以 使 用 map。 


本 次 的 sheet.c 节 选 


void sheet_refreshsub(struct SHTCTL *ctl, int vx@, int 
vy@, int vx1, int vy1, int hð, int h1) 
{ 


int h, bx, by, vx, vy, bx@, by@, bx1, by1; 
unsigned char *buf, *vram = ctl->vram, *map = ctl- 
>map, sid; 
struct SHEET *sht; 
/* 如 果 refresh 的 范围 超出 了 画面 则 修正 */ 
中略 ) 
for (h = hð; h <= h1; h+) { 
sht = ctl->sheets[h]; 
buf sht->buf; 


sid = sht - ctl->sheets®ð; 
/* N| Hvxð~vy1, Xtbxe~byl tT AlHE */ 
CHH) 
for (by = byð; by < by1; by++) { 
vy = sht->vy@ + by; 
for (bx = bx@; bx < bx1; bx++) { 
vx = sht->vx@ + bx; 
if (map[vy * ctl->xsize + vx] == sid) { 
vram[vy * ctl->xsize + vx] = buf[by 
* sht->bxsize + bx]; 


} 


} 


return; 


今后 程序 会 对 照 map 内 容 来 同 YRAM 中 写 入 ， 所 以 
有 时 没 必 要 从 下 面 开 始 一 直 刷 新 到 最 上 面 一 层 ， 因 
此 不 仅 要 能 指定 h0， 也 要 可 以 指定 hl。 


现在 我 们 来 修改 调用 了 sheet_ refreshsub 的 3 个 函数 ， 
先 从 较 短 的 2 个 入 手 吧 。 


本 次 的 sheet.c 节 选 


void sheet_refresh(struct SHEET *sht, int bx@, int by@, 


int bx1, int by1) 


{ 
if (sht->height >= 0) { /* 如 果 正 在 显示 ， 则 按 新 图 层 的 
信息 进行 刷新 */ 
sheet_refreshsub(sht->ctl, sht->vx@ + bx®@, sht- 
>vy@ + byð, sht->vx@ + bx1, sht->vy@ + by1， 
sht->height, sht->height) ; 


} 


return; 


} 


void sheet_slide(struct SHEET *sht, int vxð0, int vy@) 


{ 
struct SHTCTL *ctl = sht->ctl; 


int old_vx@ = sht->vx@, old_vy@ = sht->vy@; 
sht->vx® = vx@; 
sht->vy@ = vy@; 
if (sht->height >= 0) { /* 如 果 正 在 显示 ， 则 按 新 图 层 的 
a BET lt */ 
sheet_refreshmap(ctl, old_vx@, old_vy@, old vx0 
+ sht->bxsize, old_vy@ + sht->bysize, 0); 
sheet_refreshmap(ctl, vx®, vy@, vx@ + sht- 
>bxsize, vy + sht->bysize, sht->height) ; 
sheet_refreshsub(ctl, old_vx@, old_vy@, old vx0 
+ sht->bxsize, old_vy@ + sht->bysize, ®, 
sht->height - 1); 
sheet_refreshsub(ctl, vx@, vy@, vx@ + sht- 
>bxsize, vy@ + sht->bysize, sht->height, 
sht->height) ; 


} 


return; 


在 Sheet_refresh 函 数 里 ， 由 于 图 层 的 上 下 关系 没有 
改变 ， 所 以 不 需要 重新 进行 refreshmap 的 处 理 。 实 
际 上 ， 我 们 有 时 候 要 把 透明 的 地 方 变 成 不 透明 的 ， 
或 者 反 过 来 要 把 不 透明 的 地 方 变 成 透明 的 ， 遇 到 这 
些 情况 就 必须 重新 编号 map T , 不 过 这 里 的 
Sheet_refreshrefresh 函 数 没 有 考虑 这 些 情况 。 如 果 需 
要 实现 这 样 的 功能 ， 就 要 再 编写 其 他 的 函数 。 


另外 ， 在 sheet_ 需要 刷新 的 图 层 只 
有 一 张 ， 所 以 速度 应 该 比较 快 。 


在 Sheet_ slide 函数 里 ， 首 先 重 写 map， 分 别 对 应 移动 


前 后 的 图 层 ， 然 后 调用 sheet_refreshsub 函 数 。 在 移 
动 前 的 地 方 ， 只 针对 上 层 图 层 移 走 之 后 而 露出 的 下 
层 图 层 进行 重 绘 就 可 以 了 。 在 移动 目的 地 处 仅 重 绘 
了 一 张 移动 过 去 的 图 层 。 


x Ja 7 sheet_updown A 2 © 


本 次 的 sheet.c 节 选 


void sheet_updown(struct SHEET *sht, int height) 
{ 


CHH) 


/* 下 面 主 要 是 对 sheets[] 进 行 重新 排列 */ 
if (old > height) { /* 比 以 前 低 */ 
if (height >= 0) { 
/* 中 间 的 图 层 也 提高 一 层 */ 
CHH ) 
sheet_refreshmap(ctl, sht->vx@, sht->vy@, 
sht->vx@ + sht->bxsize, sht->vy@ + 
sht->bysize, height + 1); 
sheet_refreshsub(ctl, sht->vx@, sht->vy@, 
sht->vx@ + sht->bxsize, sht->vy@ + 
sht->bysize, height + 1, old); 
} else { /* 隐藏 */ 
CHH ) 
sheet_refreshmap(ctl, sht->vx@, sht->vyð, 
sht->vx@ + sht->bxsize, sht->vyð + sht->bysize, ®©); 
sheet_refreshsub(ctl, sht->vx@, sht->vyð, 
sht->vx@ + sht->bxsize, sht->vy@ + sht->bysize, ©, old 


sils 


} 
} else if (old < height) { /* 比 以 前 高 */ 
中略) 
sheet_refreshmap(ctl, sht->vx@, sht->vy@, sht- 
>VX6 + sht->bxsize, sht->vy@ + sht->bysize, 
height) ; 
sheet_refreshsub(ctl, sht->vx@, sht->vy@, sht- 
>vxð + sht->bxsize, sht->vy@ + sht->bysize, 
height, height); 


} 


return; 


E Wi] H sheet_refreshsub Až Hil, JET 
Sheet_refreshmap 来 重 做 map。 


通过 这 些 人 和 修改， 闪烁 现象 真能 消失 吗 ? 速度 会 变 快 


感觉 速 度 好 像 稍 稍 变 快 了 些 ， 而 且 鼠 标 不 再 内 烁 
我 们 成 功 了 ! 


or a Sle 
memory 32MB tree : 29152KB 


co t = 


000000166 


即使 这 样 ， 鼠 标 也 不 内 啦 。 


哎呀 ， 不 知 不 觉 后 然 都 已 经 这 么 晚 了 ， 今 天 我 们 职 
到 这 里 吧 ， 明 天 见 ! 


第 12 天 定时 器 (1) 


。 使 用 定时 器 (harib09a) 

e 计量 时 间 (harib09b) 

。 超时 功能 Charib09c) 

。 使 用 多 个 定时 器 (harib09d) 

。 加快 中 断 处 理 (1) (harib09e) 
。 加快 中 断 处 理 (2) (harib09f) 
。 加 快 中 断 处 理 (3) Charib09¢ ) 


1 使 用 定时 需 Charib09a) 


wel} 4s! (Timer) 对 于 操作 系统 非常 重要 。 它 在 原 
理 上 却 很 简单 ， 只 是 每 隔 一 段 时 间 〈 比 如 0.01 秒 )》 
就 发 送 一 个 中 断 信号 给 CPU。 笠 亏 有 了 定时 器 ， 
CPU 才 不 用 辛苦 地 去 计量 时 间 。...... 如 果 没 有 定时 
器 会 怎么 样 呢 ? 让 我 们 想象 一 下 吧 。 


1 瑞 文 的 Timer 在 汉语 中 有 “定时 右 ” 或 “时 钟 ”等 多 
种 译 法 。 男 外 ，Clock 这 个 词 ， 也 经 党 译作 “时 
钟 ?。 这 两 个 词 ， 意 义 上 是 不 同 的 ， 如 果 都 译 

作 “ 时 钟 ?， 会 引起 混乱 。 本 文 原文 为 日 文 ， 用 到 
了 “Timer” 和 “Clock” 这 两 个 词 的 首 译 词 。 为 了 区 
别 这 两 个 词 ， 本 文中 我 们 将 Timer 称 作 “ 定 时 器 ”， 
Clock 称 作 “ 时 钟 周期 * 或 “周期 ”。 aE 


假如 CPU 看 不 到 定时 器 而 仍 想 计量 时 间 的 话 ， 束 只 
能 牢记 每 一 条 指令 的 执行 时 间 了 。 比 如 ， 往 寄存 器 
写 入 常数 的 MOV 指 令 是 1 个 时 钟 周期 (Clock) ; 加 
法 计算 的 ADD 指 令 原 则 上 是 1 个 时 钟 周期 ， 但 根据 
条 件 不 同 可 能 是 2 个 时 钟 周 期 ..…. 等 等 。CPU 不 仅 
要 牢记 这 些 内 容 ， 然 后 还 要 据 此 调查 一 下 调用 这 些 
函数 所 需 的 时 间 ， 比 如 ， 调 用 这 个 函数 需要 150 个 
时 钟 周 期 ， 调 用 那个 函数 因 参 数 不 同 需 要 106 到 587 
个 时 钟 周 期 等 。 


而 这 里 的 “时 钟 周期 > 又 不 是 一 个 固定 值 。 比 如 CPU 
主 频 是 100MHz 的 话 ， 一 个 时 钟 周期 是 10 纳 秒 ; 但 
主 频 如 果 是 200MHz，1 个 时 钟 周期 束 是 5 纳 秒 。 既 
然 CPU 有 各 种 主 频 ， 那 么 1 个 时 钟 周期 的 时 间 也 就 
各 不 相同 。 


这 样 做 可 以 勉强 通过 程序 对 时 间 进 行 管理 ， 实 现 每 
隔 一 定时 间 进 行 一 次 东 种 处 理 ， 比 如 让 钟表 〈 程 
序 ) 的 秒针 动 起 来 。 如 果 程 序 中 时 间 计 算出 错 了 ， 
那么 做 出 的 钟表 不 是 快 就 是 慢 ， 没 法 使 用 。 


如 果 没 有 定时 右 ， 还 会 出 现 别 的 腑 烦 ， 即 不 能 使 用 
HLT 指 令 。 完 成 这 个 指令 所 需 的 时 钟 周期 ， 不 是 个 
固定 值 。 这 样 ， 一 旦 执行 HLT 指 令 ， 程 序 就 不 知道 
时 间 了。 不 能 执行 HLT 指 令 ， 就 意味 看 要 浪费 很 多 
电能 。 所 以 只 能 二 选 一 ， 要 么 放 莽 时 间 的 计量 ， 要 
ARERR HERE. EAN, KERRE. 


打 个 比方 次 ， 如 采 大 家 没有 手表 还 想 知 道 时 间 ， 
那 该 怎么 办 呢 ? 当然 ， 不 准 看 太阳 ， 世 不 准 看 星 
星 。 那 惑 只 能 根据 肚子 的 饥 狐 程度， 或 者 烧 一 亚 
开水 所 用 的 时 间 等 方法 来 判断 了 。 总 之 只 能 是 一 
边 干 点 儿 什 么 ， 一 边 计 算 时 间 ， 而 且 决 不 能 

觉 ! 一 睡觉 就 没 法 计时 了 ..….. 咽 ， 束 类 似 这 种 情 
况 。 


然而 实际 上 ， 由 于 有 定时 噩 中断， 所 以 不 用 担心 会 
发 生 这 样 的 芒 剧 。 程 序 只 需要 以 目 己 的 步调 处 理 目 
己 的 问题 束 行 了 。 至 于 到 展 经 过 了 多 长 时 间 ， 只 要 
在 中 上 断 处 理 程序 中 数 一 数 定 时 磺 中 断 发 生 的 次 数 吏 
可 以 了 。 就 算 CPU 处 于 HLT 状 态 ， 也 可 以 通过 中 断 
来 唤醒 。 根 本 就 没 必 要 让 程序 自己 去 记忆 时 间 。 
CPU 也 就 可 以 安心 地 去 睡觉 了 (CHLT) 。 这 样 ， 大 
家 还 可 以 省 点 电费 〈 笑 ) 。 


所 以 说 定时 器 非 党 重要。 管理 定时 右 是 操作 系统 的 
重大 任务 之 一 ， 所 以 在 “ 纸 娃 娃 操 作 系 统 ” 中 我 们 也 
RAE H E T A o 


LE HAT Aer BET As, JA mX PIT IAT E WT 
以 了 。PIT 是 * Programmable Interval Timer” HJ 4 

写 ， 翻 译 过 来 就 是 “可 编程 的 间隔 型 定时 器 >。 我 们 
可 以 通过 设 定 PIT， 让 和 定时 堪 每 隔 多 少 秒 就 产生 一 
次 中 断 。 因 为 在 电脑 中 PIT 连接 着 IRQ (interrupt 
request， 人 参考 第 6 章 ) 的 0 号 ， 所 以 只 要 议定 了 PIT 
残 可 以 设 定 IRQ0 的 中 断 间 阿 。.…… 在 旧 机 种 上 PIT 
是 作为 一 个 独立 的 必 片 安装 在 主板 上 的 ， 而 现在 已 
经 和 PIC (programmable interrupt controller， 参 考 第 
6 草 ) 一 样 被 集成 到 别 的 心 厂 里 了 。 


前 儿 天 我 们 学 习 PIC 时 曾经 非常 辛苦 ， 从 现在 开 
始 ， 我 们 义 要 重 温 那 种 感觉 了 。 大 家 可 不 要 

想 : “怎么 又 学 这 个 ? MFR PICH, ER 
东西 比较 多 ， 学 起 来 很 费力 。 这 次 就 不 会 那么 立 兰 
Ja 


首先 来 看 资料 ， 还 是 到 我 们 每 次 必 去 的 那个 网 站 。 
电脑 里 的 定时 器 用 的 是 8254 芯 片 〈 或 其 替代 品 ) ， 
那 束 查 一 下 这 个 蕊 片 吧 。 


http://community.osdev.info/?(PIT)8254 
DI EAA, GREER ARATE ACK So Pr DAI E ait 
不 一 一 详 述 了 ， 大 家 来 看 下 面 “ 给 人 麻烦 的 读者 ”这 
一 部 分 吧 。 

。IRQ0 的 中 断 周 期 变更 : 


o AL=0x34:0UT(0x43,AL); 


”AL= 中 断 半期 的 低 8 位 ; OUT(0x40,AL); 


o AL= 中 断 周期 的 高 8 位 ; OUT(0x40,AL); 
o 到 这 里 告 一 段落 。 
o 如 果 指 定 中 断 周期 为 0， 会 被 看 作 是 指定 为 


65536。 实 际 的 中 断 产生 的 频率 是 单位 时 间 
时 钟 周期 数 CRUDE RD / 设 定 的 数值 。 比 如 设 
定 值 如 果 是 1000， 那 么 中 断 产 生 的 频率 就 是 
1.19318KHz。 设 定 值 是 10000 的 话 ， 中 断 产 
生 频 率 就 是 119.318Hz。 再 比如 设 定 值 是 
11932 的 话 ， 中 断 产 生 的 频率 大 约 就 是 100Hz 
了 ， 即 每 10oms 发 生 一 次 中 断 。 


我 们 不 清楚 其 中 的 详细 原理 ， 只 知道 只 要 执行 3 次 

OUT 指 令 设 定 束 完成 了 。 将 中 断 周 期 设 定 为 11932 

的 话 ， 中 断 频 率 好 像 就 是 100Hz， 也 就 是 说 1 秒 钟 会 
发 生 100 次 中 断 。 那 么 我 们 就 设 定 成 这 个 值 吧 。 把 

11932 换 算 成 十 六 进 制 数 就 是 0x2e9c， 下 面 是 我 们 

编写 的 函数 init_pit。 


本 次 的 timer.c 节 选 


#define PIT_CTRL 0x0043 
#define PIT_CNTO 0x0040 


void init_pit(void) 


io_out8(PIT_CTRL, 0x34); 
io_out8(PIT_CNTO, @x9c); 
io_out8(PIT_CNTO, ©0x2e); 
return; 


本 次 的 bootback.c 节 选 


void HariMain(void) 


中略) 


init_gdtidt(); 

init_pic(); 

io_sti(); /* IDT/PIC 的 初始 化 已 经 结束 ， 所 以 解除 CPU 的 中 
靳 禁止 */ 

fifo8_init(&keyfifo, 32, keybuf); 


fifo8 init(&mousefifo, 128, mousebuf) ; 

init_pit(); /* KE! */ 

io _out8(PIC@ IMR, Oxf8); /* PIT 和 PIC1 和 键盘 设置 为 许可 
(11111000) */ /* 这 里 ! */ 

io_out8(PIC1_IMR, Oxef); /* 鼠标 设置 为 许可 (11161111) 
+y 


CHH) 


这 样 的 话 IRQ0 束 会 在 1 秒 钟 内 发 生 100 次 中 断 了 。 
|i | yt E 
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本 次 的 timer.c 节 选 


void inthandler2@(int *esp) 
{ 


io_out8(PIC@ OCW2, @x6e); /* 把 IRQ-66 信 号 接收 完了 的 


信息 通知 给 PIC */ 
/* 暂时 什么 也 不 做 */ 


return; 


本 次 的 naskfunc.nas 节 选 


_asm_inthandler26 : 
PUSH ES 
PUSH DS 
PUSHAD 
MOV EAX, ESP 
PUSH EAX 
MOV AX,SS 
MOV DS , AX 
MOV ES, AX 
CALL _inthandler20 
POP EAX 
POPAD 
POP DS 
POP ES 
IRETD 


为 了 把 这 个 中 断 处 理 程序 注册 到 IDT，inlt_gdtidt 函 
数 中 也 要 加 上 几 行 。 这 也 和 键盘 处 理 的 时 候 差 不 


B 


本 次 的 dsctbl.c 节 选 


void init_gdtidt(void) 


CHH) 


/* IDT 的 设 定 */ 

set_gatedesc(idt + @x2@, (int) asm_inthandler26，2 
* 8, AR_INTGATE32); /* 这 里 ! */ 

set_gatedesc(idt + 0x21, (int) asm_inthandler21, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x27, (int) asm_inthandler27, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + @x2c, (int) asm_inthandler2c, 2 
* 8, AR_INTGATE32); 


return; 


到 这 里 准备 工作 就 完成 了 。 也 不 知 能 不 能 正常 运 
47. IEMA, HA, MITA RE R). F 
面 我 们 执行 “make run”。 哦 ， 什 么 也 没 发 生 。 太 好 
了 ! 但 这 样 有 点 不 过 瘾 ， 还 是 在 中 上 断 处 理 程序 中 做 
点 什么 吧 ! 


2 计量 时 间 Charib09b) 


那 我 们 证 它 干 点 什么 昵 ? oo... AS! 我 们 就 让 它 执 
行 下 面 这 段 程序 吧 。 


本 次 的 bootback.h 节 选 


struct TIMERCTL { 
unsigned int count; 


}; 


本 次 的 timer.c 节 选 
struct TIMERCTL timerctl; 


void init_pit(void) 

{ 
io _out8(PIT_CTRL, 0x34); 
io_out8(PIT_CNT@, @x9c); 
io_out8(PIT_CNT@, @x2e); 
timerctl.count = @; /* 这 里 ! */ 
return; 


} 


void inthandler20(int *esp) 
{ 


io_out8(PICO_OCW2, 0x60); /* 把 IRQ-66 信 号 接收 完了 的 
信息 通知 给 PIC */ 

timerctl.count++; /* 这 里 ! */ 

return; 


程序 所 做 的 处 理 是 : 首先 定义 了 struct TIMERCTL 
结构 体 。 然 后 ， 在 结构 体内 定义 了 一 个 计数 变量 。 
初始 化 PIT 时 ， 将 这 个 计数 变量 设置 为 0。 每 次 发 生 
定时 右 中 断 时 ， 计 数 变 量 束 以 1 递增 ,也 就 是 说 ， 
即使 这 个 计数 变量 在 HariMain 中 不 进行 加 算 ， 每 1 
秒 钟 它 也 会 自动 增加 100。 


TT 
为 了 确认 这 一 点 ， 我 们 把 数值 显示 出 来 吧 。 


本 次 的 bootback.c 节 选 
void HariMain(void) 


中略) 


for (33) { 
sprintf(s, "%@10d", timerctl.count); /* 这 里 ! 


*/ 

boxfill8(buf_win, 160, COL8 C6C6C6, 40, 28, 
119, 43); 

putfonts8 asc(buf_win, 160, 40, 28, 
COL8 900000, s); 

sheet_refresh(sht_win, 40, 28, 120, 44); 


CHH) 


这 样 的 话 ， 数 字 应 该 是 以 每 秒 钟 100 的 速度 增加 。 


而 且 不 论 哪个 机 种 增加 速度 都 是 一 样 的 。 即 使 CPU 
的 速度 不 同 ， 增 加 速度 也 应 该 是 一 样 的 。 我 们 先 做 
做 看 吧 。 执 行 “make run”. ...... BRs ERZI I, 
还 算 顺 利 。 


(243, 133 
Ller 0 1] 
memory 32MB free : 29152KB 


counter 
OOOOOO1TA? 


=| = 
1 秒 钟 增加 100 


利用 这 个 方法 ， 就 能 知道 从 启动 开始 时 间 过 去 了 多 
少 秒 。 如 果 往 方便 面 里 倒 入 开水 的 同时 ， 我 们 启动 
这 个 程序 ， 束 能 测量 是 人 否 到 3 分 钟 “=180 秒 ) 了。 
哦 ， 终 于 辐 着 有 实用 价值 的 操作 系统 迈 出 了 第 一 步 
(KE) 。 顺 便 说 一 下 ，5 分 钟 相 当 于 300 秒 ， 所 以 泡 
乌 冬 面 时 也 可 以 拿 它 来 计时 了 呢 ! 


3 超时 功能 Charib09c) 


现在 ， 从 局 动 开 始 经 过 了 多 少 秒 这 一 类 问题 ， 我 们 
残 可 以 很 轻松 地 判断 了 。 另 外 ， 我 们 还 可 以 计量 处 
理 所 人 花费 的 时 间 。 有 其 体 做 法 是 ， 处 理 前 看 一 下 时 间 
并 把 它 存 放 到 一 个 变量 里 ， 处 理 结束 之 后 再 看 一 下 
时 间 ， 然 后 只 要 用 减法 算出 时 间 差 ， 束 能 得 到 答案 
了 ， 比 如 “这 个 处 理 耗 时 13.56 秒 ”等 。 我 们 甚至 可 以 
据 此 编制 基准 测试 程序 + (benchmark program) 。 


1 指 测试 电脑 性 能 的 程序 。 比 如 有 新 的 CPU 面 世 的 
时 候 ， 在 杂志 等 上 面 会 评论 说 ， 执 行 某 一 基准 测 

试 程序 ， 新 的 CPU 比 以 前 的 CPU 性 能 提高 了 多 少 

Ags 


这 里 大 家 稍稍 回想 一 下 ， 现 在 已 经 能 够 显示 出 窗 
口 ， 又 能 使 用 鼠标 ， 又 能 计量 时 间 ， 还 能 进行 内 存 
常理 ， 已 经 实现 了 很 多 功能 。 有 了 这 些 功能 ， 只 要 
对 它们 进行 各 种 组 合 ， 就 能 做 很 多 事情 。 嗯 ， 己 经 
有 点 操作 系统 的 样子 了 。 


我 们 言 归 正 传 ， 继 续 说 定时 器 吧 。 操 作 系 统 的 定时 
釉 经 名 被 用 于 这 样 一 种 情形 :“ 喂 ， 操 作 系统 小 兄 
么 ”。 当 然 ， 不 一 定 非 要 是 10 秒 ， 也 可 以 是 1 秒 或 30 


分 钟 。 我 们 把 这 样 的 功能 叫做 “超时 ”(timeout) 。 
下 面 束 来 实现 这 个 功能 吧 。 


首先 往 结构 体 struct TIMERCTL 里 添加 一 些 代 码 ， 
以 便 记 录 有 关 超 时 的 信息 。 


本 次 的 bootback.h 节 选 


struct TIMERCTL { 
unsigned int count; 
unsigned int timeout; 


struct FIFO8 *fifo; 
unsigned char data; 


以 上 结构 体 中 的 timeout 用 来 记录 离 超 时 还 有 多 长 时 
间 。 一 旦 这 个 剩余 时 间 达 到 0， 程 序 就 往 FIFO 绥 冲 
区 里 发 送 数 据 。 定 时 器 就 是 通过 这 种 方法 通知 
HariMain 时 间 到 了 。 


全 于 为 什么 要 使 用 FIFO 缓 冲 区 ， 笔 者 也 说 不 上 个 所 
以 然 ， 只 是 觉得 这 个 方法 简 蛙 ， 因 为 使 用 FIFO 绥 冲 
区 来 通知 的 话 ， 可 以 比照 键盘 和 鼠标 ， 利 用 同样 的 
方法 来 处 理 。 


下 面 我 们 来 修改 函数 吧 。 


本 次 的 timer.c 节 选 


void init_pit(void) 


{ 


io_out8(PIT_CTRL, 0x34); 
io_out8(PIT_CNTO, @x9c); 
io_out8(PIT_CNTO, Ox2e); 
timerctl.count = ð; 
timerctl.timeout = 
return; 


ð; 
} 


void inthandler2@(int *esp) 


{ 
io_out8(PIC@ OCW2, @x6e); /* 把 IRQ-66 信 号 接收 结束 的 
信息 通知 给 PIC */ 
timerctl.count++; 
if (timerctl.timeout > 0) { /* 如 果 已 经 设 定 了 超时 */ 
timerctl.timeout--; 
if (timerctl.timeout == 0) { 
fifo8_put(timerctl.fifo, timerctl.data) ; 
} 
} 


return; 


} 


void settimer(unsigned int timeout, struct FIFO8 *fifo, 
unsigned char data) 
{ 

int eflags; 

eflags = io_load_eflags(); 

io_cli(); 

timerctl.timeout = timeout; 


timerctl.fifo = fifo; 
timerctl.data = data; 
io_store_eflags(eflags) ; 
return; 


希望 大 家 注意 的 是 ， 我 们 在 inthandler20 函 数 里 实现 
了 超时 功能 。 每 次 发 生 中 汤 时 或 把 timeout 减 1， 减 
到 0 时 ， 就 向 fifo 发 送 数据 。 


fEsettimer AÁ E, OO RCE IIA SEA A RIRQO 
的 中 断 就 进来 的 话 ， 会 引起 混乱 ， 所 以 我 们 先 禁 目 
中 断 ， 然 后 完成 设 定 ， 最 后 再 把 中 断 状态 复原 。 


这 在 HariMain 中 如 何 实现 呢 ? RIRE WAF: 
本 次 的 bootback.c 节 选 


void HariMain(void) 


中略) 


struct FIFO8 timerfifo; 
char s[40], keybuf[32], mousebuf[128], timerbuf[8]; 


CHH) 


fifo8_init(&timerfifo, 8, timerbuf); 
settimer(1000, &timerfifo, 1); 


(中 上 略 ) 
for (;;) { 


CHEK) 

io_cli(); 

if (fifo8_status(&keyfifo) + 
fifo8_status(&mousefifo) + fifo8_status(&timerfifo) == 
6) { 


io_sti(); 
} else { 
if (fifo8_status(&keyfifo) != @) { 
中略 ) 
} else if (fifo8_status(&mousefifo) != @) { 
中略 ) 


} else if (fifo8 status(&timerfifo) != @) { 
i = fifo8 get(&timerfifo); /* BAMA 
(为 了 设 定 起 始 上 把 ) */ 
io sti(); 
putfonts8 asc(buf back, binfo->scrnx, 
@, 64, COL8 FFFFFF, "10[sec]"); 
sheet_refresh(sht_back, ©, 64, 56, 80); 


程序 很 简单 ， 我 们 在 其 中 设 定 10 秒 钟 以 后 辐 
timerfifo 写 入 “1” 这 个 数据 ， 而 timerfifo 接 收 到 数据 
时 ， 束 会 在 屏保 上 显示 “10[sec]”。 


我 们 执行 一 下 “make run””， 看 ， 显 示 出 来 了 。 太 棒 


了 ! 


er a la 
emory 32MB tree : 29152KB 


等 待 10 秒 钟 就 会 出 现 上 面 的 画面 


4 设 定 多 个 定时 器 Charib09d) 


在 上 一 节 做 的 超时 功能 ， 超 时 结束 后 如 果 再 设 定 

1000 的 话 ， 那 我 们 就 可 以 让 它 每 10 秒 显示 一 次 ， 或 
是 让 它 一 闪 一 灭 地 显示 。 另 外 ， 间 隔 不 仅 限 于 10 

秒 ， 我 们 还 可 以 说 定 得 更 长 一 些 或 更 短 一 些 。 比 如 
设 定 为 0.5 秒 的 间隔 可 以 用 于 文字 输入 时 的 光标 闪 

Wi 


开发 操作 系统 时 ， 超 时 功能 非常 方便 ， 所 以 在 很 多 
地 方 都 可 以 使 用 它 。 比 如 可 以 让 电子 时 钟 每 隔 1 秒 
重新 显示 一 次 ; 演奏 音乐 时 ， 可 以 用 它 计 量 音符 的 
长 短 ; 也 可 以 让 它 以 0.1 秒 1 次 的 频率 来 监视 没有 中 
断 功 能 的 装置 1; 另外 ， 还 可 以 用 它 实现 光标 的 闪 
MRA HE 
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来 的 ， 但 是 还 有 些 装 置 ， 即 使 状态 有 变化 也 不 会 
发 生 中 断 。 大 家 可 能 会 想 :“ 设 计 这 种 装置 的 人 想 
什么 呢 ! ”但 生气 也 于 事 无 补 ， 我 们 只 能 定期 去 碍 
询 半 置 的 状态 。 就 算是 状态 没有 变化 也 得 碍 询 ， 

实在 是 浪费 电能 。 


为 了 简单 地 实现 这 些 功 能 ， 我 们 要 准备 很 多 能 够 设 
JERE BY H JE HTA o 


比 起 文字 说 明 来 ， 还 是 直接 看 程序 更 易于 理解 。 
CLLD 


首先 把 struct TIMERCTL 修 改 成 下 面 这 样 。 


本 次 的 bootback.h 节 选 
#define MAX TIMER 


struct TIMER { 
unsigned int timeout, flags; 
struct FIFO8 *fifo; 
unsigned char data; 


J3 


struct TIMERCTL { 
unsigned int count; 
struct TIMER timer[MAX_TIMER]; 


}; 


ORE RBI EN aie & n AE AS00 F, flags 
WU Phe 4B EY as HAAS 


TT 
下 和 面 ， 我 们 把 函数 也 相应 地 修改 一 下 吧 ，。 


本 次 的 timer.c 节 选 


#define TIMER_FLAGS_ALLOC 1 /* 已 配置 状态 */ 


#define TIMER_FLAGS_USING 2 /* 定时 器 运行 中 */ 


void init pit(void) 
{ 
int i; 
io_out8(PIT_CTRL, 0x34); 
io_out8(PIT_CNT@, @x9c); 
io_out8(PIT_CNT@, x2e); 
timerctl.count = ð; 
for (i = ð; i < MAX TIMER; i++) { 
timerctl.timer[i].flags = 0; /* 未 使 用 */ 
} 


return; 


} 


struct TIMER *timer_alloc(void) 
{ 
int i; 
for (i = 6; i < MAX_TIMER; i++) { 
if (timerctl.timer[i].flags == 0) { 
timerctl.timer[i].flags = 
TIMER_FLAGS_ALLOC; 
return &timerctl.timer[i]; 


} 
} 
return 0; /* 没 找到 */ 
} 
void timer_free(struct TIMER *timer) 
{ 
timer->flags = 0; /* 未 使 用 */ 
return; 
} 


void timer_init(struct TIMER *timer, struct FIFO8 
*fifo, unsigned char data) 


timer->fifo = fifo; 
timer->data = data; 
return; 
} 
void timer settime(struct TIMER *timer, unsigned int 
timeout) 
{ 


timer->timeout = timeout; 
timer->flags = TIMER FLAGS USING; 
return; 


} 


void inthandler2@(int *esp) 
{ 
int i; 
io_out8(PIC@_OCW2, @x6@); /* 把 IRQ-66 信 号 接收 结束 
的 信息 通知 给 PIC*/ 
timerctl.count++; 
for (i = @; i < MAX TIMER; i++) { 
if (timerctl.timer[i].flags == 
TIMER _FLAGS USING) { 
timerctl.timer[i].timeout--; 
if (timerctl.timer[i].timeout == 0) { 
timerctl.timer[i].flags = 
TIMER FLAGS ALLOC; 
fifo8 put(timerctl.timer[i].fifo, 
timerctl.timer[i].data) ; 


} 
} 


} 


return; 


程序 稍微 有 些 长 ， 但 只 要 前 面 的 程序 大 家 都 明日 
了 ， 这 里 应 该 也 没什么 困难 。 


最 后 来 看 HariMain 函 数 。 我 们 不 一 定 都 设 定 为 10 
秒 ， 也 党 试 一 下 设 为 3 秒 吧 。 另 外 ， 我 们 还 要 编写 
类 似 光 标 闪 烁 那样 的 程序 。 


本 次 的 bootback.c 节 选 


void HariMain(void) 


CHH) 


struct FIFO8 timerfifo, timerfifo2, timerfifo3; 

char s[40], keybuf[32], mousebuf[128], timerbuf[8], 
timerbuf2[8], timerbuf3[8]; 

struct TIMER *timer, *timer2, *timer3; 


CHH) 


fifo8_init(&timerfifo, 8, timerbuf); 
timer = timer_alloc(); 
timer_init(timer, &timerfifo, 1); 
timer_settime(timer, 1000); 
fifo8_init(&timerfifo2, 8, timerbuf2) ; 
timer2 = timer_alloc(); 
timer_init(timer2, &timerfifo2, 1); 
timer_settime(timer2, 300); 

fifo8 init(&timerfifo3, 8, timerbuf3) ; 
timer3 = timer_alloc(); 


timer_init(timer3, &timerfifo3, 1); 
timer_settime(timer3, 50); 


CHH) 


for (;;) { 


CHH) 


io_cli(); 
if (fifo8_status(&keyfifo) + 


fifo8_status(&mousefifo) + fifo8_status(&timerfifo) 


+ fifo8_status(&timerfifo2) + 


fifo8 status(&timerfifo3) == 0) { 


io_sti(); 
} else { 
if (fifo8_status(&keyfifo) != ©) { 
中略 ) 
} else if (fifo8_status(&mousefifo) != @) { 
中略 ) 


} else if (fifo8 status(&timerfifo) != @) { 
i = fifo8 get(&timerfifo); /* BAMA 


(为 了 设 定 起 始点 ) */ 


0, 64, 


{ 


io_sti(); 
putfonts8 asc(buf back, binfo->scrnx, 
COL8 FFFFFF, "10[sec]"); 
sheet_refresh(sht_back, ©, 64, 56, 80); 
} else if (fifo8 status(&timerfifo2) != @) 


i = fifo8 get(&timerfifo2); /* 首先 读 入 


(为 了 设 定 起 始点 ) */ 


©, 80, 


io_sti(); 
putfonts8_asc(buf_back, binfo->scrnx, 
COL8_FFFFFF, "3[sec]"); 
sheet_refresh(sht_back, ©, 80, 48, 96); 
} else if (fifo8 status(&timerfifo3) != @) 


{ /* 模拟 光标 */ 


i = fifo8 get(&timerfifo3 ; 
io_sti(); 
if (i != @) { 
timer_init(timer3, &timerfifo3, ©); 
/* 然后 设置 */ 


boxfil18(buf_back, binfo->scrnx, 
COL8_FFFFFF, 8, 96, 15, 111); 
} else { 
timer_init(timer3, &timerfifo3, 1); 
/* 然后 设置 1 */ 
boxfill8(buf back, binfo->scrnx, 
COL8_008484, 8, 96, 15, 111); 
} 
timer_settime(timer3, 50); 
sheet_refresh(sht_back, 8, 96, 16, 


112); 


下 面 就 是 期 盼 已 久 的 “make run” 了 。 我 们 执行 一 
下 ， 当 然 会 顺利 运行 了 ， 结 果 如 下 图 。 


都 显示 出 来 啦 ! 


5 加 快 中 断 处 理 (1) (harib09e) 


现在 我 们 可 以 自由 使 用 多 个 定时 器 了 ， 从 数量 上 
说 ， 已 经 足够 了 。 但 仔细 看 一 下 大 家 会 发 现 ， 
inthandler20 还 有 很 大 问题 : 中 断 处 理 本 来 应 访 在 很 
短 的 时 间 内 完成 ， 可 利用 inthandler20 时 却 花 费 了 很 
长 时 则 。 这 束 妨 碍 了 其 他 中 断 处 理 的 执行 ， 使 得 操 
作 系 统 反 应 很 人 运 鲁 。 


如 果 检 碍 inthandler20， 能 发 现 每 次 进行 定时 需 中 断 
处 理 的 时 候 ， 都 会 对 所 有 活动 中 的 定时 器 进 

行 “timerctLtimer[i.timeout--;” 处 理 。 也 就 是 说 ， 

CPU 要 完成 从 内 存 中 读 取 变量 值 ， 减 去 1， 然 后 又 
往 内 存 中 写 入 的 操作 。 本 来 谁 也 不 会 注意 到 这 种 细 
徽 之 处 ， 但 由 于 我 们 想 在 中 断 处 理 程序 中 尽 可 能 减 
少 哪 怕 是 一 点 点 工作 量 ， 所 以 才 会 注意 到 这 里 。 


问题 找到 了 ， 那 该 怎么 修改 才 好 呢 ? 我 们 看 看 下 面 
这 样 行 不 行 。 


本 次 的 timer.c 节 选 


void inthandler2@(int *esp) 


int i; 
io_out8(PIC@_OCW2, 0x60); /* 把 IRQ-66 信 号 接收 结束 的 
信息 通知 给 PIC */ 


timerctl.count++; 
for (i = @; i < MAX_TIMER; i++) { 
if (timerctl.timer[i].flags == 
TIMER_FLAGS USING) { 
if (timerctl.timer[i].timeout <= 
timerctl.count) { /* 这 里 ! */ 
timerctl.timer[i].flags = 
TIMER_FLAGS ALLOC; 
fifo8 put(timerctl.timer[i].fifo, 
timerctl.timer[i].data) ; 


} 


} 


return; 


我 们 改变 了 程序 中 变量 timer[i.timeout 的 含义 。 它 
指 的 不 再 是 “所 剩 时 间 ”， 而 是 “ 子 定 时 刻 ” 了 。 因 为 
现在 的 时 刻 计数 到 timerctl.count 中 去 了 ， 所 以 就 拿 
它 和 timer[i].timeout 进 行 比较 ， 如 果 相 同 或 是 超过 
了 ， 就 通过 往 FIFO 绥 冲 区 里 传送 数据 来 通知 
HariMain. 大 家 现在 青 看 一 看 ， 3 HECKI 
法 计算 没有 了 。 这 样 一 改 ， 程 序 的 速度 应 该 能 稍微 
变 快 一 些 了 。 


下 面 我 们 也 要 相应 地 修改 timer_settime 函 数 。 


本 次 的 timer.c 节 选 


void timer_settime(struct TIMER *timer, unsigned int 
timeout ) 


timer->timeout = timeout + timerctl.count; /* 这 里 ! 
*/ 

timer->flags = TIMER _FLAGS USING; 

return; 


timer_settime 函 数 中 所 指定 的 时 间 ， 是 “从 现在 开始 
多 少 多 少 秒 以 后 ”的 意思 ， 上 所 以 用 这 个 时 间 加 上 现 


在 的 时 刻 ， 惑 可 以 计算 出 中 断 的 预定 时 刻 。 程 序 中 
对 这 个 时 刻 进行 了 记录 。 别 的 地 方 就 不 用 改 了 。 


到 底 这 样 做 行 不 行 呢 ， 我 们 执行 一 下 “make run”. 
好 哇 ， 进 行 得 很 顺利 。 虽 然 还 没 能 切身 感到 速度 变 
快 了 多 少 ， 不 过 先 上 自我 满足 一 下 吧 (E). 


同时 也 正 是 因为 变 成 了 这 种 方式 ， 在 我 们 这 个 纸 娃 
娃 操 作 系 统 中 ， 局 动 以 后 经 过 42 949 673 秒 后 ， 
count 束 是 Oxffffffff 了 ， 比 这 个 值 再 大 就 不 能 设 定 

了 。 这 么 多 秒 是 几 天 呢 ?..... Me, WTS CAS 
Ge ek 大 约 是 497 天 。 也 就 是 大 约 一 年 就 
要 重新 启动 一 次 操作 系统 ， 让 count 归 0。 


这 里 大 家 可 能 又 会 有 怨言 了 “哎呀 ， 还 需要 重新 起 
动 ， 这 样 的 操作 系统 呐 是 肪 烦 ?"。 事 实 上 笔者 本 人 
PEKAR CR). BADJIE. M, HAE 


一 市 的 做 法 ， 好 不 好 呢 ? 可 是 回 到 上 一 节 的 做 法 ， 
HEXA EIR. a.. 既 不 希望 速度 慢 ， 义 不 想 重 新 
尼 动 一 一 为 了 满足 这 种 奢望 ， 我 们 设计 成 一 年 调整 
一 次 时 刻 的 程序 也 许 比 较 好 。 


时 刻 调整 程序 


int tð = timerctl.count; /* 所 有 时 刻 都 要 减 去 这 个 值 */ 
io_cli(); /* 在 时 刻 调整 时 禁止 定时 嚣 中断 */ 
timerctl.count -= t@; 

for (i = @; i < MAX TIMER; i++) { 


if (timerctl.timer[i].flags == TIMER_FLAGS USING) { 


timerctl.timer[i].timeout -= tð; 


} 


io_sti(); 


也 许 以 上 方法 并 非 最 好 ， 但 我 们 不 轻 言 放弃 而 去 想 
办 法 解决 ， 这 种 心境 是 最 重要 的 。 只 要 努力 ， 我 们 
肯定 还 能 找到 别 的 好 办 法 。 


6 加 快 中 断 处 理 (2) (harib09f) 


虽然 像 上 面 那样 做 了 改进 ， 但 笔者 还 是 党 得 中 断 处 
理 程序 太 慢 了 ， 因 此 我 们 再 来 改善 一 下 吧 。 


改善 前 的 timer.c 节 选 


void inthandler2@(int *esp) 
{ 
int i; 
io_out8(PIC@_OCW2, 0x60); /* 把 IRQ-66 信 号 接收 结束 的 
信息 通知 给 PIC */ 
timerctl.count++; 
for (i = ð; i < MAX TIMER; i++) { 
if (timerctl.timer[i].flags = 
TIMER _FLAGS USING) { 
if (timerctl.timer[i].timeout <= 
timerctl.count) { 
timerctl.timer[i].flags = 
TIMER_FLAGS_ALLOC; 
fifo8 put(timerctl.timer[i].fifo, 
timerctl.timer[i].data) ; 


l 
} 


return; 


如 果 看 一 下 harib09e 的 inthandler20， 大 家 会 发 现 每 
次 中 断 都 要 执行 500 次 (=MAX _TIMER 的 次 数 ) 证 


语句 ， 很 浪费 时 间 。 由 于 1 秒 钟 就 要 发 生 100 次 中 

断 ， 这 个 站 语句 1 秒 钟 就 要 执行 5 万 次 。 尺 管 如 此 ， 

这 两 个 if 语 句 都 为 真 ， 而 其 中 的 flags 值 得 以 更 改 ， 

或 者 是 fifo8_put 函 数 能 够 执行 的 频率 ， 最 多 也 束 是 
每 0.5 秒 1 次 ， 即 每 秒 2 次 左右 。 其 余 的 49998 次 if 语 
句 都 是 在 做 无 用 功 ， 基 本 没什么 意义 。 


我 们 来 变通 一 下 思考 方式 ， 如 果 是 人 在 进行 着 这 样 
的 定时 器 管理 ， 会 怎么 做 昵 ? ENEE 
有 500 个 。 其 中 有 3 秒 钟 以 后 超时 的 ， 有 50 秒 钟 以 后 
超时 的 ， 也 有 0.3 秒 钟 以 后 超时 的 ， 还 有 一 天 以 后 超 
时 的 。 这 种 情况 下 ， 我 们 首先 会 关注 哪 一 个 ?应 该 
是 0.3 秒 钟 以 后 的 那个 吧 。0.3 秒 钟 的 结束 后 ， 下 次 

是 3 秒 钟 以 后 的 。 也 就 是 没 必 要 把 500 个 都 看 完 ， 只 
要 看 到 “下 一 个 ”的 时 刻 就 可 以 了 。 因 此 ， 我 们 追加 
一 个 变量 timerctl.next， 让 它 记 住 下 一 个 时 刻 。 


本 次 的 bootpack.h 节 选 


struct TIMERCTL { 
unsigned int count, next; /* 这 里 ! */ 


struct TIMER timer[MAX_TIMER]; 
}; 


本 次 的 timer.c 节 选 


void inthandler2@(int *esp) 
{ 


int i; 

io_out8(PICO_OCW2, 0x60); /* 把 IRQ-66 信 号 接收 结束 的 
信息 通知 给 PIC */ 

timerctl.count++; 

if (timerctl.next > timerctl.count) { 


return; /* 还 不 到 下 一 个 时 刻 ， 所 以 结束 */ 


} 
timerctl.next = Oxffffffff; 


for (i = 6; i < MAX TIMER; i++) { 
if (timerctl.timer[i].flags == 
TIMER _FLAGS USING) { 
if (timerctl.timer[i].timeout <= 
timerctl.count) { 
/* 超时 */ 
timerctl.timer[i].flags = 
TIMER_FLAGS ALLOC; 
fifo8 put(timerctl.timer[i].fifo, 
timerctl.timer[i].data) ; 
} else { 
/* 还 没有 超时 */ 
if (timerctl.next > 
timerctl.timer[i].timeout) { 
timerctl.next = 
timerctl.timer[i].timeout; 


} 
} 
} 
} 


return; 


虽然 程序 变 长 了 ， 但 要 做 的 处 理 却 减少 了 。 在 大 多 


数 情况 下 ， 第 一 个 计 语 句 的 return 都 会 执行 ， 中 断 处 
理 束 到 此 结束 了 。 当 到 达 下 一 个 时 刻 时 ， 使 用 之 前 
那 种 方法 检查 是 否 超 时 。 超 时 的 话 ， 束 写 入 到 FIFO 
中 ; 还 没 超 时 的 话 就 调查 是 否 将 其 设 定 为 下 一 个 时 
刻 《 未 超时 时 刻 中 ， 最 小 的 时 刻 是 下 一 个 时 刻 〉。 


如 果 用 这 样 的 方法 ， 束 能 大 大 减少 没有 意义 的 if 语 
句 的 执行 次 数 ， 速 度 也 应 该 快 多 了 。 


CLLD 
由 于 使 用 了 next， 所 以 其 他 地 方 也 要 修改 一 下 。 


本 次 的 timer.c 节 选 


void init_pit(void) 


int i; 

io out8(PIT CTRL, 0x34); 

io out8(PIT CNT@, @x9c); 

io_out8(PIT_CNT@, @x2e); 

timerctl.count = ð; 

timerctl.next = 6xffffffff; /* 因为 最 初 没 有 正在 运行 的 
定时 器 *#/ 

for (i = @; i < MAX TIMER; i++) { 

timerctl.timer[i].flags = 0; /* 没有 使 用 */ 
} 
return; 


} 


void timer_settime(struct TIMER *timer, unsigned int 


timeout ) 
{ 
timer->timeout = timeout + timerctl.count; 
timer->flags = TIMER _FLAGS USING; 
if (timerctl.next > timer->timeout) { 
/* 更 新 下 一 次 的 时 刻 */ 


timerctl.next = timer->timeout; 


} 


return; 


这 样 束 好 了 。 现 在 我 们 来 确认 是 否 能 正常 运 

行 。“make run”。...... 和 以 前 一 样 ， 虽 然 仍 不 能 切 

身 地 感受 到 速度 变 快 了 ， 但 还 是 自我 满足 一 下 吧 
ks 


7 加 快 中 断 处 理 (3) (harib09g) 


到 了 harib09f 的 时 候 ， 中 断 处 理 程序 的 平均 处 理 时 
间 已 经 大 大 缩短 了 。 这 真是 太 好 了 。 可 是 ， 现 在 有 
一 个 问题 ， 那 就 是 到 达 next 时 刻 和 没 到 next 时 刻 的 
定时 器 中 断 ， 它 们 的 处 理 时 间 差 别 很 大 。 这 样 的 程 
序 结构 不 好 。 因 为 平津 运行 一 直 都 很 快 的 程序 ， 会 
偶尔 由 于 中 断 处 理 拖 得 太 长 ， 而 搞 得 像 古 主 程序 要 
停 了 似 的 。 更 确切 一 点 ， 这 样 有 时 会 让 人 觉得 “不 
知 为 什么 ， 鼠 标 倡 尔 会 反应 迟钝 ， 很 卡 。>” 


因此 ， 我 们 要 让 到 达 next 时 刻 的 定时 器 中 断 的 处 理 
时 间 再 缩短 一 些 。 叫 ， 怎 么 办 呢 ? 模仿 Sheet.c 的 做 
法 怎么 样 呢 ? 我 们 来 试 试 看 。 


在 sheet.c 的 结构 体 struct SHTCTL'+, [ Y sheetO[ ] 
以 外 ， 我 们 还 定义 了 *sheets[ ]。 它 里 面 存放 的 是 按 
某 种 顺序 排 好 的 图 层 地 址 。 有 了 这 个 变量 ， 按 顺序 
描绘 图 层 就 简单 了 。 这 次 我 们 在 Struct TIMERCTL 
中 也 定义 一 个 变量 ， 其 中 存放 按 某 种 顺序 排 好 的 定 
时 器 地 址 。 


本 次 的 bootpack.h 节 选 


struct TIMERCTL { 
unsigned int count, next, using; 


struct TIMER *timers[MAX_TIMER]; 
struct TIMER timers@[MAX_TIMER]; 


J 


变量 using 相 当 于 struct SHTCTL 中 的 top， 它 用 于 记 
录 现 在 的 定时 右 中 有 几 个 处 于 活动 中 。 


改进 后 的 inthandler20 函 数 如 下 : 


本 次 的 timer.c 节 选 


void inthandler2@(int *esp) 
{ 


int i, j; 
io_out8(PICO_OCW2, 0x60); /* 把 IRQ-66 信 号 接收 结束 的 
信息 通知 给 PIC */ 
timerctl.count++; 
if (timerctl.next > timerctl.count) { 
return; 
} 
for (i = ð; i < timerctl.using; i++) { 
/* timers 的 定时 器 都 处 于 动作 中 ， 所 以 不 确认 flags */ 
if (timerctl.timers[i]->timeout > 
timerctl.count) { 
break; 


} 

/* 超时 */ 

timerctl.timers[i]->flags = TIMER FLAGS ALLOC; 

fifo8_put(timerctl.timers[i]->fifo, 
timerctl.timers[i]->data) ; 


} 


/* 正好 有 ii 个 定时 器 超时 了 。 其 余 的 进行 移 位 。 */ 

timerctl.using -= i; 

for (j = 6j j < timerctl.using; j++) { 
timerctl.timers[j] = timerctl.timers[i + j]; 


if (timerctl.using > 0) { 

timerctl.next = timerctl.timers[@]->timeout ; 
} else { 

timerctl.next = Oxffffffff; 


} 


return; 


这 样 ， 即 使 是 在 超时 的 情况 下 ， 也 不 用 奏 找 下 一 个 
next 时 刻 ， 或 者 查找 有 没有 别 的 定时 器 超时 了 ， 真 
不 错 。 如 果 有 很 多 的 定时 器 都 处 于 正在 执行 的 状 
态 ， 我 们 会 担心 定时 器 因 移 位 而 变 慢 ， 这 放 在 以 后 
再 改进 吧 (从 13.5 节 开始 讨论 ) 。 


由 于 timerctl 中 的 变量 名 改变 了 ， 所 以 其 他 地 方 也 要 
随 之 修改 。 


void init_pit(void) 


{ 


int i; 

io_out8(PIT_CTRL, 0x34); 

io_out8(PIT_CNT@, @x9c); 

io _out8(PIT_CNT@, @x2e); 

timerctl.count = ð; 

timerctl.next = 6xffffffff; /* 因为 最 初 没 有 正在 运行 的 


ER at */ 


timerctl.using = Q; 

for (i = ð; i < MAX_TIMER; i++) { 
timerctl.timers@[i].flags = 6; /* 未 使 用 */ 

} 


return; 


} 


struct TIMER *timer_alloc(void) 
{ 
int i; 
for (i = 6; i < MAX_TIMER; i++) { 
if (timerctl.timers@[i].flags == 0) { 
timerctl.timers0®[i].flags = 
TIMER_FLAGS ALLOC; 
return &timerctl.timers®@[i ]; 
} 
} 


return 6; /* 没 找到 */ 


这 两 个 函数 比较 简单 ， 只 古 稍稍 修改 了 一 下 变量 
名 。 


在 timer_settime 函 数 中 ， 必 须 将 timer 注 册 到 timers 中 
去 ， 而 且 要 注册 到 正确 的 位 置 。 如 果 在 注册 时 发 生 
中 断 的 话 可 就 厂 烦 了 ， 所 以 我 们 要 事先 关闭 中 断 。 


void timer settime(struct TIMER *timer, unsigned int 
timeout) 


int e, i, j; 
timer->timeout = timeout + timerctl.count; 
timer->flags = TIMER_FLAGS_USING; 
e = io_load_eflags(); 
io_cli(); 
/* 搜索 注册 位 置 */ 
for (i = ð; i < timerctl.using; i++) { 
if (timerctl.timers[i]->timeout >= timer- 
>timeout) { 
break ; 


} 


} 

/* i 写 之 后 全 部 后 移 一 位 */ 

for (j = timerctl.using; j > i; j--) { 
timerctl.timers[j] = timerctl.timers[j - 1]; 


} 

timerctl.using++; 

/* 插入 到 空位 上 */ 

timerctl.timers[i] = timer; 

timerctl.next = timerctl.timers[@]->timeout ; 
io_store_eflags(e); 

return; 


这 样 做 看 来 不 错 。 虽 然 中 断 处 理 程序 速度 已 经 提高 
T, (APE WEEN ae SHI], BAMA SAT, ee 
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便 更 改 哦 。 


从 菏 种 程度 上 来 讲 ， 这 也 是 无 法 避免 的 事 。 如 果 在 
设 定 时 ， 多 下 扣 工 夫 整 理 一 下 ， 到 达 中 断 时 刻 时 就 


能 轻松 一 些 了 。 上 友之， 如果 在 设 定时 偷 点 懒 ， 那 么 
BIA HH TAY AYE EA TS fo A, BATE 
做 好 准备 ， 要 么 临时 抱佛脚 。 完 竟 哪 种 做 法 好 呢 ， 

要 根据 情况 而 定 。 如 果 是 笔者 的 话 会 选择 提前 准 

备 。 也 没有 什么 特殊 的 理由 ， 只 是 笔者 喜欢 这 样 吧 
(R) 。 


现在 我 们 执行 “make run” 看 看 吧 。 和 希望 它 能 正常 运 
行 。 会 怎么 样 呢 ? SULA, AS. 


第 13 天 定时 器 (2) 


o HEIR EZR (harib10a) 

。 重 新 调整 FIFO 绥 种 区 (1) (harib10b) 
。 测 试 性 能 Charib10c~charib10f) 

。 重新 调整 FIFO 绥 冲 区 (2) Charib10g) 
。 加 快 中 断 处 理 (4) Charib10h) 

。 使 用 “哨兵 ” 傈 化 程序 Charib10i) 


1 简化 字符 串 显 示 (harib10a ) 


昨天 我 们 和 学习 了 不 少 提高 定时 卉 处 理 速度 的 内 容 ， 
只 是 还 没有 学 完 。 但 如 果 新 一 草 一 开始 就 讲 那么 难 
的 东西 ， 反 而 会 事倍功半 ， 所 以 我 们 还 是 从 简单 的 
地 方 开始 吧 。 


浏览 一 下 harib09g 的 bootpack.c， 大 家 会 发 现 它 居然 
有 210 行 之 长 。 这 中 间 多 次 出 现 了 如 下 内 容 : 


boxfill8(buf_back, binfo->scrnx, COL8 908484, ©, 16, 
15, 31); 


putfonts8 asc(buf back, binfo->scrnx, ©, 16, 
COL8_FFFFFF, s); 
sheet_refresh(sht_back, ©, 16, 16, 32); 


这 上 段 程 序 要 完成 的 是 : WRES RE, ELAS 
字符 ， 了 最 后 完成 刷新 。 既 然 这 部 分 重复 出 现 ， 我 们 
束 把 它 归 纳 到 一 个 函数 中 ， 这 样 更 方便 使 用 。 

void putfonts8 asc sht(struct SHEET *sht, int x, int y, 
int c, int b, char *s, int 1) 


boxfill8(sht->buf, sht->bxsize, b, x, y, x +1 * 8 


7 1, y + 15); 
putfonts8 asc(sht->buf, sht->bxsize, x, y, c, s); 
sheet_refresh(sht, x, y, x + 1 * 8, y + 16); 
return; 


在 此 补充 说 明 一 下 变量 的 名 称 。 


X, Y …… 显示 位 置 的 坐标 
Cie SATE (color) 
b...... 背景 颜色 (back color) 
Sie 字符 串 〈string ) 
1 ..… 字符 串 长 度 (length) 


利用 上 面 的 函数 ， 刚 才 的 3 行内 容 就 可 以 简写 成 下 
面 的 1 行 了 。 


putfonts8_asc_sht(sht_back, ©, 16, COL8_FFFFFF, 


COL8 008484, s, 2); 


大 好 了 ! 那 我 们 就 赶紧 改写 bootpack.c 吧 ! 


如 果 把 修改 的 内 容 都 列 出 来 ， 束 太 长 了 ， 意 义 也 不 
大 ， 所 以 这 次 我 们 省 略 了 。 可 是 一 点 都 不 写 的 话 ， 
又 有 点 说不过去， 所 以 简单 写 个 例子 吧 。 


修改 前 


boxfill8(buf_back, binfo->scrnx, COL8 908484, 32, 16, 
32 + 15 * 8 - 1, 31); 
putfonts8_asc(buf_back, binfo->scrnx, 32, 16, 


COL8_FFFFFF, s); 
sheet_refresh(sht_back, 32, 16, 32 + 15 * 8, 32); 


修改 后 


putfonts8_asc_sht(sht_back, 32, 16, COL8_FFFFFF, 
COL8_008484, s, 15); 


修改 后 的 bootpack.c 只 有 208 行 ， 太 好 了 ! 缩短 了 2 
行 。 


(可 不 要 说 “只 缩短 了 2 行 呀 ”之 类 的 哦 ) 。 运 
行 “make run” 确 认 一 下 吧 。 叮 ， 运 行 正 浓 ! 


2 重新 调整 FIFO 绥 冲 区 (1) 
(harib10b) 

把 目光 转 同 HariMain 程 序 ， 我 们 能 发 现 还 有 其 他 可 

以 简化 的 内 容 。 

改写 前 的 HariMain 节 选 

if (fifo8 status(&keyfifo) + fifo8 status(&mousefifo) + 


fifo8 status(&timerfifo) 
+ fifo8 status(&timerfifo2) + 


fifo8 status(&timerfifo3) == 0) { 
io_sti(); 
} else { 


这 都 是 什么 呀 ， 整 这 么 长 一 个 站 语 句 ? 使 用 3 个 定时 
器 的 情况 下 ， 就 需要 3 个 FIFO 绥 冲 区 吗 ? 要 是 100 个 
定时 器 难道 束 需 要 创建 100 个 FIFO 绥 冲 区 吗 ? 


咽 ...... 


把 定时 器 用 的 多 个 FIFO 绥 冲 区 都 集中 成 1 个 不 是 更 
好 吗 ? 可 能 会 有 人 担心 : “如 果 集 中 成 了 1 个 ， 会 不 
会 分 辨 不 出 是 哪个 定时 器 超时 了 ? ”其 实 只 要 在 超 
时 的 情况 下 ， 我 们 往 FIFO 内 写 入 不 同 的 数据 ， 就 可 
以 正常 地 分 辨 出 是 哪个 定时 占 超 时 了 。 
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fifo8 init(&timerfifo, 8, timerbuf) ; 
timer = timer_alloc(); 
timer_init(timer, &timerfifo, 10); 
timer_settime(timer, 1000); 

timer2 = timer_alloc(); 


timer_init(timer2, &timerfifo, 3); 
timer_settime(timer2, 300); 

timer3 = timer_alloc(); 
timer_init(timer3, &timerfifo, 1); 
timer_settime(timer3, 50); 


我 们 对 证 语句 也 进行 相应 的 修改 吧 。 
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for (33) { 
sprintf(s, "%@10d", timerctl.count) ; 
putfonts8 asc sht(sht win, 40, 28, COL8_000000, 
COL8_C6C6C6, s, 10); 


io_cli(); 

if (fifo8 status(&keyfifo) + 
fifo8 status(&mousefifo) + fifo8 status(&timerfifo) == 
0) { 


io_sti(); 
} else { 
if (fifo8_status(&keyfifo) != @) { 
中略 ) 
} else if (fifo8_status(&mousefifo) != @) { 
中略 ) 


} else if (fifo8 status(&timerfifo) != @) { 
i = fifo8 get(&timerfifo); /#* 超 时 的 是 哪个 呢 ? 
Ef 


io_sti(); 


if (i == 10) { 
putfonts8_asc_sht(sht_back, ©, 64, 
COL8_FFFFFF, COL8 008484, "1@[sec]", 7); 
} else if (i == 3) { 
putfonts8 asc _sht(sht_back, ©, 80, 
COL8_FFFFFF, COL8 008484, "3[sec]", 6); 


} else { 
/* 6 还 是 1 */ 
if (i != 0) { 


timer_init(timer3, &timerfifo, 0); 
/* 下 面 是 设 定 为 6 */ 
boxfill8(buf back, binfo->scrnx, 
COL8_FFFFFF, 8, 96, 15, 111); 
} else { 
timer_init(timer3, &timerfifo, 1); 
/*# 下 面 是 设 定 为 1#/ 
boxfill8(buf back, binfo->scrnx, 
COL8_008484, 8, 96, 15, 111); 
} 
timer_settime(timer3, 50); 
sheet_refresh(sht_back, 8, 96, 16, 


112); 


哦 ， 程 序 略 有 精简 。bootpack.c 变 成 204 行 ， 精 简 了 
4 行 。 我 们 “make run” 一 下 ， 当 然 是 正常 运行 了 。 


3 测试 性 能 Charib10c~ harib10f ) 


从 昨天 开始 ， 我 们 就 在 不 断 地 对 定时 右 进 行 改善 ， 
而 且 以 后 还 要 继续 改善 ， 但 我 们 不 能 总 是 目 我 满足 
了 呀 ， 我 们 要 杀 目 感 党 一 下 到 撒 改 善 到 什么 程度 了 。 
所 以 我 们 要 测试 性 能 。 


我 们 之 所 以 如 此 专注 于 定时 右 的 改 民 ， 理 由 很 简 
单 ， 是 因为 在 今后 的 开 及 中 会 经 各 使 用 定时 左 。 经 
常 使 用 的 东西 当然 要 做 好 。 同 理 ， 我 们 也 努力 地 改 
进 了 图 层 控 制程 序 。 


测试 性 能 的 方法 很 简单 : 先 对 HariMain 略 加 修改 ， 
恢复 变量 count， 然 后 完全 不 显示 计数 ， 全 力 执 

行 “count++; ”语句 。 当 到 了 10 秒 后 超时 的 时 候 ， 再 
显示 这 个 count 值 。 程 序 所 做 的 只 有 这 么 多 。 可 是 需 
要 注意 ， 必 须 在 起 动 3 秒 后 把 count 复 位 为 0 一 次 。 为 
什么 要 这 样 做 呢 ? 我 们 在 后 面 的 专栏 里 说 明 。 
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int mx, my, i, count = Q; 


(中 上 略 》 


FOP (GIA 
count++; /* 这 里 ! */ 


io_cli(); 

if (fifo8_status(&keyfifo) + 
fifo8 status(&mousefifo) + fifo8 status(&timerfifo) == 
ə) { 


io_sti(); 
} else { 
if (fifo8_status(&keyfifo) != @) { 
中略 ) 
} else if (fifo8_status(&mousefifo) != @) { 
中略 ) 


} else if (fifo8 status(&timerfifo) != @) { 
i = fifo8 get(&timerfifo); /* 超时 的 是 哪个 
We?  */ 
io_sti(); 
if (i == 10) { 
putfonts8_asc_sht(sht_back, ©, 64, 
COL8_FFFFFF, COL8 008484, "1@[sec]", 7); 
sprintf(s, "%010d", count); /* 这 里 ! */ 
putfonts8_asc_sht(sht_win, 40, 28, 
COL8 900000, COL8 C6C6C6, s, 10); /* 这 里 ! */ 
} else if (i == 3) { 
putfonts8 asc_sht(sht_back, ©, 80, 
COL8_FFFFFF, COL8 008484, "3[sec]", 6); 
count = 6j /* 开始 测定 */ 


} else { 
/* 6 还 是 1 */ 
if (i != 6) { 


timer_init(timer3, &timerfifo, ©); 
/* 下 面 是 设 定 为 6 */ 
boxfil18(buf_back, binfo->scrnx, 
COL8_FFFFFF, 8, 96, 15, 111); 
} else { 


timer_init(timer3, &timerfifo, 1); 


/* 下 面 是 设 定 为 1 */ 


boxfil18(buf_back, binfo->scrnx, 
COL8 008484, 8, 96, 15, 111); 
} 
timer_settime(timer3, 50); 
sheet_refresh(sht_back, 8, 96, 16, 


我 们 先 执 行 一 下 这 上 段 程 序 吧 。 运 行 “make run”. 


memory 32MB tree : 29152KB 


在 笔者 的 环境 中 执行 haribl10c 


像 这 样 ，10 秒 钟 结果 就 出 来 了 了。 大 家 试 着 运行 几 
次 “make run”， 会 发 现 每 次 结果 都 不 同 。 我 们 运行 
了 5 次 。 在 测试 期 间 的 10 秒 钟 内 ， 不 要 动 鼠 标 也 不 
要 按键 。 如 果 动 鼠标 或 按键 了 ， 程 序 就 不 得 不 进行 
光标 的 显示 处 理 ， 这 样 会 减 组 count 的 增长 。 


FA “make run” 运 行 5 次 harib10c 的 结果 


0002638668 
0002639649 
0002638944 


0002648179 
0002637604 


5 次 结果 是 如 此 发 散 ， 是 由 于 使 用 模拟 器 而 受到 了 
Windows 的 影响 。5 次 结果 中 ， 最 大 值 与 最 小 值 的 
#8105752 K». ARIE ROLE BT “make 
install Æ. 


1 在 真 机 上 也 进行 了 测试 : 笔者 用 的 真 机 是 “AMD 
Duron 800MHz， 内 存 为 192MB” 的 组 装机 .。 


用 真 机 执行 5 次 harib10c 的 结 


0074643522 
0074643698 
0074643532 


0074643699 
0074643524 
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机 ， 可 还 是 出 现 了 177 的 误差 ， 其 原因 在 于 电脑 内 
部 的 远 度 节 化 ， 或 时 钟 频 率 的 微妙 变化 。 


下 面 来 看 看 ， 如 果 对 harib10c 程 序 利 用 harib09d 时 候 
的 timer.c 和 bootpack.h， 结 果 会 怎样 呢 ? 赶紧 尝试 一 
下 吧 ， 当 然 是 在 误差 较 小 的 真 机 上 做 了 。 我 们 这 时 
的 程序 叫 作 harib10d。 


用 真 机 执行 5 次 harib10d 的 结果 


0074620088 
0074620077 


0074619893 
0074619902 
0074619967 


像 这 样 记 流 水 账 似 的 罗列 一 堆 数 值 ， 谁 也 看 不 出 个 
所 以 然 。 我 们 还 是 计算 一 下 平均 值 吧 。 


harib1@c : 0074643595 


harib1@d: 0074619985 


可 以 看 得 出 来 ，harib10c 比 harib10d 快 了 23610 个 
数 。 这 下 我 们 能 够 确定 程序 的 确 有 了 改进 ， 太 好 
J! 昨天 的 辛苦 总 算 没 有 白费 。 


那么 harib09e 和 harib09f 的 定时 器 控制 义 怎 么 样 昵 ? 
笔者 使 用 它们 分 别 创建 了 harib10e 和 harib10f， 而 且 


也 在 真 机 上 进行 了 测试 ， 结 果 总 结 如 下 。 


harib16d:6674619985( 最 初 的 定时 器 ) 


harib16e:6674629687( 舍 弃 剩 余 时 间 ， 记 忆 超 时 

HF ZI) 

harib10f :0074633350(= A next) 

harib1@c :0074643595( A timers[ ]) 

大 家 可 以 看 出 ， 程 序 每 改良 一 次 速度 就 提高 一 点 。 

COLUMN-7 起 动 3 秒 后 ， 将 count 置 为 0 的 原因 
首先 考虑 一 下 这 个 命令 的 意思 吧 。 起 动 3 秒 后 把 
count 复 位 至 0， 这 与 从 3 秒 后 开始 计数 是 一 样 的 。 
画面 上 要 到 10 秒 以 后 才 显 示 ， 这 样 测试 的 时 间 就 
是 7 秒 钟 。 
事实 上 ， 笔 者 最 初 并 没有 加 入 “count=0;” 语 句 。 但 
那样 做 的 结果 是 ， 在 真 机 上 测定 harib10d 时 ， 最 高 
值 和 最 低 值 的 差 值 竟然 达到 了 150054。 这 可 了 不 
得 呀 。 差 值 这 么 大 ， 即 使 我 们 比较 harib10c 和 
harib10d4， 也 不 知道 哪个 更 快 。 


对 于 这 样 的 结 末 ， 笔 者 曾 范 然 不 知 所 措 ， 差 一 点 


要 放弃 性 能 比较 。 但 后 来 笔者 名 然 想 起 ， 只 要 蒜 
些 条 件 稍微 有 些 变 化 ， 电 脑 初始 化 所 花费 的 时 间 
束 会 有 很 大 变化 。 这 束 古 为 什么 我 们 在 起 动 后 3 秒 
钟 之 内 不 进行 测试 的 原因 。 这 样 做 之 后 ， 误 差 急 
剧 减 小 ， 终 于 可 以 比较 结束 了 ， 真 是 太 好 了 。 


4 重新 调整 FIFO 绥 冲 区 (2) 
(harib10g ) 


我 们 已 经 可 以 确定 性 能 真正 得 到 了 改善 ， 所 以 下 面 
把 程序 恢复 到 harib10c， 治 着 13.2 节 继续 思考 吧 。 


既然 可 以 把 3 个 定时 器 归纳 到 1 个 FIFO 绥 冲 区 里 ， 那 
征 不 是 可 以 把 键盘 和 鼠标 都 归纳 起 来 ， 只 用 1 个 
FIFO 绥 冲 区 来 管理 呢 ? 如 宋 能 够 这 样 管理 的 话 ， 程 
序 束 可 以 写成 : 


if (fifo8 status(&keyfifo) + fifo8 status(&mousefifo) + 


fifo8 status(&timerfifo) == @) { 


见长 的 诗 语句 ， 也 可 以 缩短 了 。 那 么 或 许 harib10c 中 
206 行 的 bootpack.c 也 能 简化 。 


在 13.2 节 中 ， 通 过 往 FIFO 内 写 入 不 同 的 数据 ， 我 们 
可 以 把 3 个 定时 器 归 入 1 个 FIFO 绥 冲 区 里 。 同 理 ， 分 
别 将 从 键 益 和 鼠标 输入 的 数据 也 设 定 为 其 他 值 束 可 
以 了 。 那 好 ， 我 们 束 这 么 办 。 


( 写 入 FIFO 的 数值 中 断 类 型 ) 


Tel (RE ene een E 光标 闪烁 用 定时 器 


See enero am 3 Hb FE IY A 

1 10 秒 定时 器 

256~ 511.............。。。.。 键盘 输入 (从 键盘 控制 
器 读 入 的 值 再 加 上 256 ) 

512~ 767...... 鼠标 输入 〈 从 键盘 控制 器 读 入 的 值 
再 加 上 512) 


这 样 ，1 个 FIFO 绥 冲 区 就 可 以 正常 进行 处 理 了 。 真 
是 太 好 了 ! 不 过 现在 有 一 个 问题 ，fifo8_put 函 数 中 
的 参数 是 char 型 ， 所 以 不 能 指定 767 那 样 的 数值 。 
哎 ， 我 们 好 不 容易 整理 到 1 个 缓存 器 中 了 ， 却 又 出 
现 这 种 问题 。 


所 以 ， 我 们 想 将 写 入 FIFO 缓 冲 区 中 的 内 容 改 成 能 够 
用 int 指 定 的 形式 。 大 家 可 不 要 担心 哦 。 内 容 上 与 
FIFO8 完 全 相同 。 只 是 将 char 型 变 成 了 int 型 。 


本 次 的 bootpack.h 节 选 


struct FIFO32 { 
int *buf; 


int p, q, size, free, flags; 


F 


本 次 的 fifo.c 节 选 


void fifo32_init(struct FIFO32 *fifo, int size, int 
*buf ) 

/* FIFO 绥 冲 区 的 初始 化 */ 

{ 


fifo->size = size; 
fifo->buf = buf; 
fifo->free = size; /*7T*/ 
fifo->flags = 0; 

fifo->p = 0; /* 写 入 位 置 */ 
fifo->q = 0; /* 读 取 位 置 */ 
return; 


} 


int fifo32_put(struct FIFO32 *fifo, int data) 
/* 给 FIFO 发 送 数据 并 储存 在 FIFO 中 */ 
{ 
if (fifo->free == 0) { 
* RAZR TIA, eH */ 
fifo->flags |= FLAGS OVERRUN; 
return -1; 
} 
fifo->buf[fifo->p] = data; 
fifo->p++; 
if (fifo->p == fifo->size) { 
fifo->p = ©; 
} 
fifo->free--; 
return ð; 


int fifo32_get(struct FIFO32 *fifo) 
/* 从 FIFO 取 得 一 个 数据 */ 
{ 
int data; 
if (fifo->free == fifo->size) { 
/* 当 绥 冲 区 为 空 的 情况 下 返回 -1*/ 
return -1; 
} 
data = fifo->buf[fifo->q]; 
fifo->q++; 
if (fifo-> 
fifo->q 


= fifo->size) { 
ð; 


} 


fifo->free++; 


return data; 


} 


int fifo32_status(struct FIFO32 *fifo) 
/* 报 告 已 经 存储 了 多 少数 据 */ 
{ 


return fifo->size - fifo->free; 


} 


下 面 我 们 就 要 写 键盘 和 鼠标 的 相关 程序 了 。 我 们 不 
使 用 FIFO8， 而 是 改 为 使 用 FIFO32。 


本 次 的 keyboard.c 节 选 


struct FIFO32 *keyfifo; 
int keydataQ@; 


void init_keyboard(struct FIFO32 *fifo, int dataQ@) 
{ 
/* 将 FIFO 绥 冲 区 的 信息 保存 到 全 局 变量 里 */ 
keyfifo = fifo; 
keydata@ = data6 
/* 键盘 控制 器 的 初始 化 */ 
wait_KBC_sendready(); 
io_out8(PORT_KEYCMD, KEYCMD_WRITE_MODE) ; 
wait_KBC_sendready(); 
io_out8(PORT_KEYDAT, KBC_MODE) ; 
return; 


} 


void inthandler21(int *esp) 
{ 


int data; 

io_out8(PICO_OCW2, 0x61);  /* 把 IRQ-61 接 收 信号 结束 的 
信息 通知 给 PIC */ 

data = io_in8(PORT_KEYDAT); 

fifo32 put(keyfifo, data + keydata@) ; 

return; 


AS YR AJ mouse.c T Wt 


struct FIFO32 *mousefifo; 
int mousedataQ@; 


void enable_mouse(struct FIFO32 *fifo, int datad, 
struct MOUSE DEC *mdec) 


/* 将 FIF0 组 冲 区 的 信息 保存 到 全 局 变量 里 */ 
mousefifo = fifo; 
mousedata@ = dataQ; 


/* 鼠标 有 效 */ 

wait_KBC_sendready(); 

io_out8(PORT_KEYCMD, KEYCMD_SENDTO MOUSE) ; 
wait_KBC_sendready(); 

io_out8(PORT_KEYDAT, MOUSECMD_ ENABLE) ; 

/* 顺利 的 话 ，ACK(e@xfa) 会 被 发 送 */ 
mdec->phase = 6j /* 等 待 鼠 标的 9xfa 的 阶段 */ 
return; 


} 


void inthandler2c(int *esp) 


/* ZEFPS/2 MARAR */ 
{ 


int data; 

io_out8(PIC1_OCW2, 0x64);  /* 把 IRQ-12 接 收 信号 结束 的 
信息 通知 给 PIC1 */ 

io_out8(PIC@_OCW2, @x62); /* 把 IRQ-62 接 收 信号 结束 的 
言 息 通知 给 PIC8 */ 

data = io in8(PORT_KEYDAT); 

fifo32_put(mousefifo, data + mousedata@) ; 

return; 


|} tty 
修改 定时 器 结构 体 ， 让 它 也 能 使 用 FIFO32。 


本 次 的 bootpack.h 节 选 


struct TIMER { 
unsigned int timeout, flags; 
struct FIFO32 *fifo; 
int data; 


】 


本 次 的 timer.c 节 选 


void timer_init(struct TIMER *timer, struct FIFO32 
*fifo, int data) 


{ 
timer->fifo = fifo; 
timer->data = data; 
return; 

} 


void inthandler20(int *esp) 
{ 
int i, j; 
io_out8(PICO_OCW2, 0x60); /* 把 IRQ-66 接 收 信号 结束 的 
信息 通知 给 PIC */ 
timerctl.count++; 
if (timerctl.next > timerctl.count) { 
return; 
} 
for (i = ð; i < timerctl.using; i++) { 
/* 因为 timers 的 定时 器 都 处 于 运行 状态 ， 所 以 不 确认 
flags */ 
if (timerctl.timers[i]->timeout > 
timerctl.count) { 
break; 


} 

/* 超时 */ 

timerctl.timers[i]->flags = TIMER FLAGS ALLOC; 

fifo32_put(timerctl.timers[i]->fifo, 
timerctl.timers[i]->data); /* mH! */ 


} 
/* E EIT EN ARE S o BARREN A */ 


timerctl.using -= 1; 


for (j = 0; j < timerctl.using; j++) { 
timerctl.timers[j] = timerctl.timers[i + j]; 
} 
if (timerctl.using > 0) { 
timerctl.next = timerctl.timers[@]->timeout; 
} else { 
timerctl.next = Oxffffffff; 


} 


return; 


XF, RER LEMEN S o ma RIRKA 


bootpack.c. 


AS VR AY HariMain t iE 


struct FIFO32 fifo; 

char s[40]; 

int fifobuf[128]; 

CREK) 

fifo32 init(&fifo, 128, fifobuf); 

init_keyboard(&fifo, 256); 

enable_mouse(&fifo, 512, &mdec); 

io_out8(PICO_IMR, Oxf8); /* 设 定 PIT 和 PIC1 以 及 键盘 为 许可 
(11111000) */ 

io_out8(PIC1_IMR, Oxef); /* 设 定 鼠标 为 许可 (11161111) */ 


timer = timer_alloc(); 
timer_init(timer, &fifo, 10); 
timer_settime(timer, 1000); 
timer2 = timer_alloc(); 


timer_init(timer2, &fifo, 3); 
timer_settime(timer2, 300); 
timer3 = timer_alloc(); 
timer_init(timer3, &fifo, 1); 
timer_settime(timer3, 50); 


(中 上 略 》 


for (;;) { 
count++; 


io_cli(); 
if (fifo32_status(&fifo) == @) { 
io_sti(); 
} else { 
i = fifo32_get(&fifo) ; 
io_sti(); 
if (256 <= i && i <= 511) { /* 键盘 数据 */ 
sprintf(s, "%02X", i - 256); 
putfonts8_asc_sht(sht_back, ©, 16, 
COL8 FFFFFF, COL8 008484, s, 2); 
} else if (512 <= i && i <= 767) { /* 鼠标 数据 */ 
if (mouse _decode(&mdec, i - 512) != @) { 
/* GAUSS Be, MUB */ 
sprintf(s, "[lcr %4d %4d]", mdec.x, 


mdec.y); 

if ((mdec.btn & 0x01) != ð) { 
s[1] = 'L'; 

} 

if ((mdec.btn & 0x02) != 6) { 
s[3] = 'R’'; 

} 

if ((mdec.btn & 0x04) != ð) { 
s[2] = 'C'; 

} 


putfonts8 asc _sht(sht_back, 32, 16, 


COL8_FFFFFF, COL8 008484, s, 15); 

/* 鼠标 指针 的 移动 */ 

mx += mdec.X; 

my += mdec.y; 

if (mx < 0) 
mx = ð; 

} 

if (my < ©) 
my = ð; 

} 

if (mx > binfo->scrnx - 1) 
mx = binfo->scrnx - 1; 


} 


if (my > binfo->scrny - 1) 
my = binfo->scrny - 1; 


} 
sprintf(s, "(%3d, %3d)", mx, my); 
putfonts8_asc_sht(sht_back, ©, 0, 
COL8_FFFFFF, COL8 008484, s, 10); 
sheet_slide(sht_mouse, mx, my); 
} 
} else if (i == 10) { /* 16 秒 定时 器 */ 
putfonts8_asc_sht(sht_back, ©, 64, 
COL8 FFFFFF, COL8 008484, "1@[sec]", 7); 
sprintf(s, "%@10d", count); 
putfonts8_asc_sht(sht_win, 40, 28, 
COL8_000000, COL8 C6C6C6, s, 10); 
} else if (i == 3) { /* 3 秒 定时 器 */ 
putfonts8 asc _sht(sht_back, ©, 80, 
COL8_FFFFFF, COL8 008484, "3[sec]", 6); 
count = 0; /* 开始 测试 */ 
} else if (i == 1) { /* 光标 用 定时 器 */ 
timer_init(timer3, &fifo, 0); /* 下 面 是 设 定 6 
t7 
boxfill8(buf_back, binfo->scrnx, 


COL8_FFFFFF, 8, 96, 15, 111); 
timer_settime(timer3, 50); 
sheet_refresh(sht_back, 8, 96, 16, 112); 
} else if (i == 0) { /* 光标 用 定时 器 */ 
timer_init(timer3, &fifo, 1); /* 下 面 是 设 定 1 
ue 


boxfill8(buf back, binfo->scrnx, 
COL8 008484, 8, 96, 15, 111); 


timer_settime(timer3, 50); 
sheet_refresh(sht_back, 8, 96, 16, 112); 


哦 ， 经 过 修正 ，bootpack.c 简 化 成 了 198 行 ， 足 足 减 
少 了 8 行 呀 。 


下 面 我 们 执行 “make run”。 能 不 能 顺利 地 运行 呢 ? 
运行 正常 ， 太 好 了 ! 


memory 32MB tree : 29152KB 


10[sec] 
To counteR, 


0004587870 


D =i 
数字 也 在 增加 呀 ? | 


咖 ， 和 harib10c 相 比 ， 结 果 值 好 了 和 很多， 竟然 达到 
了 1.7 倍 。 


在 模拟 器 上 进行 比较 
harib10c:0002638668 
harib10g:0004587870 

这 个 结果 可 靠 吗 ? CBR Se ee ae BD) BS EK 
Windows 造 成 的 ) 。 我 们 还 是 在 真 机 上 运行 “make 
install* 看 看 吧 。 
在 真 机 上 进行 比较 


harib10c:0074643595 


harib10g:0099969263 


甜 距 是 1.3 倍 左右 。 虽 然 改善 幅度 没有 模拟 右上 大 ， 
但 的 的 确 确 是 改善 了 。 


我 们 来 想 想 这 是 为 什么 吧 。 seh 
快 ， 所 以 应 该 还 有 其 他 原因 。.…… 此 次 我 们 改写 

多 的 是 HariMain。 在 HariMain 里 ， ft rome 
句 和 查询 FIFO 组 冲 区 x 中 是 否 有 数据 这 两 个 操作 ， 

多 次 交互 进行 的 。 这 次 修改 以 后 ， 程 序 只 需要 看 1 ， 


个 FIFO 缓 冲 区 就 行 了 ， 而 以 前 要 看 3 个 。 也 就 是 
说 ，FIFO 绥 冲 区 的 查询 能 够 更 快 完成 ， 从 而 使 
得 “count++;” 语 句 执 行 的 次 数 更 多 。 


程序 精简 了 ， 速 度 还 变 快 了 ， 太 好 了 。 


5 HUE FETARE (4) Charib10h) 


RATE A AR EMER RA MER EN #8 R TIE 
吧 。 现 在 最 让 我 们 费心 的 是 inthandler20 中 最 后 的 移 
位 处 理 和 timer_settime 中 的 移 位 处 理 。timer_settime 
虽然 不 是 中 断 处 理 程序 ， 但 毕 葛 是 在 中 断 禁 止 期 间 
进行 的 ， 所 以 必须 要 迅速 完成 。 如 果 像 现在 这 样 ， 
使 用 的 定时 堪 只 有 3 个 ， 用 目前 的 处 理 方 式 还 没 什 
么 问题 。 可 当 我 们 面 对 多 任务 时 ， 很 多 应 用 程序 同 
时 运行 ， 每 个 应 用 程序 都 使 用 定时 器 ， 此 时 如 果 还 
是 使 用 移 位 处 理 的 话 ， 束 有 点 浪费 时 则 了 了。 


在 FIFO 里 有 一 个 取代 移 位 处 理 的 方法 : 读 取 一 个 数 
据 以 后 不 是 让 后 面 的 数据 问 前 靠 章 ， 而 是 改变 下 一 
次 的 数据 读 取 地 址 。 这 是 一 个 很 巧妙 的 方法 ， 但 不 
适用 于 定时 器 。 因 为 从 timers[ ] 中 去 除 超时 的 中 晰 
时 ， 这 个 方法 虽然 不 错 ， 但 问题 在 于 ， 用 
timer_settime 登 录 中 断 时 ， 后 面 的 中 断 必 须 后 移 ， 
{ECs VE AS Aas 


因此 笔者 再 介绍 一 个 新 方法 。 


下 面 ， 我 们 在 结构 体 struct TIMER 中 加 入 next 变 


量 。 这 是 个 地 址 变量 ， 用 来 存放 下 一 个 即将 超时 的 
定时 天 的 地 址 。 


本 次 的 bootpack.h 节 选 


struct TIMER { 
struct TIMER *next; 
unsigned int timeout, flags; 


struct FIFO32 *fifo; 
int data; 


我 们 还 是 用 下 面 的 示意 图 来 说 明 结 构 体 struct 
TIMER。 


next 
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想 ， 这 样 的 图 有 什么 用 呢 ? 图 示 的 方法 


有 助 于 理解 ， 所 以 请 大 家 坚持 看 下 去 。 


那么 ， 试 着 按照 这 段 内 容 ， 修 改定 时 右 的 中 断 处 理 
程序 吧 。 


利用 next 的 inthandler20 函 数 


void inthandler2@(int *esp) 
{ 


int i; 
struct TIMER *timer; 
io_out8(PIC@ OCW2, 0x60); /* 把 IRQ-66 接 收 信号 结束 的 
言 息 通 知 给 PIC */ 
timerctl.count++; 
if (timerctl.next > timerctl.count) { 
return; 
} 
timer = timerctl.timers[@]; /* 首先 把 最 前 面 的 地 址 赋 给 
timer */ 
for (i = ð; i < timerctl.using; i++) 
/* 因为 timers 的 定时 器 都 处 于 运行 状态 ， 所 以 不 确认 
flags*/ 
if (timer->timeout > timerctl.count) { 
break; 


} 

/* 超时 */ 

timer->flags = TIMER_ FLAGS ALLOC; 

fifo32 put(timer->fifo, timer->data); 

timer = timer->next; /* 下 一 定时 器 的 地 址 赋 给 timer 


timerctl.using -= i; 


/* 新 移 位 */ 


timerctl.timers[@] = timer; 


/* timerctl.next 的 设 定 */ 
if (timerctl.using > 0) { 

timerctl.next = timerctl.timers[@]->timeout; 
} else { 

timerctl.next = Oxffffffff; 


} 


return; 


移 位 部 分 暂时 放 一 放 ， 大 家 先 看 一 下 超时 的 处 理 。 
和 以 前 不 同 ， 对 于 timers[ ] 数 组 而 言 ， 除 了 timers[0] 
以 外 其 他 完全 是 没有 必要 的 。 这 一 点 是 重 中 之 重 。 


如 果 不 雷 要 超时 人 处理 ， 还 认真 地 去 做 移 位 处 理 束 完 
全 没有 道理 了 。 所 以 在 移 位 处 理 中 只 改写 


timers[0]. 


PTT 
下 面 修 改 timer _settime 困 数 了 。 


利用 next 之 后 的 timer_settime 


void timer settime(struct TIMER *timer, unsigned int 
timeout) 


{ 


int e; 

struct TIMER *t, *s; 

timer->timeout = timeout + timerctl.count; 

timer->flags = TIMER _FLAGS USING; 

e = io load eflags(); 

io_cli(); 

timerctl.using++; 

if (timerctl.using == 1) { 
/* 处 于 运行 状态 的 定时 器 只 有 这 一 个 时 */ 
timerctl.timers[@] = timer; 
timer->next = 0; /* 没有 下 一 个 */ 
timerctl.next = timer->timeout; 
io_store_eflags(e); 
return; 

} 

t = timerctl.timers[@]; 

if (timer->timeout <= t->timeout) { 
/* 插入 最 前 面 的 情况 下 */ 
timerctl.timers[@] = timer; 
timer->next = t; /* 下 面 是 七 */ 
timerctl.next = timer->timeout; 
io_store_eflags(e); 
return; 


} 
/* 搜寻 插入 位 置 */ 


for (33) { 
s = t; 
t = t->next; 
if (t == @) { 


break; /* 最 后 面 */ 
} 


if (timer->timeout <= t->timeout) { 
/* 插入 到 s 和 t 之 间 时 */ 


s->next = timer; /* s 的 下 一 个 是 timer 


timer->next = t; /* timer 的 下 一 个 是 七 */ 


io_store_eflags(e) ; 
return; 


} 
} 
/* 插入 最 后 面 的 情况 下 */ 


s->next = timer; 
timer->next = Q; 
io_store_eflags(e); 
return; 


程序 还 是 弯 长 了 。 变量 t 是 从 头 开 始 对 timers[ ] 进 行 
通 历 用 的 ， 而 s 用 来 保存 前 一 个 t 值 。t 是 timer 的 省 略 
(timer 这 个 变量 名 已 经 被 使 用 了 )〉 ， 而 $ 是 英文 字 

母 表 中 t 的 前 一 个 字母 。 


判断 一 下 顺序 ， 如 果 我 们 知道 了 搬入 的 位 置 《〈 即 知 
道 了 在 s 和 t 中 间 插 入 的 话 ) ， 就 可 以 像 下 图 那样 把 
数据 重新 连接 起 来 。 也 残 是 仅仅 改变 s 一 >next 和 
timer 一 >next 的 值 束 可 以 了 。 看 看 下 图 可 能 会 更 容 
易 理 解 。 


< 知道 插入 位 置 的 瞬间 > 


next next 


< 重新 连接 起 来 后 > 


这 样 束 可 以 不 进行 移 位 了 。 我 们 成 功 了 ! MEMA 
使 用 很 多 定时 器 ， 速 上 度 也 不 会 变 慢 了 。 


这 里 再 说 几 人 句 题 外 话 。 笔 者 写 了 后 面 很 多 章 之 后 
再 回 过 头 来 读 这 上 段 程 序 ， 才 训 得 timer 一 >next 和 和 
timerctl.next 很 容易 混淆 。timer 一 >next 是 指 下 一 个 
定时 器 的 地 址 ， 而 timerctl.next 是 指 下 一 个 超时 的 
时 刻 。 所 以 有 点 后 悔 ， 如 果 当 初 将 它们 分 别 命 名 
为 next_timer 和 next _ time 就 好 理解 多 了 。 


笔者 没有 修改 主要 是 受到 出 版 时 间 的 限制 〉， 
大 家 如 果 能 代笔 者 修改 一 下 就 最 好 了。 或 者 大 家 
读 这 段 程 序 时 ， 移 在 脑海 里 目 己 修改 一 下 ， 然 后 


再 读 ， 也 许 更 有 助 于 理解 。 


话说 到 这 里 ，timers[ ] 已 经 不 需要 了 。 不 过 不 是 全 
都 不 要 ， 最 前 面 的 timers[0] 还 是 要 保留 的 ， Cri 
的 部 分 都 没有 用 了 。 因 此 我 们 来 市 挤 这 些 数据 。 

有 1 个 timers[0] 的 话 ， 束 没 必 要 加 [ ] 了， 
名 字 定 义 为 t0 好 了 了。 


本 次 的 bootpack.h 节 选 


struct TIMERCTL { 
unsigned int count, next, using; 
struct TIMER *t®@; 
struct TIMER timers@[MAX_TIMER]; 


}; 


相应 地 ， 也 要 把 刚才 写 的 inthandler20 和 
timer_settime 中 的 timers[0] 也 改写 为 {0。 改 写 后 的 程 
序 ， 没 有 写 在 这 里 ， 如 末 想 看 的 话 ， 可 以 浏览 附 栅 
光盘 中 的 文档 。 


好 了 ， 这 样 应 该 可 以 顺利 运行 了 吧 。 应 该 没 问 题 
MW), Tt. BASKET. RAINE T “make 
run” 看 看 。 哦 ， 运 行 成 功 ! 


虽然 我 们 还 是 不 知道 速度 是 侣 变 快 了 了， 还 是 很 满足 


CART) 。 但 是 总 感 澳 数值 变 关 了， 难道 


Ti? 


6 使 用 “哨兵 ”简化 程序 Charib10i) 


标题 中 略 显 突 元 的 “哨兵 ”一 词 ， 其 实 是 程序 技巧 中 
的 专门 用 语 。 一 般 来 讲 ， 说 到 “哨兵 ”， 大 家 会 想到 
巡逻 的 士兵 。 可 一 旦 大 家 知道 了 这 项 拉 术 的 内 容 ， 
肯定 会 认为 这 个 名 字 取 得 太 好 了 。 总 之 笔者 认为 这 
是 一 个 很 棒 的 名 称 。 


顺便 说 一 下 ， 上 一 市 的 搁 术 称 为 “线性 表 ” (linear 
list) 。 可 笔者 党 得 这 个 名 字 不 太 容 易 理 解 。 其 实 
EMBIS, BAT AR LE 
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TTTT 
harib10h 的 timer.c 程 序 在 去 除 移 位 处 理 后 ， 其 中 的 
timer_settime 疯 数 还 是 有 些 风 长。 浓缩 的 才 是 精 
华 ， 我 们 来 想 办 法 简化 这 个 程序 。 

我 们 看 看 程序 束 会 发 现 ， 其 中 有 4 种 可 能 : 
。 运 行 中 的 定时 器 只 有 一 个 的 情况 


。 插 入 到 最 前 面 的 情况 
。 插 入 到 s 和 t 之 间 的 情况 
。 插 入 到 最 后 面 的 情况 


“既然 有 这 么 多 种 情况 ， 当 然 要 加 各 种 条 件 ， 程 序 
长 了 后 也 没 办 法 ”"， 大 家 可 不 能 这 样 轻易 放 佐 。 如 
果 是 因为 有 4 种 可 能 才 使 程序 变 复 杂 了 的 话 ， 那 我 
们 想 办 法 消除 这 4 种 可 能 性 不 束 行 了 吗 ? 


我 们 来 看 看 具体 的 做 法 。 在 进行 初始 化 的 时 候 ， 将 
时 刻 0xffffffff 的 定时 器 连 到 最 后 一 个 定时 器 上 。 虽 
然 我 们 偷 了 点 懒 没 有 设 定 fifo 等 ， 但 不 必 担 心 。 反 
正 无 论 如 何 都 不 可 能 到 达 这 个 时 刻 ( 在 到 达 之 前 会 
修改 时 刻 ) ， 上 所 以 不 可 能 发 后 超 时 间 题 。 它 一 直 处 
于 后 面 ， 只 是 个 附带 物 ， 是 个 留 下 来 看 家 的 留守 
者 。 这 个 留守 者 正 是 “哨兵 “。 


加 入 了 哨兵 


void init_pit(void) 


int i; 

struct TIMER *t; 

io _out8(PIT_CTRL, 0x34); 
io _out8(PIT_CNT@, @x9c); 
io _out8(PIT_CNT@, @x2e); 
timerctl.count = ð; 


for (i = 6; i < MAX_TIMER; i++) { 
timerctl.timers@[i].flags = 0; /* 没有 使 用 */ 

} 

t = timer_alloc(); /* 取得 一 个 */ 

t->timeout = Oxffffffff; 

t->flags = TIMER_FLAGS USING; 

t->next = 6; /* 末尾 */ 

timerctl.t@ = t; /* 因为 现在 只 有 哨兵 ， 所 以 他 就 在 最 前 面 
7 


timerctl.next = OxfffffffF; /* 因为 只 有 哨兵 ， 所 以 下 一 
个 超时 时 刻 就 是 哨兵 的 时 刻 */ 

timerctl.using = 1; 

return; 


如 果 使 用 在 12.5 市 中 介绍 的 一 年 调整 一 次 时 刻 的 程 
序 ， 束 必须 修改 程序 来 保证 不 改变 哨兵 的 时 刻 。 比 
如 改写 成 下 面 这 样 : 


哨兵 的 时 刻 调整 程序 


int tð = timerctl.count; /* 所 有 的 时 刻 都 要 减 去 这 个 值 */ 
io_cli(); /* 在 时 刻 调 整 时 禁止 中 断 */ 
timerctl.count -= t@; 
for (i = @; i < MAX_TIMER; i++) { 
if (timerctl.timer[i].flags == TIMER_FLAGS USING) { 
if (timerctl.timer[i].timeout != @xffffffff) { 


} 


timerctl.timer[i].timeout -= tð; 


} 
} 


io_sti(); 


| if | yy E 
由 于 加 入 了 哨兵 ，settime 的 状况 束 变 了 。4 种 情况 
中 有 2 种 情况 是 绝对 不 会 发 生 的 。 《下面 的 第 1 种 和 
第 4 种 ) 


EF} 于 运行 中 的 定时 右 只 有 这 1 个 的 情况 (因为 有 
哨兵 ， 所 以 最 少 应 该 有 2 个 ) 


。 插入 最 前 面 的 情况 

。 插 入 s 和 t 之 间 的 情况 

。 插 入 最 后 的 情况 《哨兵 总 是 在 最 后 ) 
所 以 程序 能 简化 不 少 ， 纵 短 了 16 行 。 


精简 后 的 timer_settime 


void timer settime(struct TIMER *timer, unsigned int 
timeout) 


{ 


int e; 

struct TIMER *t, *s; 

timer->timeout = timeout + timerctl.count; 
timer->flags = TIMER _FLAGS USING; 

e = io load eflags(); 

io_cli(); 

timerctl.using++; 

t = timerctl.t@; 


if (timer->timeout <= t->timeout) { 
/* 插入 最 前 面 的 情况 */ 
timerctl.t@ = timer; 
timer->next = t; /* 下 面 是 设 定 t */ 
timerctl.next = timer->timeout; 
io_store_eflags(e); 
return; 


} 
/* 搜寻 插入 位 置 */ 
for (;;) { 
s = t; 
t = t->next; 
if (timer->timeout <= t->timeout) { 
/* 插入 s 和 t 之 间 的 情况 */ 


S->next = timer; /* s 下 一 个 是 timer */ 


timer->next = t; /* timer 的 下 一 个 是 t */ 
io_store_eflags(e); 
return; 


MERINA F BE fal (Linthandler20es20 y > FER EA 
的 部 分 。 


稍稍 精简 了 的 inthandler20 


void inthandler2@(int *esp) 


int i; 


struct TIMER *timer; 
io_out8(PIC@ OCW2, 0x60); /* 把 IRQ-66 接 收 信号 结束 的 
信息 通知 给 PIC */ 
timerctl.count++; 
if (timerctl.next > timerctl.count) { 
return; 
} 
timer = timerctl].t@; /* 首先 把 最 前 面 的 地 址 赋 给 timer 
4 
for (i = ð; i < timerctl.using; i++) { 
/* 因为 timers 的 定时 器 都 处 于 运行 状态 ， 所 以 不 确认 
flags */ 
if (timer->timeout > timerctl.count) { 
break; 
} 
/* 超时 */ 
timer->flags = TIMER FLAGS ALLOC; 
fifo32_put(timer->fifo, timer->data); 
timer = timer->next; /* 将 下 一 定时 器 的 地 址 代入 
timer*/ 
} 


timerctl.using -= 1; 


/* 新 移 位 */ 


timerctl.t@ = timer; 


/* timerctl.next 的 设 定 */ /* 这 里 ! */ 
timerctl.next = timerctl.t@->timeout; 
return; 


修改 到 这 里 以 后 ，using 就 没什么 用 处 了 。.…… 


using 以 前 用 于 对 运行 中 的 定时 器 进行 计数 。 那 时 还 
使 用 数组 timers[ ] ，using 起 过 非常 大 的 作用 ， 它 帮 
助 我 们 记录 timers[ ] 已 被 使 用 到 了 哪个 位 置 。 另 

外 ， 在 不 使 用 数组 timers[ ] 后 ， 根 据 它 是 否 变 为 0， 
我 们 才能 决定 应 该 怎样 设 定 next。 但 是 现在 有 了 哨 
兵 ， 就 不 会 出 现 using 为 0 的 情况 了 。 


所 以 ， 我 们 就 让 using 光 采 退 休 吧 。 再 见 了 ， 

using. H-A REDRA EAER RIAS 
不 记 你 的 .…... 这 当然 是 玩笑 啦 ， 笔 者 可 没 那 么 聪明 
能 一 直 记 住 不 再 使 用 的 变量 。 正 所 谓 ,“ 一 切 都 是 
过 眼 云烟 ， 什 么 都 是 浮云 ! ”。ByeBye，using ! 
(KX) 。 


这 样 一 来 ，inthandler20 就 变 得 更 清 碍 整洁 了 。 


本 次 的 timer.c 节 选 


void inthandler2@(int *esp) 
{ 


struct TIMER *timer; 

io_out8(PIC@_OCW2, 0x60); /* 把 ITRQ-66 接 收 信 号 结束 的 
信息 通知 给 PIC */ 

timerctl.count++; 

if (timerctl.next > timerctl.count) { 


return; 
} 
timer = timerctl.to; /* 首先 把 最 前 面 的 地 址 赋 给 timer*/ 
for (;;) { 


/* 因为 timers 的 定时 句 都 处 于 运行 状态 ， 所 以 不 确认 


flags */ 
if (timer->timeout > timerctl.count) { 
break; 


} 
/* 超时 */ 
timer->flags = TIMER_FLAGS_ ALLOC; 
fifo32_put(timer->fifo, timer->data) ; 
timer = timer->next; /* 将 下 一 个 定时 器 的 地 址 赋 给 
timer*/ 
} 
timerctl1.t0 = timer; 
timerctl.next = timer->timeout; 
return; 


我 们 进一步 从 settime 中 删除 “timerctLusing++;”， 从 
init_ pit 中 删除 “timerctl.using=1; ”. W, {RR 
WF 


那么 今天 的 任务 到 此 就 结束 了 。 为 了 确认 结果 ， 我 
们 当然 要 运行 “make run” 了 。 运 行 结果 很 正常 。 
HAL. 但 是 与 harib10g 比 较 起 来 ， 结 果 值 还 是 不 太 
理想 。 怎 么 回 事 呢 。 如 果 在 真 机 上 运行 ， 是 不 是 效 
果 一 样 呢 ? 


free : 29152KB 


10sec ] 
To counteR, 


0003493325 


AA AB ACTS I ? 


虽然 很 想 摘 清楚 原因 ， 不 过 都 已 经 这 个 时 间 了 ， 所 
以 今天 束 先 到 这 里 吧 。 我 们 明天 再 仔细 思考 。 


第 14 天 ”高 分 状 率 及 键盘 输入 


。 继续 测 试 性 能 Chariblla~ harib11c) 
。 提 高 分 辨 率 (1) (harib11d) 

。 提 高 分 辨 率 (2) (hariblle) 

o EAA (1) (harib11f) 

。 键 租 输 入 〈2) Charib11g) 

e EWN (1) (harib11h) 

。 追 记 内 容 (2) (harib11i) 


1 继续 测试 性 能 Chariblla ~ 
hariblic) 


昨天 的 harib10i 程 序 的 执行 结 有 末 ， 让 笔者 很 不 甘 
心 ， 所 以 一 早 赶紧 在 真 机 上 运行 一 下 ， 看 看 效果 。 


真 机 上 的 运行 结果 比较 
harib10g: 0099969263 
harib10i: 0099969264 


哦 ， 几 乎 没什么 不 同 。 看 来 数值 变 小 好 像 是 由 于 模 
拟 器 的 原因 (Windows 的 原因 ?)〉 。 程 序 本 身 并 没有 


问题 ， 暂 时 松 了 一 口气 。 


虽然 放心 了 一 些 ， 但 终究 还 是 不 满意 。 速 度 没 有 变 
fe, RAS Ata. (ARATE SEAR, MSE 
种 修改 之 后 ， 与 harib10g 比 较 起 来 ， 速 度 却 完 全 没 
有 变 快 ， 大 家 不 觉得 很 不 甘心 吗 ? 至 少 笔者 很 不 甘 
ey. 


然而 当 我 们 仔细 思考 一 下 后 ， 会 发 现 harib10h 的 改 
进 之 处 在 于 “消除 了 移 位 处 理 ”。 也 就 是 说 ， 对 于 发 
生 很 多 “ 移 位 ?的 情况 ， 改 进 应 该 是 有 效果 的 。 只 有 


在 大 量 使 用 定时 需 的 时 候 ， 才 会 发 生 很 多 “ 移 位 ”。 
如 今 只 使 用 3 个 定时 左 ， 看 不 到 改进 效 泉 也 是 理 所 
当然 的 。 所 以 ， 如 果 我 们 特意 使 用 大 量 定时 占 ， 然 
后 进行 性 能 比较 ， 改 进 效果 或 许 能 让 人 满意 
( 笑 ) 。 


既然 这 样 ， 我 们 束 赶 快 试 一 下 吧 。 在 timer.c 中 ， 最 
多 可 以 设 定 500 个 定时 器 。 设 定 起 动 50 天 后 ! 才 超时 
的 定时 器 490 个 左右 ， 使 得 50 天 后 ， 每 隔 1 秒 就 有 一 
个 定时 器 超时 。 设 定 这 么 多 定时 器 以 后 ， 有 没 

有 “ 移 位 ”>， 束 能 从 数字 上 看 出 来 。 


“为 什么 是 50 天 后 呢 ? 因为 我 们 并 不 考虑 定时 器 
超时 的 情况 ， 所 以 为 了 不 让 其 超时 ， 先 暂时 设 定 
为 50 天 。 虽 然 设 成 1 天 以 后 也 可 以 ， 但 如 果 谁 局 动 
后 一 直 开 着 ， 任 其 运行 的 话 ， 可 能 会 造成 超时 而 
导致 误 操 作 ， 所 以 还 是 设 为 50 天 吧 。 


本 次 的 bootpack.c 节 选 


void set49@(struct FIFO32 *fifo, int mode) 
{ 


int i; 
struct TIMER *timer; 
if (mode != 0) { 
for (i = ðO; i < 490; i++) { 


timer = timer_alloc(); 
timer_init(timer, fifo, 1024 + i); 
timer_settime(timer, 100 * 60 * 60 * 24 * 
50 + i * 100); 
} 
} 


return; 


还 有 ， 在 设 定 HariMain 的 timer~timer3 之 前 ， 要 先 
加 入 “set490 (&fifo,1) ; ”语句 。 这 样 就 可 以 追加 
490 个 定时 器 了 。 


那么 ， 我 们 在 timer.c 中 作出 各 种 设 定 ， 分 别 运 

行 “make installj”， 比 较 它 们 在 真 机 上 运行 的 结果 。 

另外 ， 还 可 以 将 “set490 (&fifo,1) ; ”替换 

成 “set490 (&fifo,0) ”， 或 者 是 什么 语句 也 不 加 入 
〈 即 不 修改 造 ) ， 然 后 测定 它们 在 真 机 上 的 运行 结 
果 。 我 们 分 别 运 行 5 次 ， 取 平均 值 归 纳 如 下 。 


真 机 上 运行 结果 的 比较 


1. 追加 490 个 定时 器 时 的 值 set490 (&fifo, 1) ; 


harib11a:0096521077...... harib16g 里 加 
入 set496 的 时 候 ( 有 移 位 ) 


harib11b:0096522038...... harib1oh 里 加 
入 set496 的 时 候 ( 没 有 移 位 、 没 有 哨兵 ) 


harib11c:0096522097...... harib16i 里 加 
入 set496 的 时 候 ( 没 有 移 位 、 有 哨兵 ) 


2. 不 人 妃 加 490 个 定时 器 时 的 值 set490 (&fifo, 0) ; 


harib11a:0096522095...... harib16g 里 加 
入 set496 的 时 候 ( 有 移 位 ) 


harib11b :0096522638...... harib1oh 里 加 
入 set496 的 时 候 ( 没 有 移 位 、 没 有 哨兵 ) 


harib11c :0096522101...... harib16i 里 加 
入 set496 的 时 候 ( 没 有 移 位 、 有 哨兵 ) 


3. BS: 不 加 入 set490 语 句 时 的 值 
harib16g:6699969263......( 有 移 位 ) 


harib16h:6699969184......( 没 有 移 位 、 没 有 
哨兵 ) 


harib1@i :@099969264...... (没有 移 位 、 有 哨 
兵 ) 


让 我 们 好 好 观察 一 下 这 个 结 末 吧 。 


首先 观察 一 下 (人 ， 也 就 是 妃 加 490 个 定时 器 的 情 
况 。 取 消 移 位 则 速度 变 快 《〈 差 是 961) 。 可 以 看 
出 ， 线 性 表 对 于 性 能 改善 有 效果 。 太 好 了 ! 而 且 使 
用 哨兵 也 有 效果 ， 虽 然 只 是 一 点 点 ， 但 速度 还 是 变 
KRY (47259) 。 使 用 哨兵 不 仅 精 简 了 程序 ， 也 加 
快 了 速度 ， 一 举 两 得 。 


再 观察 一 下 (2) 也 就 是 不 追加 490 个 定时 器 的 情况 。 

没有 哨兵 时 ， 取 消 移 位 反而 导致 速度 变 慢 〈 差 是 

57) 。 而 使 用 哨兵 时 取消 移 位 ， 速 度 就 可 以 人 妃 上 了 
(虽然 也 可 以 说 是 “超过 ”， 不 过 只 超 了 6， 所 以 还 
是 说 “相同 ” 吧 ) 。 


男 一 方面 ， 我 们 比较 一 下 (1) 的 haribl1c 和 (2) 的 
harib1lc。 结 果 值 几乎 一 样 。 在 这 个 没有 移 位 的 方 
法 中 ， 无 论 使 用 的 定时 器 的 数量 是 多 少 ， 性 能 都 没 
有 变化 。 至 于 harib11a， 因 为 定时 器 的 数量 差别 ， 
性 能 上 的 差异 会 达到 1018〈 计 数 结果 差别 是 

1018) 。 而 harib11b 好 像 也 与 定时 器 的 数量 无 关 。 
因此 我 们 取消 移 位 是 正确 的 。 

最 后 我 们 看 一 下 (3) 的 结果 。 由 于 取消 了 移 位 ， 性 能 
( 即 计数 结果 ) 上 有 有 79 左右 的 下 降 ， 不 过 使 用 了 哨 
兵 就 能 恢复 性 能 。 


但 是 ， 对 于 (2) 和 (3)， 处 理 上 虽然 完全 相同 ， 而 结 
果 却 相差 了 345 万 左右 。 这 个 差别 实在 是 太 大 了 ， 
不 可 思议 。.,.;... 到 压 怎 么 回 事 儿 呢 ?这 不 是 程序 内 
容 的 问题 ， 而 是 C 编 译 器 的 问题 。 实 际 上 ， 由 于 跳 
转 目 标 地 址 不 同 ，CPU 的 JMP 指 令 执 行 的 时 钟 周期 
数 也 不 相同 。 在 HariMain 中 ， 循 环 执 

行 “count++; ”的 for 语 名 虽然 最 终 被 编译 为 JMP 指 令 
执行 ， 但 如 果 前 面 加 上 “set490 (&fifo,0) ; ” 语 
名， 那么 以 后 各 个 指令 的 地 址 也 都 会 相应 地 错开 几 
个 字 节 ， 结 果 造 成 JMP 指 令 的 地 址 也 略 有 变化 。 
此 执行 时 间 也 稍稍 延迟 ， 执 行 结果 大 约 变 差 了 
3%。 

for 语 句 被 编译 后 的 结果 

for(;;) { L2: 


count++; count++; 


任意 语句 ; -> {ERIE ;W 


} 


JMP L2 
这 个 L2 的 地 址 一 旦 变化 ，JMP 的 执行 时 间 就 变化 ! 


这 一 次 虽然 执行 速度 慢 了 ， 但 也 有 时 候 ， 妃 加 命令 
以 后 ， 会 变 快 。 如 果 用 nask 来 编写 HariMain，JMP 
令 的 跳 转 目 标的 地 址 可 以 根据 情况 目 动 调整 ， 这 
个 问题 束 不 会 发 生 了 。 但 仅仅 是 为 了 达到 这 个 目的 
( 即 确认 JMP 地 址 能 自动 调整 ， 以 达到 自我 满足 的 
目的 ) ， 而 用 nask 来 改写 HariMain 的 话 ， 就 有 些 劳 


师 动 众 了 ， 上 所 以 这 次 我 们 没 做 。 


再 来 跟 大 家 说 一 段 插曲 吧 。 最 初 笔 者 只 创建 了 程 
序 (1) 和 (3)。 看 到 (1) 的 haribl11c 和 (3) 的 harib10i 的 结 
果 竟 然 有 痢 如 此 巨大 的 差异 ， 笔 者 也 是 出 了 一 刁 
冷汗 。 笔 者 之 前 的 预测 是 ， 不 使 用 移 位 而 使 用 哨 
兵 有 的 话 ， 即 使 定时 器 的 数目 再 多 ， 执 行 时 间 也 不 
应 该 有 什么 变化 。 但 结果 却 出 平 意料 。 为 此 笔者 
几乎 认定 timer.c 中 有 bug， 并 兰 恼 了 好 几 个 小 时 
CEE) 。 最 后 ， 笔 者 怎么 想 都 党 得 timer.c 没 有 
问题 ， 于 是 就 去 查看 bootpack.c 编 译 而 成 的 机 械 语 
言 (bootpack.lst) 。 经 过 比较 才 想 起 ， 原 来 JMP 
指令 跳 转 目 标的 地 址 不 同 ， 执 行 时 间 也 不 相同 。 
因此 笔者 立即 创建 了 动作 与 (3) 相 同 而 JMP 指 令 的 
地 址 不 变 的 程序 (2)， 并 进行 了 测定 。 


令 人 高 兴 的 是 ， 这 样 做 之 后 ， 结 果 正如 笔者 最 禄 
所 预想 的 那样 ， 在 “无 移 位 十 哨兵 ”的 情况 下 ， 即 
使 定时 器 的 数目 变化 了 ， 处 理 速度 也 不 变 。 真 是 
太 好 了 。 之 前 笔者 还 老 担心 是 否 要 改写 昨天 的 内 
容 呢 。 


COLUMN-8 如 此 细微 的 改进 有 意义 吗 ? 


前 天 和 上 昨天 我 们 对 timer.c 进 行 了 改进 ， 又 是 使 用 
timers[ ]， 又 是 使 用 线性 表 ， 还 使 用 了 哨兵 ， 花 了 


不 少时 间 。 可 得 到 的 改善 只 有 一 后 点 。 


0096521077 — 0096522097 在 (1) 中 ，haribi11la 
+ harib11c 


甜 值 只 有 1020， 这 个 差 值 和 整体 性 能 相 比 只 有 可 
怜 的 0.001%。 


有 人 会 注意 到 0.001% 吗 ? 我们 买 瓶装 饮料 的 时 
候 ， 假 设 丙 店 的 货架 上 ， 有 一 瓶 比 其 他 的 多 出 一 
润 ， 会 有 人 真正 考虑 那 是 哪 一 瓶 吗 ? 我 们 这 里 谈 
到 的 0.001%， 简 直 就 像 2 升 的 饮料 多 出 来 的 一 滴 
Pee a tices, 再 举 个 更 实际 的 例子 ， 一 件 工作 需要 1 
个 小 时 完成 ， 为 了 早 完成 0.9 秒 ， 你 愿意 下 这 么 大 
TR? 


ZRH AE A Eh 77 SEAS ERE EBAY, «TE 
是 说 ， 要 想 加 快 整体 上 的 速度 ， 不 应 该 去 做 这 种 
费力 不 讨好 的 事 ， 而 应 该 把 精力 集中 在 简单 而 效 
果 明 显 的 方法 上 ， 比 如 将 FIFO8 改 成 FIFO32 〈 效 
果 有 1.3 倍 吧 ) 。 


但 是 希望 大 家 回想 一 下 ， 现 在 我 们 不 是 在 加 快 整 
体 的 动作 速度 ， 而 是 一 直 在 努力 缩短 哪 人 是 一 点 
点 的 中 断 鞭 止 时 间 。 我 们 真正 想 实现 的 是 这 样 的 
操作 系统 : 一 按 下 按键 立即 就 有 有 反应， 一 动 鼠 标 


并 即 就 有 有 反应， 一旦 设 定 了 动作 的 时 间 扣 就 会 在 
那个 时 间 点 动作 (没有 些许 的 延迟 )。 


这 里 我 们 讨论 的 1020 这 个 差 ， 恰 好 束 意 味 着 中 断 
禁止 时 间 缩 短 了 。 也 束 是 说 ， 系 统 对 中 断 的 反应 
能 力 提 高 了 。 即 使 是 在 不 凑巧 ， 很 多 中 断 几 乎 同 
时 发 生 的 情况 下 ， 系 统 也 能 够 更 快 地 对 这 些 中 断 
要 求 做 出 反应 。 要 是 从 这 一 点 来 考虑 的 话 ，1020 
ee 


2 提高 分 辨 率 (1) (harib11d) 


从 着 手 “ 自 制 操作 系统 ”到 现在 ， 不 知 不 觉 间 已 经 过 
去 2 周 了 。 有 的 读者 朋友 读 到 这 里 ， 可 能 已 经 花 了 
更 长 的 时 间 ; 也 有 的 朋友 ， 经 过 努力 也 可 能 只 用 了 
一 周 左右 就 读 到 了 这 里 。 


笔者 认为 ， 开 及 一 个 操作 系统 需要 一 些 必 备 知识 ， 
像 编 程 语言 的 知识 ， 相 关 算 法 和 技巧 等 。 到 现在 为 
止 ， 这 些 知识 的 介绍 就 结束 了 。 知 站 了 这 些 ， 今 后 
只 要 灵活 运用 前 儿 半 的 学 习 内 容 ， 束 可 以 开 友 出 不 
错 的 操作 系统 了 。 到 现在 为 止 的 学 习 过 程 党 得 怎么 
样 ? 回 过 头 来 想 一 想 ， 如 末 大 家 有 什么 不 明日 的 内 
容 ， 也 许 趁 看 现在 就 并 清楚 比较 好 。 


那么 我 们 赶快 把 “ 纸 娃娃 操作 系统 ”做 得 更 像 一 个 真 
正 的 操作 系统 吧 。 大 家 现在 可 以 接触 多 任务 了 。 可 
是 按 计 划 ， 我 们 是 从 第 15 天 开始 才学 习 多 任务 的 ， 
所 以 今天 还 是 暂时 不 学 习 多 任务 吧 。 


笔者 如 宋 想 休 轧 了， 可 以 跟 大 家 说 “今天 就 学 到 这 
EIE (K) ”可 读者 朋友 们 肯定 会 觉得 “没什么 意 
思 呀 ”，， 所 以 还 是 学 点 儿 别 的 吧 。 嗯 ， 和 学 扣 儿 什 么 
Me? 好 吧 ， 残 学 提高 画面 分 辨 率 吧 。 


从 开发 操作 系统 的 角度 来 看 ， 现 在 这 样 的 320x200 
的 画面 也 没什么 问题 ， 可 毕竟 还 是 大 画面 好 。 以 
前 ， 我 们 特意 创建 了 struct BOOTINFO， 就 是 为 了 
能 在 以 后 扩大 画面 。 那 时 我 们 没有 写成 <320”， 而 
是 特意 写成 了 “binfo 一 > xsize” 这 种 很 访 烦 的 方式 。 
这 种 厂 烦 辛苦 ， 现 在 终于 得 到 了 回报 。 


高 分 辩 这 的 利用 方法 因 显 卡 不 同 而 不 同 。 痛 先 ， 为 
了 能 通过 “make run” 运 行 ， 我 们 只 考虑 支持 QEMU 
模拟 占 的 显卡 。 这 个 卡 顺 利 运行 以 后 ， 再 去 文 持 其 
他 的 显卡 。 


由 于 画面 切换 中 我 们 要 使 用 BIOS， 所 以 束 需 要 改写 
asmhead.nas 的 “画面 模式 设 定 ?部 分 了 。 哦 ， 好 久 没 
写 汇 编程 序 了 。 


本 次 的 asmhead.nas 节 选 


> 设 定 画面 模式 


MOV BX,0x4101 ; VBE 的 646x486x8bi 彩 色 

MOV AX,0x4f02 

INT 0x10 

MOV BYTE [VMODE],8 ; 记 下 夯 面 模式 (参考 C 语 
=o) 

MOV WORD [SCRNX],64@ 


MOV WORD [SCRNY], 480 


MOV DWORD [VRAM] ,6xe6666666 


程序 的 构成 几乎 没什么 变化 。 但 是 数值 是 0x4101 或 
0x4f02， 有 点 儿 怪 怪 的 。 这 些 数字 是 怎样 查 出 来 

的 ? 笔者 估计 会 有 人 问 这 个 问题 ， 可 与 其 退 问 这 样 
的 问题 ， 不 如 先 看 看 画面 扩大 后 的 “ 纸 娃娃 操作 系 
统 ”。 上 所 以 ， 我 们 先 运 行 “make run”. 


| Ea 
哦 ， 画 面 宽 阔 


因为 大 家 已 经 习惯 于 以 前 的 大 文字 显示 ， 上 所 以 


640x480 看 起 来 非常 宽阔 。 高 分 辨 率 画 面 ， 嗯 ， 感 
觉 束 是 不 一 样 ， 好 像 变 成 了 为 外 一 个 操作 系统 。 


大 家 肯定 想 在 真 机 上 演示 这 个 程序 吧 。 可 这 个 程序 
只 能 在 QEMU 模 拟 器 上 执行 。 就 像 刚 才 说 的 ， 这 个 


程序 是 专门 面 同 QEMU 创 建 的 。 所 以 ， 在 真 机 上 执 
行 的 时 候 ， 电 脑 还 是 有 可 能 发生 误 动 作 。 


下 面 来 说 明 为 什么 这 个 程序 能 够 在 640x480 画 面 上 


jE 人 


其 实说 起 来 也 很 简单 。 给 AX 赋 值 0x4f02， 给 BX 赋 
值 画 面 模 式 吕 全， 这 样 就 可 以 切换 到 高 分 辨 率 国 面 
模式 了 。 为 什么 昵 ? 这 个 笔者 也 答 不 上 来 ， 原 本 了 吏 
是 这 样 的 。 这 次 我 们 只 是 正好 使 用 到 了 这 个 功能 。 
以 前 画面 是 320x200 的 时 候 ， 我 们 用 的 是 “AH=0; 

AL= 画 面 模式 号 码 ，”。 现 在 切换 到 新 画面 时 就 使 
用 “AX = 0x4f02; ” 


大 家 是 不 是 很 纳闷 :“ 男 面 模式 有 新 旧 之 分 吗 ? ”是 
的 ， 实 际 上 是 有 新 旧 之 分 的 。 就 说 显卡 吧 ， 每 当 有 
Brae RTA AY, TERE lester, BORA, ARTY 
we, PEREZ, MEAD, DKK. K 
开始 的 时 候 ， 电 脑 规格 是 以 IBM 公 司 为 中 心 决 定 
的 ， 他 们 也 规定 了 画面 模式 的 相关 规格 。 而 且 各 家 
显卡 公司 也 都 迎合 IBM 的 规格 来 制作 显卡 。 


可 是 过 了 一 段 时 间 ， 其 他 显卡 公司 的 图 像 处 理 技 术 
超越 了 IBM， 在 IBM 制 定 规 格 前 ， 融 出 现 了 具有 各 


样 画 面 模式 的 显卡 。 这 造成 了 多 家 显卡 公司 的 苋 
争 ， 使 得 在 各 家 公司 之 间 ， 田 面 模式 的 设 定 方 法 和 
使 用 方法 都 各 不 相同 。 


这 样 的 情况 ， 我 们 这 些 普通 程序 员 是 难以 应 付 的 。 
显卡 的 种 类 太 多 ， 我 们 记 不 住 那 么 多 的 设 定 方法 ， 
而 且 事 实 上 ， 连 参考 资料 都 很 难得 到 。 这 样 一 来 ， 
本 应 是 高 性 能 的 显卡 ， 却 只 能 像 老 显卡 一 样 ， 通 过 
BIOS 设 定 为 320x200 来 使 用 。 


有 鉴于 此 ， 多 家 显卡 公司 经 过 协商 ， 成 并 了 VESA 
协会 (Video Electronics Standards Association， 视 
频 电 子 标准 协会 ) 。 此 后 ， 这 个 协会 制定 了 虽然 不 
能 说 完全 兼容 、 但 几乎 可 以 通用 的 设 定 方法 ， 制 作 
了 专用 的 BIOS。 这 个 退 加 的 BIOS 被 称 作 “VESA 
BIOS extension”(VESA-BIOS 扩 展 ， 人 简略 为 
VBE) 。 利 用 它 ， 残 可 以 使 用 显卡 的 高 分 辨 率 功 能 
Já 


因此 ， 切 换 到 不 使 用 VBE 的 画面 模式 时 用 “AH = 
0; AL= 男 面 模式 号 码 ; ”， 而 切换 到 使 用 VBE 的 男 
面 模式 时 用 “AX = 0x4f02; BX = 画面 模式 号 

码 ;”。 而 这 种 必须 使 用 VBE 才 能 利用 的 画面 模式 
就 称 作 “新 ”画面 模式 。 


VBE 的 画面 模式 号 码 如 下 。 
0x101....640x 480x 8bit 彩 
6x163.….866x 600x 8bit 彩 色 
Qx105.....1024x 768x 8bit 彩 色 
8x167..….1286x 1024x 8bit 彩 色 


还 有 其 他 一 些 画 面 模式 ， 因 为 现在 不 需要 ， 我 们 束 
省 略 了 。 另 外 ， 在 QEMU 中 不 能 指定 最 下 面 的 
0x107。 实 际 指定 的 时 候 ， 要 像 在 asmhead.nas 中 所 
做 的 那样 ， 将 以 上 的 画面 模式 号 码 值 加 上 0x4000， 
再 赋值 到 BX 中 去 。 不 这 样 做 就 不 能 顺利 运行 。 


所 以 ， 如 果 想 要 将 画面 扩展 得 特别 大 的 话 ， 请 党 试 
运行 以 下 程序 。 


BX,0x4105 ; VBE 的 1924x768x8bit 彩 色 
AX,6Xx4f62 

0x10 

BYTE [VMODE],8 ; 记 下 画面 模式 (参考 Cc 语言 ) 
WORD [SCRNX] ,1624 


WORD [SCRNY],768 
DWORD [VRAM] ,0xe0000000 


3 提高 分 辨 率 (2) (hariblle) 


只 能 在 模拟 絮 上 运行 的 操作 系统 实在 没什么 意思 ， 
还 十 想 在 真 机 上 运行 。 所 以 ， a oe 
aes 下 ， 让 它 能 在 真 机 上 运 


我 们 不 能 断定 真 机 上 使 用 的 是 什么 样 的 显卡 。 有 的 
公司 尚未 与 YVESA 进 行 合 作 。 如 果 是 这 种 公司 的 产 
品 ， 由 于 不 能 使 用 VBE， 所 以 大 家 只 能 忍耐 一 下 ， 
使 用 320x200 的 画面 了 。 


本 次 的 asmhead.nas 节 选 


; 确认 VBE 是 否 存 在 
AX ,0x9000 
ES, AX 
DI,@ 
AX, 0x4f00 
0x10 


AX, 0x004f 
scrn320 


在 这 里 ， 我 们 给 ES 赋值 为 0x9000， 给 DI 赋值 为 0， 
给 AX 赋 值 为 0x4f00， 再 执行 “INT 0x10”. WRA 
VBE 的 话 ，AX 就 会 变 为 0x004f。 要 是 AX 没 有 变 为 
这 个 值 ， 很 踪 憾 ， 束 只 能 使 用 320x200 的 画面 了 。 


至 于 为 什么 要 对 ES 和 DI 进行 赋值 ， 是 因为 此 显卡 能 
利用 的 VBE 信 息 要 写 入 到 内 存 中 以 ES:DI 开 始 的 512 
字 节 中 ， 赋 值 是 为 了 指定 写 入 地 址 。 


在 “ 纸 娃 娃 操 作 系 统 ” 中 ， 如 果 VBE 的 版 本 不 是 2.0 以 
上 上 ， 就 不 能 使 用 高 分 辩 率 。 所 以 我 们 要 先 调查 一 下 
VBE 的 版 本 。 


本 次 的 asmhead.nas 节 选 
; 检查 VBE 的 版 本 


MOV AX, [ES:DI+4] 
AX, 0x0200 
scrn32@ ; if (AX < 0x@20@) goto 


程序 进行 到 这 里 ， 下 一 步 要 通过 VBE 来 查看 一 下 画 
面 模式 0x105 能 不 能 使 用 。 即 使 VBE 的 版 本 是 VBE 
2.0， 也 不 能 保证 所 有 的 画面 模式 都 可 以 使 用 。 真 是 
麻烦 呢 。 因 为 如 果 局 限于 画面 模式 0x105， 那 些 想 

使 用 其 他 画面 模式 的 人 就 要 抱 纺 了 。 为 了 调查 这 种 
模式 能 否 使 用 ， 我 们 首先 这 样 设 定 : 


本 次 的 asmhead.nas 节 选 


; 取得 画面 模式 信息 


MOV CX , VBEMODE 
MOV AX, Ox401 
INT 0x10 

CMP AX , 0x004f 
JNE scrn320 


在 这 里 我 们 对 AX 的 值 也 进行 了 确认 。 如 果 它 是 
0x004f 以 外 的 值 ， 束 意味 看 所 指定 的 画面 模式 不 能 
使 用 。 


此 次 取得 的 画面 模式 信息 也 被 写 入 内 存 中 从 ES:DI 
开始 的 256 字 节 中 。 因 为 ES 和 DI 都 保持 刚才 的 值 不 
变 ， 所 以 画面 模式 信息 会 履 着 VBE 版 本 信息 从 而 导 
致 其 消失 ， 但 是 只 要 版 本 能 确认 ， 后 面 就 不 需要 这 
个 信息 了 ， 所 以 大 家 不 必 在 意 。 


EENEN 
在 画面 模式 信息 中 ， 重 要 的 信息 有 如 下 6 个 。 


WORD [ES : DI+6x66] : 模式 属性 ......bit7 
不 是 1 就 不 好 办 (能 加 上 6x48680) 


WORD [ES : DI+0x12] : X 的 分 辩 率 


WORD [ES : DI+6x14] : Y 的 分 辩 率 


BYTE [ES : DI+0x19] : 颜色 数 ..…. 必 须 为 8 


BYTE [ES : DI+6x1b] : 颜色 的 指定 方 
法 .…… 必 须 为 4 (4 是 调 色 板 模 式 ) 


DWORD [ES : DI+6x28] : VRAM 的 地 址 
在 这 6 项 信息 当中 ， 我 们 来 确认 如 下 3 项 : 

e HEB ANB 

。 是 否 为 调 色 板 模式 


。 辆 面 模式 写 码 可 耕 加 上 0x4000 再 进行 指定 


本 次 的 asmhead.nas 节 选 


; 画面 模式 信息 的 确认 
CMP BYTE [ES:DI+@x19],8 
JNE scrn320 
CMP BYTE [ES:DI+@x1b],4 


JNE scrn320 

MOV AX, [ES:DI+0x@0@ ] 

AND AX , 0x0080 

JZ scrn320 ; 模式 属性 的 bit7 是 6， 所 以 


如 果 这 些 确认 痢 完 成 的 话 ， 束 可 以 跟 大 家 说 
J: “ASS. ADE Arta EW VBE IAI RES S o 


那 束 尽情 享受 大 画面 的 乐趣 吧 ! ”所 以 我 们 决定 进 
行 画 面 模式 的 切换 。 而 一 旦 我 们 完成 了 切换 ， 就 可 
以 将 分 辩 率 及 VRAM 的 地 址 等 信息 复制 到 
BOOTINFO 中 了 。 


本 次 的 asmhead.nas 节 选 
; 画面 模式 的 切换 


BX, VBEMODE+0x4000 

AX, Ox4F02 

0x10 

BYTE [VMODE],8 3; 记 下 画面 模式 〈 人 参考 C 语 


AX, [ES:DI+0x12] 
[SCRNX ] , AX 

AX, [ES:DI+0x14] 
[SCRNY ] , AX 

EAX, [ES:DI+0x28 | 
[VRAM] , EAX 
keystatus 


最 后 的 JMP 指 令 ， 用 来 让 程序 跳 过 后 面 的 scrn320， 
而 让 其 跳 转 至 在 BIOS 中 和 查询 键 盘 状 态 的 地 方 。 
scrn320 程 序 我 们 紧 接着 就 要 写 。 


那么 当 出 现 VBE 不 存在 ， 版 本 不 够 ,模式 有 问题 的 
情况 下 ， 我 们 又 该 怎么 办 呢 ? 没 办 法 ， 我 们 只 能 使 


用 迄今 为 止 的 320x200 画 面 。 


本 次 的 asmhead.nas 节 选 


AL, @x13 ; VGA 图 、326x266x8bit 彩 


AH, 0X00 
0x10 


BYTE [VMODE],8 ; 记 下 夯 面 模式 (参考 C 语 


WORD [SCRNX] ,326 
WORD [SCRNY] ,266 
DWORD [VRAM] ,6x666a6666 


好 ， 这 样 就 大 功 告 成 了 。 首 先 要 确认 在 模拟 器 上 能 


个 正 第 运行 。 运 行 “make run”. OK， 运转 正常 。 


下 面 确认 在 真 机 上 能 人 否 正 音 运 行 。“make install” 一 
下 。 完 成 以 后 ， 按 下 蝎 面 上 的 开关 。 哦 ， 顺 利 运 
行 。 

如 果 想 试 一 试 不 能 顺利 运行 是 什么 样 ， 可 以 设 定 画 


面 模 式 为 0x107， 再 在 模拟 器 上 执行 束 可 以 了 。 男 
面 还 是 320x200 哦 。 


藉 喜 各 位 实现 了 高 分 辨 率 ， 不 过 在 广大 读者 之 中 ， 


可 能 有 人 还 在 使 用 不 支持 VBE 2.0 的 显卡 ， 所 以 今 
后 笔者 还 是 要 使 用 以 前 的 320x200 画 面 截图 。 而 且 
i 0 


这 次 我 们 对 于 VBE 的 使 用 方法 做 了 多 方面 的 介绍 ， 
其 中 笔者 参考 了 下 面 的 网 页 。 


http://community.osdev.info/?VESA 


大 家 有 兴趣 的 话 也 看 一 下 吧 。 


4 键盘 输入 (1) (harib11f) 


对 高 分 辨 京 的 支持 我 们 已 经 完成 了 ， 比 预想 的 要 
快 。 所 以 现在 我 们 通过 从 键盘 输入 信息 来 稍稍 放松 
洲 戏 一 下 吧 。 


再 对 hariblle 运 行 一 次 “make run”， 人 然后 试 着 按 
下 “A” 键 。 按 下 “A” 键 的 时 候 ， 应 该 显示 “1E”， 键 弹 
起 的 时 候 应 该 显示 “9E”。 


下 面 我 们 按 下 “B” 键 吧 。 按 下 的 时 候 显 示 “30”， 弹 
起 的 时 候 显 示 “B0”。 再 按 下 “C”...... ， 这 样 罗 列 下 
去 ， 可 就 浪费 纸张 了 了 ， 所 以 我 们 把 这 些 值 都 归纳 到 
下 表 里 。 表 里 的 值 是 按 下 键 时 的 数值 。 在 此 基础 上 
加 上 0x80 就 可 以 得 到 键 弹 起 时 的 数值 。 
Tn 


Er 


24: J 
a 


ET fs Ir m er 
: : ara 


09: FERR 


OA: 主键 盘 的 9 2A: 左 Shift 4A: 数字 键 的 - 6A: 保留 ? 


2B: ]〈 在 英语 键盘 4B: 数字 键 的 4 ”|6B: 保留 ? 


backslash (ZFR) ) 


6D: 保留 ? 


6E: 保留 ? 


的 1 6F: 保留 ? 


OD: 主键 盘 的 ^ (在 英 
语 键盘 是 =) 


mL 


Ey9 


7 
7 
74 


1: 保 
: 保 
: 保 
: 保 
: 保 


2 FA ! 
3 
VY. FA? 
8 


78: 保留 ? 


文 键盘 ) 


1A: @ (在 英语 键盘 
) 


) 盘 ) 
1C: 主键 盘 的 Enter 


这 个 表 中 有 写 着 “保留 ?” 的 地 方 是 指 ， 虽 然 现在 按 
下 哪个 键 都 不 出 现 该 数值 ， 但 将 来 键盘 的 键 数 量 一 
旦 增加 ， 那 个 数值 就 可 以 被 分 配 使 用 了 。 


大 家 也 许 会 想 “ 笔 者 特意 把 所 有 的 键 部 控 了 一 过来 
调查 数值 吗 ? 真 认真 勤 快 呀 。”， 嘿 嘿 ， 实 际 上 笔 
者 只 是 把 下 面 网 页 记载 的 内 容 原 搬 照 抄 而 已 


(BX) 。 
http://community.osdev.info/?(AT)keyboard 


笔者 想 利 用 这 个 表 实 现 当 “A” 键 被 按 下 的 时 候 就 显 
示 “A”。 咽 ， 以 前 曾经 通过 计数 来 测试 性 能 ， 现 在 
也 已经 用 了， 所 以 我 们 来 修改 bootpack.c。 不 再 是 
让 其 计数 ， 而 是 让 其 充分 HLT〔 休 虐 〉 ， 以 便 市 

Ho 


WHJ HariMain T i% 


for (33) { 
io _cli(); 
if (fifo32_status(&fifo) == 0) { 
io stihlt(); 
} else { 
i = fifo32_get(&fifo) ; 
io_sti(); 
if (256 <= i && i <= 511) { /* 键盘 数据 */ 
sprintf(s, "%@2X", i - 256); 
putfonts8_asc_sht(sht_back, ©, 16, 
COL8 FFFFFF, COL8 008484, s, 2); 
if (i == Oxle + 256) { 
putfonts8_asc_sht(sht_win, 40, 28, 
COL8_000000, COL8 C6C6C6, "A", 1); 


} 
} else if (512 <= i && i <= 767) { /* 鼠标 数据 
7 


(中 上 略 ) 
} else if (i == 10) { /* 16 秒 定时 器 */ 
putfonts8 asc _sht(sht_back, ©, 64, 
COL8_FFFFFF, COL8 008484, "1@[sec]", 7); 
} else if (i == 3) { /* 3 秒 定 时 器 */ 
putfonts8 asc _sht(sht_back, ©, 80, 
COL8_FFFFFF, COL8 008484, "3[sec]", 6); 
} else if (i == 1) { /* 光标 用 定时 器 */ 
《中 略 ) 
} else if (i == 0) { /* 光标 用 定时 器 */ 
《中 略 ) 


虽然 在 这 段 程序 中 没有 出 现 ， 但 我 们 已 经 把 窗口 的 
名 字 由 “counter 改 为 了 “window”。 “make run”, 4 
按 一 下 “A” 键 ， 哦 ,，“A” 显 示 出 来 了 。 


i 1] 
memory OMB aes : 29152KB 


“A” 显 示 出 来 了 ! 


5 键盘 输入 (2) Charib11g) 


到 了 这 一 步 ， 我 们 希望 也 能 输入 “B” 和 “C” 等 字符 。 
那么 ， 我 们 来 动手 与 程序。 


首先 我 们 创建 以 下 程序 : 


if (256 <= i && i <= 511) { /* 键盘 数据 */ 
sprintf(s, "%02X", i - 256); 
putfonts8_asc_sht(sht_back, ©, 16, COL8 FFFFFF, 
COL8 008484, s, 2); 
if (i == @xle + 256) { 
putfonts8 asc _sht(sht_win, 40, 28, COL8_000000, 
COL8_C6C6C6, "A", 1); 
} 
if (i == 0x30 + 256) { 
putfonts8_asc_sht(sht_win, COL8_000000, 
COL8_C6C6C6, "B", 1); 
} 
if (i == @x2e + 256) { 
putfonts8_asc_sht(sht_win, COL8_000000, 
COL8 C6C6C6, "C", 1); 
} 
if (i == 0x20 + 256) { 
putfonts8_asc_sht(sht_win, COL8_000000, 
COL8_C6C6C6, "D", 1); 
} 
if (i == 0x12 + 256) { 
putfonts8 asc sht(sht win, 40, 28, COL8_000000, 
COL8 C6C6C6, "E", 1); 


} 
} else if (512 <= i && i <= 767) { /* 鼠标 数据 */ 


如 条 我 们 像 上 面 这 样 写 程序 ， 仅 仅 是 字母 〈26 个 ) 
和 数字 10 个 )， 束 得 写 36 个 让 语句 。 这 样 做 的 
话 ， 程 序 可 就 变 长 了 。 这 不 太 好 ， 必 须要 想 出 一 个 
好 办 法 。 


因此 又 创建 了 如 下 程序 。 怎 么 样 ? 


本 次 的 HariMain 节选 


static char keytable[@x54] 
ð, ð, "T's ED 3 
‘9s 8 ， “eg ae ð, 0 
'Q', 'W', 'E', 'R', 'T 
"3 Le Oy 9， A， 3， 


' 
3 

3 

' 
3 


}; 


if (256 <= i && i <= 511) { /* 键盘 数据 */ 
sprintf(s, "%02X", i - 256); 
putfonts8_asc_sht(sht_back, @, 16, COL8_FFFFFF, 
COL8 008484, s, 2); 
if (i < 256 + 0x54) { 
if (keytable[i - 256] != 0) { 
s[6] = keytable[i - 256]; 


s[1] = ð; 
putfonts8_asc_sht(sht_win, 40, 28, 
COL8_000000, COL8 C6C6C6, s, 1); 
} 


} 
} else if (512 <= i && i <= 767) { /* 鼠标 数据 */ 


之 所 以 笔者 把 keytable[ ] 设 定 为 static char， 是 因为 

锅 望 程序 被 编译 为 汇编 语言 的 时 候 ，static char 能 编 

泽 成 DB 指令 ， 设 定 调 色 板 的 时 候 也 是 如 此 ， 大 家 
还 记得 吗 ? 


现在 我 们 来 解释 这 个 程序 的 运行 机 制 。 比 如 说 
keytable[0x1le] 对 应 的 是 “A”。 而 “A” 的 字符 代码 是 
0x41。 如果 i == 0xle + 256 的 话 ，keytable[i - 256] 就 
是 “A”， 所 以 s[0] 也 就 是 “A” 了 。 


同 理 ， ap”. HRI “7” V 57 tH WIZ A] DA BAR 
Ta 


让 我 们 确认 一 下 吧 。 make run”。 不 错 ， 很 顺 
利 呀 。 


38 w 
memory 32MB free : 29152KB 


按 下 <G” 键 


运行 “make run” 后 ， 按 下 “@” 等 键 ， 却 显示 出 “W”。 
大 家 也 许 会 想 “ 唉 ?怎么 回 事 儿 ?”， 这 是 因为 

当 “@” 被 按 下 的 时 候 ，HariMain 接 收 到 了 0x11 (请 
确认 左上 方 的 显示 内 容 ) ， 这 不 是 HariMain 的 
bug， 而 是 QEMU 的 问题 (我 想 这 可 能 是 因为 日 语 
键盘 还 没有 得 到 充分 支持 吧 ) 。 还 有 其 他 几 个 键 ， 
按 下 以 后 会 显示 出 奇怪 的 字符 。 这 些 好 像 都 是 
QEMU 的 问题 。 


如 果 读 者 还 是 觉得 不 放心 ， 可 以 在 真 机 上 确认 。 运 
行 肯 定 会 很 顺利 的 。 


6 追 记 内 容 (1) (harib11h) 


我 们 已 经 进行 到 了 这 个 阶段 ， 束 想 稍 和 放松 一 下 
了 。 你 看 ， 光 标 也 能 内 烁 了 ， 窗 口 也 有 了 。 


我 们 先 把 程序 放 在 一 边 ， 来 看 一 看 画面 的 截图 吧 。 


我 们 都 能 实现 这 样 的 功能 
en WR, EARI RIS 
TEL o 


虽然 看 起 来 有 了 不 小 的 进步 ， 但 实际 上 我 们 也 只 是 
在 窗口 中 添加 了 一 些 画 ， 改 变 了 鼠标 和 字符 的 显示 
MEUM. MRR PIR RE 

(BackSpace 键 )， 还 可 以 改写 已 输入 的 字符 哦 。 
大 家 试 着 输入 上 自己 喜欢 的 信息 吧 。 


程序 如 下 。 笔 者 只 修改 了 bootpack.c。 


AS YX AJ HariMain T 


int cursor_x, cursor_c; 


make_textbox8(sht_win, 8, 28, 144, 16, COL8_FFFFFF); 
cursor_X = 8; 
cursor_c = COL8_FFFFFF; 


(中 上 略 》 


for (;;) { 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
io_stihlt(); 
} else { 
i = fifo32_get(&fifo) ; 
io_sti(); 
if (256 <= i && i <= 511) { /* 键盘 数据 */ 
sprintf(s, "%02X", i - 256); 
putfonts8_asc_sht(sht_back, ©, 16, 
COL8 FFFFFF, COL8 008484, s, 2); 


if (i < 0x54 + 256) { 
if (keytable[i - 256] != @ && cursor_x 

< 144) { /* 一 般 字 符 */ 

/* 显示 1 个 字符 就 前 移 1 次 光标 */ 

s[@] = keytable[i - 256]; 

s[1] = ð; 

putfonts8_asc_sht(sht_win, 
cursor_x, 28, COL8 9090000, COL8_FFFFFF, s, 1); 

cursor_X += 8; 


} 


if (i == 256 + @x@e && cursor_x > 8) { /* 
退 格 键 */ 


/* 用 空格 键 把 光标 消去 后 ， 后 移 1 次 光标 */ 

putfonts8 asc sht(sht win, cursor_x, 
28, COL8_000000, COL8_FFFFFF, " ", 1); 

cursor_X -= 8; 


} 
/* 光标 再 显示 */ 
boxfill8(sht win->buf, sht_win->bxsize, 
cursor_c, cursor_x, 28, cursor_x + 7, 43); 
sheet_refresh(sht_win, cursor_x, 28, 
cursor_x + 8, 44); 
} else if (512 <= i && i <= 767) { /* 鼠标 数据 


《中 略 ) 
} else if (i == 10) { /* 16 秒 定时 器 */ 
putfonts8_asc_sht(sht_back, ©, 64, 
COL8_FFFFFF, COL8 908484, "1@[sec]", 7); 
} else if (i == 3) { /* 3 秒 定时 器 */ 
putfonts8 asc _sht(sht_back, ©, 80, 
COL8_FFFFFF, COL8 908484, "3[sec]", 6); 
} else if (i <= 1) { /* 光标 用 定时 器 */ 
if (i != 6) { 
timer_init(timer3, &fifo, @); /* Fi 


$Y 


ZO */ 
cursor_c = COL8 900000; 
} else { 
timer_init(timer3, &fifo, 1); /* 下 面 设 
yE1 */ 


cursor_c = COL8 _FFFFFF; 
} 
timer_settime(timer3, 50); 
boxfill8(sht_win->buf, sht_win->bxsize, 
cursor_c, cursor_x, 28, cursor_x + 7, 43); 
sheet_refresh(sht_win, cursor_x, 28, 
cursor_x + 8, 44); 


cursor_x 是 用 来 记 住 光标 显示 位 置 的 变量 ， 输 入 一 
个 字符 后 ， 这 个 变量 就 递增 “8”。 而 cursor_c 变 量 则 
表示 现在 光标 的 颜色 。 它 每 0.5 秒 变化 一 次 。 
make_textb0x8 函 数 是 用 来 朱 绘 文字 输入 背景 的 ， 内 
容 如 下 。 这 个 函数 没什么 特别 难 的 东西 ， 大 家 大 致 
w— PRA LA YT. 


本 次 的 bootpack.c 节 选 


void make_textbox8(struct SHEET *sht, int x@, int ye9， 
int sx, int sy, int c) 


{ 


int x1 = xð + sx, y1 = yO + sy; 

boxfill8(sht->buf, sht->bxsize, COL8 848484, x@ - 
2, yO - 3, x1 +1, y@ - 3); 

boxfill8(sht->buf, sht->bxsize, COL8 848484, x@ - 
3, yO - 3, x0 - 3, yl + 1); 

boxfill8(sht->buf, sht->bxsize, COL8 FFFFFF, x@ - 
3, yl + 2, x1 + 1, y1 + 2); 

boxfill8(sht->buf, sht->bxsize, COL8 FFFFFF, x1 + 
2, y@ - 3, x1 + 2, y1 + 2); 

boxfill8(sht->buf, sht->bxsize, COL8 9@Q@000, xð - 
1, yO - 2, x1 + ðO, y@ - 2); 

boxfill8(sht->buf, sht->bxsize, COL8_000000, xð - 
2, yO - 2, Xð - 2, y1 + 0); 

boxfill8(sht->buf, sht->bxsize, COL8 C6C6C6, x@ - 
2, yl + 1, x1 + 0, y1 + 1); 


boxfill8(sht->buf, sht->bxsize, COL8 C6C6C6, x1 + 
1, yO - 2, x1 +1, y1 + 1); 


boxfill8(sht->buf, sht->bxsize, c, xð - 
1, yO - 1, x1 + 0, y1 + 0); 
return; 


} 


7 EWWA (2) (harib11i) 


像 harib11h 那 样 玩 儿 是 最 高 兴 的 了 。 这 才 是 “ 纸 娃娃 
操作 系统 ”的 乐趣 所 在 ! 那么 ， 我 们 继续 玩 点 儿 别 
的 吧 。 


大 家 还 记得 ， 为 了 使 鼠标 动 起 来 ， 我 们 付出 了 多 少 
辛苦 吗 ? 我 们 付出 了 辛苦 ， 终 于 让 鼠标 动 了 起 来 ， 
可 鼠标 动 起 来 后 ， 却 一 点 儿 都 没 用 到 。 它 只 是 一 个 
装饰 物 〈 也 许 还 碍 手 碍 脚 的 ?) 。 


好 不 容易 让 鼠标 动 起 来 了 ， 我 们 看 看 能 用 它 干 些 什 
么 吧 。 做 什么 好 呢 ? HE, ERB oe ON. ADA 
下 面 我 们 惑 使 用 鼠标 完成 窗口 移动 吧 。 


一 说 到 窗口 的 移动 ， 感 觉 好像 很 难 。 但 实际 并 不 
4E, REY S 4TH maa. 


AS YX J HariMain T 


for (33) { 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
io_stihlt(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 


if (256 <= i && i <= 511) { /* 键盘 数据 */ 


中略 ) 
} else if (512 <= i && i <= 767) { /* 鼠标 数 


据 * */ 
if (mouse _decode(&mdec, i - 512) != @) 
{ 
/* 收集 了 3 字 节 的 数据 ， 所 以 显示 出 来 */ 
CRH) 
/* 光标 移动 */ 
CRH) 
sheet_slide(sht_mouse, mx, my); 
[® MEJL “7 if ((mdec.btn & @x@1) != @) { 
/* 按 下 左 键 、 移 动 sht_win */ 
sheet_slide(sht_win, mx - 80, 
my - 8); 
/* 到 这 里 结束 ! */ 


} 
} else if (i == 16) { /* 16 秒 定时 器 */ 
putfonts8_asc_sht(sht_back, ©, 64, 
COL8_FFFFFF, COL8 008484, "1@[sec]", 7); 
} else if (i == 3) { /* 3 秒 定时 器 */ 
putfonts8 asc_sht(sht_back, ©, 80, 
COL8_FFFFFF, COL8 008484, "3[sec]", 6); 
} else if (i <= 1) { /* 光标 用 定时 器 */ 
CREK) 


好 了 ， 这 样 就 完成 了 。 我 们 赶紧 运行 “make 
run” 吧 。 启 动 之 后 ， 请 随意 在 男 面 上 某 个 地 方 点 击 
一 下 ， 窗 口 很 快 束 移 动 到 那里 了 。 啊 吓 的 感 党 。 


耶 ， 六 好 了 。 


(234,104) 


s Der i, Ml 
memory 32MB free : 29152KB 


Ml il Ss A 23H 


当 我 们 一 直 按 着 左 键 来 移动 鼠标 时 ， 可 以 让 窗口 四 
处 移动 。 但 在 模拟 嚣 上， 移动 可 束 慢 了 。 运 

行 “make install”, 7E HALE UA, RE Yo Mill Mil 
的 感 党 。 


即使 窗口 跑 到 了 画面 外 ， 也 没有 问题 。 因 为 我 们 已 
经 针对 鼠标 指针 提前 采取 了 了 对策 ， 这 就 如 同 图 层 跑 
到 了 画面 外 面 也 可 以 动 起 来 一 样 。 


跑 到 了 画面 外 也 没事 哆 


Aves! 能 简单 地 实现 这 个 功能 ， 多 亏 在 制作 图 层 时 
下 的 一 番 苗 功 。 做 得 不 错 ! 先 表 扬 一 下 几 天 前 的 自 
OCE (R). 


IR, MEERN, AAA TE TORKAR HA] 
So HARARE, “多 任务 "了 。 今 天 正好 是 
第 2 周 ， 我 们 看 看 haribote.sys 的 大 小 吧 。23 908 字 节 
也 就 是 23KB。 到 现在 为 止 ， 仅 用 23KB 就 可 以 完成 
像 操 作 系 统 那样 的 功能 了 ， 不 错 不 错 。 好 了 ， 我 们 
明天 见 吧 。 


第 15 天 多 任务 (1) 


。 挑战 任务 切换 (harib12a) 

。 任务 切换 进 阶 Charib12b) 

。 做 个 简单 的 多 任务 (1) Charib12c) 
。 做 个 简单 的 多 任务 (2) Charib12d) 
。 提 高 运行 速度 (harib12e) 

。 测试 运行 速度 Charib12f) 

。 多 任务 进 阶 〈harib12g ) 


1 挑战 任务 切换 Charib12a) 


“话说 ， 多 任务 到 底 是 啥 呢 ? ”我 们 今天 的 内 容 ， 就 
从 这 个 问题 开始 吧 。 


ZEZ, ÆRE P Yt“ multitask”, MAE X 
是 “多 个 任务 ”的 意思 。 人 简单 地 说 ， 在 Windows 等 操 
作 系 统 中 ， 多 个 应 用 程序 同时 运行 的 状态 (也 就 是 
同时 打开 好 几 个 窗口 的 状态 ) 束 叫做 多 任务 。 


对 于 生活 在 现代 社会 的 各 位 来 次 ， 这 种 多 任务 简直 
是 理所当然 的 事情 。 比 如 你 会 一 按 用 音乐 播放 软件 
We RI ABE, MAS BAB AA a A PG 
A, (EFT Webitl has LMR. AWTR 
这 些 都 是 家 常 便 饭 了 吧 。 可 如 果 没 有 多 任务 的 话 会 
怎么 样 呢 ? 想 写 邮件 的 时 候 就 必须 天 挥 正在 播放 的 
首 乐 ， 要 但 东西 的 时 候 就 必须 和 完 保存 写 到 一 半 的 邮 
件 ， 然 后 才能 打开 Web 浏 宽 强 .……... 光 想象 一 下 束 会 
觉得 太 不 方便 了 。 


然而 在 从 前 ， 没 有 多 任务 反倒 是 普 志 的 情形 (那个 
时 候 大 家 不 用 电脑 听 音 乐 ， 也 没有 互联 网 ) 。 在 那 
个 年 代 ， 电 脑 一 次 只 能 运行 一 个 程序 ， 如 果 要 同时 
运行 多 个 程序 的 话 ， 束 得 买好 几 台 电脑 才 行 。 


束 在 那个 时 候 ， 诞 生 了 最 初 的 多 任务 操作 系统 ， 大 
家 都 觉得 太 了 不 起 了 。 从 现在 开始 ， 我 们 也 要 准备 
给 “ 纸 娃娃 系统 ”添加 执行 多 任务 的 能 力 了 。 连 这 样 
一 个 小 不 点 儿 操 作 系 统 者 能够 实现 多 任务 ， 真 是 让 
人 不 由 地 感叹 它 生 着 其 时 呀 。 


稍稍 思考 一 下 我 们 就 会 发 现 ， 多 任务 这 个 东西 还 真 
是 哥 炒 ， 它 究竟 是 怎样 做 到 让 多 个 程序 同时 运行 的 
呢 ? 如 果 我 们 的 电脑 里 面 闻 了 好 多 个 CPU 的 话 ， 同 
时 运行 多 个 程序 倒 也 顺理成章 ， 但 实际 上 束 算 我 们 
只 有 一 个 CPU， 照 样 可 以 实现 多 任务 。 


其 实说 罕 了 ， 这 些 程序 根本 没有 在 同时 运行 ， 只 不 
过 看 上 去 好 像 是 在 同时 运行 一 样 : 程序 A 运行 一 会 
儿 ， 接 下 来 程序 B 运 行 一 会 儿 ， 再 接 下 来 轮 到 程序 
C， 然 后 再 回 到 程序 A..…. 如 此 反复 ， 有 点 像 日 本 
ART ASAP AA WE R) 。 


X 1 个 CPU 通过 反复 切换 来 执行 3 个 任务 
K 由 于 切换 速度 很 快 ， 看 上 去 好 像 在 同时 执行 3 个 任务 一 样 


为 了 让 这 种 分 号 术 看 上 去 更 完美 ， 需 要 让 操作 系统 


尽 可 能 快 地 切换 任务 。 如 果 10 秒 才 切 换 一 次 ， 那 就 
连 人 有 眼 都 能 察觉 出 来 了 ， 同 时 运行 多 个 程序 的 戏码 
也 融 罕 帮 了。 再 有 ， 如 果 我 们 给 程序 C 发 出 一 个 按 
键 指令 ， 正 巧 这 个 瞬间 系统 切换 到 了 程序 A 的 话 ， 
我 们 束 不 得 不 等 上 20 秒 ， 才 能 重新 轮 到 程序 C 对 按 
键 指令 作出 反应 。 这 实在 是 让 人 抓 狂 啊 (名 。 


在 一 般 的 操作 系统 中 ， 这 个 切换 的 动作 每 0.01 一 
0.03 秒 束 会 进行 一 次 。 当 然 ， 切 换 的 速度 越 快 ， 让 
人 觉得 程序 是 在 同时 运行 的 效果 也 就 越 好 。 不 过 ， 
CPU 进行 程序 切换 《我 们 称 为 “任务 切换 ”) 这 个 动 
作 本 喘 就 需要 消耗 一 定 的 时 间 ， 这 个 时 间 大 约 为 
0.0001 秒 左右 ， 不 同 的 CPU 及 操作 系统 所 需 的 时 间 
也 有 所 不 同 。 如 果 CPU 每 0.0002 秒 切换 一 次 任务 的 
话 ， 该 CPU 处 理 能 力 的 50% 都 要 被 任务 切换 本 身 所 
消耗 掉 。 这 意味 着 ， 如 果 同 时 运行 2 个 程序 ， 每 个 
程序 的 速度 束 只 有 单独 运行 时 的 V4， 这 样 你 会 溪 得 
开心 吗 ? 如 果 变 成 这 种 结果 ， 那 还 不 如 干脆 别 搞 多 
任务 呢 。 


相 比 之 下 ， 即 便 是 每 0.001 秒 切换 一 次 任务 ， 单 单 在 
任务 切换 上 面 也 要 消耗 CPU 处 理 能 力 的 10%。 大 概 
有 人 会 想 ，10% 也 没什么 大 不 了 的 吧 ? 可 如 果 你 看 
看 速度 快 10% 的 CPU 卖 多少 钱 ， 说 不 定 就 会 居然 大 
fe, “对 啊 ， 只 要 优化 一 下 任务 切换 间隔 ， 残 相当 
于 一 分 钱 也 不 花 ， 便 换 上 了 比 现在 更 快 的 CPU 


WR.” CR) ， 你 也 束 明 白 了 浪费 10% 也 是 很 不 值 
得 的 。 正 是 因为 这 个 原因 ， 任 务 切 换 的 间隔 最 短 也 
得 0.01 秒 左右 ， 这 样 一 来 只 有 1% 的 处 理 能 力 消耗 在 
任务 切换 上 ， 基 本 上 就 可 以 忽略 不 计 了 。 


关于 多 任务 是 什么 的 问题 ， 已 经 大 致 讲 得 差不多 
了 ， 接 下 来 我 们 来 看 看 如 何 让 CPU 来 处 理 多 任务 。 


当 你 癌 CPU 发 出 任务 切换 的 指令 时 ，CPU 会 先 把 寄 
存 需 中 的 值 全 部 写 入 内 存 中 ， 这 样 做 是 为 了 当 以 后 
切换 回 这 个 程序 的 时 候 ， 可 以 从 中 断 的 地 方 继续 运 
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的 地 址 和 刚刚 写 入 的 地 址 一 定 是 不 同 的 ， 不 然 就 相 
当 于 什么 都 没 变 咏 ) ， 这 样 融 完成 了 一 次 切换 。 我 
们 前 面 所 说 的 任务 切换 所 需要 的 时 间 ， 正 是 对 内 和 存 
进行 号 入 和 读 取 操作 所 消耗 的 时 间 。 


接 下 来 我 们 来 看 看 寄存 右 中 的 内 容 是 怎样 写 入 内 存 
里 去 的 。 下 面 这 个 结构 叫做 “任务 状态 段 ”(task 

status segment) ， 人 简称 TSS。TSS 有 16 位 和 32 位 两 
个 版 本 ， 这 里 我 们 使 用 32 位 版 。 顾 名 思 义 ，TSS 也 


是 内 存 段 的 一 种 ， 需 要 在 GDT 中 进行 定义 后 使 用 。 


struct TSS32 { 
int backlink, esp@, ss@, esp1, ssi, esp2, ss2, cr3; 
int eip, eflags, eax, ecx, edx, ebx, esp, ebp, esi, 


edi; 
int es, cs, ss, ds, fs, gs; 
int ldtr, iomap; 


ie 


参考 上 面 的 结构 定义 ，TSS 共 包含 26 个 int 成 员 ， 总 
计 104 字 节 〈 摘 目 CPU 的 技术 资料 ) ， 我 特意 把 它 

们 分 成 4 行 来 号。 从 开头 的 backlink 起 ， 到 cr3 为 止 的 
几 个 成 员 ， 保 存 的 不 是 寄存 器 的 数据 ， 而 是 与 任务 
设置 相关 的 信息 ， 在 执行 任务 切换 的 时 候 这 些 成 员 
不 会 被 号 入 (backlink 除 外 ， 某 些 情况 下 是 会 被 写 

入 的 ) 。 后 面 的 部 分 中 我 们 会 用 到 这 里 的 设 定 ， 不 
过 现在 你 完全 可 以 先 忽 略 它 。 


第 2 行 的 成 员 是 32 位 寄存 右 ， 第 3 行 是 16 位 寄存 器 ， 
应 该 没 必 要 解释 了 吧 ...... 不 对 ，eip 好 像 到 现在 还 没 
讲 过 呢 。EIP 的 全 称 是 “extended instruction 

pointer”， 也 了 束 是 “扩展 指令 指针 寄存 问 ” 的 意思 。 这 
里 的 “扩展 ”代表 它 是 一 个 32 位 寄存 器 ， 也 就 是 说 其 
对 应 的 16 位 版 本 叫做 IP， 类 比 一 下 的 话 ， 跟 EAX 与 
AX 之 间 的 关系 是 一 样 的 。 


EIP 是 CPU 用 来 记录 下 一 条 需要 执行 的 指令 位 于 内 


存 中 哪个 地 址 的 寄存 占 ， 因 此 它 才 被 称 为 “指令 指 

针 ”。 如 果 没 有 这 个 寄存 右 ， 记 性 不 好 的 CPU 就 会 

生 记 目 己 正 在 运行 哪里 的 程序 ， 于 是 程序 束 没 办 法 
正常 运行 了。 每 执行 一 条 指令 ，EIP 寄 和 存 莫 中 的 值 

束 会 目 动 圭 加 ， 从 而 你 证 一 直 指 癌 下 一 条 指令 所 在 
的 内 存 地 址 。 


说 点 题 外 话 ，JMP 指 令 实 际 上 是 一 个 同 EIP 寄 人 存 嚣 
赋值 的 指令 。JMP 0x1234 这 种 写法 ，CPU 会 解释 
为 MOV EIP,0x1234, JF FJEIPIME. toate it, 

这 条 指令 其 实 是 自 改 了 CPU 记忆 中 下 一 条 该 执行 
的 指令 的 地 址 ， 蒙 了 CPU 一 把 。 这 样 一 来 ，CPU 
在 读 取 下 一 条 指令 时 ， 束 会 去 读 取 0x1234 这 个 地 
rt ala 你 看 ， 这 不 就 相当 于 是 做 了 一 个 跳 

HO, ? 


对 了 ， 如 果 你 在 汇编 语言 里 用 MOV EIP,0x1234 这 
种 写法 是 会 出 错 的 ， 还 是 不 要 尝试 的 好 。 在 汇编 
语言 中 ， 应 该 使 用 JMP 0x1234 来 代替 MOV 
EIP,0x1234. 
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次 再 返回 这 个 任务 的 时 候 ，CPU 就 可 以 明白 应 该 从 
哪里 读 取 程序 来 运行 了 。 


按照 冲 识 ， 段 寄存 右 应 该 是 16 位 的 才 对 ， 可 是 在 


TSS 数 据 结 构 中 却 定 义 成 了 int (也 束 是 DWORD) 
类 型 。 我 们 可 以 大 胆 想 象 一 下 ， 说 不 定 英 特 尔 公司 
的 人 将 来 会 把 段 寄 存 器 变 成 32 位 的 ， 这 样 想 想 也 挺 
有 意思 的 呢 ( 笑 ) 。 


第 4 行 的 ldtr 和 iomap 也 和 第 1 行 的 成 员 一 样 ， 是 有 关 
任务 设置 的 部 分 ， 因 此 在 任务 切换 时 不 会 被 CPU 写 
入 。 也 许 你 会 想 ， 那 就 和 第 1 行 一 样 ， 暂 时 先 忽略 
好 了 一 一 但 那 可 是 绝对 不 行 的 ! QO BA LG KSI 

话 ， 任 务 驶 无 法 正 第 切换 了 ， 在 这 里 我 们 先 将 ldtr 
置 为 0， 将 iomap 置 为 0x40000000 束 好 了 。 


关于 TSS 的 话题 暂且 先 告 一 段 活 ， 我 们 回来 继续 讲 
任务 切换 的 方法 。 要 进行 任务 切换 ， 其 实 还 得 用 
JMP 指 令 。JMP 指 令 分 为 两 种 ， 只 改写 EIP 的 称 为 
near 模 式 ， 同 时 改写 EIP 和 CS 的 称 为 far 模 式 ， 在 此 
之 前 我 们 使 用 的 JMP 指 令 基本 上 都 是 near 模 式 的 。 
不 记得 CS 是 什么 了 ? CS 就 是 代码 段 (code 
segment) AITAS. 

说 起 来 我 们 其 实用 过 一 次 far 模 式 的 JMP 指 令 ， 融 在 
asmhead.nas 的 “bootpack 局 动 ” 的 最 后 一 句 〈 见 8.5 


JMP DWORD 2#+8 :0X606060601b 


这 条 指令 在 向 EIP 存 入 0x1b 的 同时 ， 将 CS 置 为 
2*8 (=16) 。 像 这 样 在 JMP 目 标 地 址 中 带 冒号 C) 
的 ， 就 是 far 模 式 的 JMP 指 令 。 


如 果 一 条 JMP 指 令 所 指定 的 目标 地 址 段 不 是 可 执行 
的 代码 ， 而 是 TSS 的 话 ，CPU 就 不 会 执行 通常 的 改 
写 EIP 和 CS 的 操作 ， 而 是 将 这 条 指令 理解 为 任务 切 
换 。 也 就 是 说 ，CPU 会 切换 到 目标 TSS 所 指定 的 任 
务 ， 说 白 了 ， 就 是 JMP 到 一 个 任务 那里 去 了 。 


CPU 每 次 执行 带 有 段 地 址 的 指令 时 ， 都 会 去 确认 
一 下 GDT 中 的 设置 ， 以 便 判断 接 下 来 要 执行 的 
JMP 指 令 到 底 是 普通 的 far-JMP， 还 是 任务 切换 。 
也 就 是 说 ， 从 汇编 程序 翻译 出 来 的 机 器 语言 来 

看 ， 普 通 的 far-JMP 和 任务 切换 的 far-JMP， 指 令 本 
身 是 没有 任何 区 别 的 。 


好 了 ， 村 燥 的 讲解 就 到 这 里 ， 让 我 们 实际 做 一 次 任 
务 切换 吧 。 我 们 准备 两 个 任务 ; 任务 A 和 任务 B， 
尝试 从 A 切换 到 B。 


首先 ， 我 们 需要 创建 两 个 TSS: 任务 A 的 TSS 和 任务 
BH 的 TSS。 


本 次 的 HariMain 节选 
问 和 它们 的 ldtr 和 iomap 分 别 存 入 合适 的 值 。 
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tss_a.ldtr = ©; 
tss_a.iomap = 0x40000000; 


tss_b.ldtr 
tss_b.iomap = 0x40000000; 


接着 将 它们 两 个 在 GDT 中 进行 定义 。 
AS VR AY HariMain t 126 


Struct SEGMENT_DESCRIPTOR *gdt = (struct 
SEGMENT_DESCRIPTOR *) ADR_GDT; 


set_segmdesc(gdt + 3, 103, (int) &tss_a, AR_TSS32); 
set_segmdesc(gdt + 4, 103, (int) &tss_b, AR_TSS32); 


将 tss_a 定 义 在 gdt 的 3 号 ， 段 长 限制 为 103 字 节 ， 
tss_b 也 采用 类 似 的 定义 。 


现在 两 个 TSS 痢 创建 好 了 ， 该 进行 实际 的 切换 了 。 


我 们 向 TR 寄存 器 存 入 3 * 8 这 个 值 ， 这 是 因为 我 们 刚 
才 把 当前 运行 的 任务 定义 为 GDT 的 3 号 。TR 和 寄存器 
以 前 没有 提 到 过 ， 它 的 作用 是 让 CPU 记 住 当前 正在 
运行 哪 一 个 任务 。 当 进行 任务 切换 的 时 候 ，TR 寄 存 
器 的 值 也 会 自动 变化 ， 它 的 名 字 也 就 是 “task 
register” UFZ RT) 的 缩写 。 我 们 每 次 给 TR 寄 
存 器 赋值 的 时 候 ， 必 须 把 GDT 的 编号 乘 以 8， 因 为 
英特尔 公司 束 是 这 样 规定 的 。 如 果 你 有 意见 的 话 ， 
可 以 打 电 话 找 英特尔 的 大 叔 投诉 哦 〈 笑 ) 。 


给 TR 寄 存 器 赋值 需要 使 用 LTR 指 令 ， 不 过 用 C 语 言 
做 不 到 。 了 吧 ， 各 位 是 不 是 都 已 经 见怪 不 怪 了 啊 ? 
E? PERET? (SED 所 以 说 ， 正 如 你 所 料 ， 
我 们 只 能 把 它 写 进 naskfunc.nas 里 面 。 
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本 次 的 naskfunc.nas 节 选 


; void load_tr(int tr); 
[ESP+4] ; tr 


对 了 ，LTR 指 令 的 作用 只 是 改变 TR 寄存 器 的 值 ， 
此 执行 了 LTR 指 令 并 不 会 发 生 任务 切换 。 


要 进行 任务 切换 ， 我 们 必须 执行 far 模 式 的 跳 转 指 
令 ， 可 异 far 跳 转 这 事 C 语 言 还 是 无 能 为 力 ， 这 种 语 
言 还 真是 不 方便 啊 。 没 办 法 ， 这 个 函数 我 们 也 得 在 
naskfunc.nas 里 创建 。 


本 次 的 naskfunc.nas 节 选 


_taskswitch4: ; void taskswitch4(void) ; 


JMP 4*8:0 
RET 


也 许 有 人 会 问 ， 在 JMP 指 令 后 面 写 个 RET 有 意义 
吗 ? 也 对 ， 通 常情 况 下 确实 没 意 义 ， 因 为 已 经 跳 转 
到 别 的 地 方 了 嘛 ， 后 面 再 写 什 么 指令 也 不 会 被 执行 
了 。 不 过 ， 用 作 任 务 切换 的 JMP 指 令 却 不 太一 样 ， 
在 切换 任务 之 后 ， 再 返回 这 个 任务 的 时 候 ， 程 序 会 
从 这 条 JMP 指 令 之 后 恢复 运行 ， 也 束 是 执行 JMP 后 
面 的 RET， 从 汇编 语言 函数 返回 ， 继 续 运 行 C 语 言 
主 程序 。 


男 外 ， 如 果 far-JMP 指 令 是 用 作 任 务 切换 的 话 ， 地 址 
段 (冒号 前 面 的 4*8 的 部 分 要 指 同 TSS 这 一 点 比较 
重要 ， 而 偏 移 量 (冒号 后 面 的 0 的 部 分 ) 并 没有 什 
么 实际 作用 ， 会 被 忽略 挥 ， 一 般 来 说 像 这 样 写 0 束 
可 以 了 。 


现在 我 们 需要 在 HariMain 的 某 个 地 方 来 调用 


taskswitchO0， 可 到 底 该 写 在 哪里 呢 ? E, AS, Wi 
放 在 显示 “10[sec]” 的 语句 后 面 好 了 。 也 就 是 说 ， 程 
序 局 动 10 秒 以 后 进行 任务 切换 。 


AS YX AJ HariMain T 
} else if (i == 10) { /* 16 秒 计时 器 */ 


putfonts8_asc_sht(sht_back, ©, 64, COL8_FFFFFF, 
COL8_ 008484, "1@[sec]", 7); 


taskswitch4(); /* 这 里 ! */ 
} else if (i == 3) { /* 3 秒 计 时 器 */ 


大 功 告 成 了 ? 不 对 ， 我 们 还 没准 备 好 tss_b 呢 。 在 任 
务 切换 的 时 候 需 要 读 取 tss_b 的 内 容 ， 因 此 我 们 得 在 
TSS 中 定义 好 寄存 硕 的 初始 值 才 行 。 


本 次 的 HariMain 节选 


tss_b.eip = (int) &task_b_main; 

tss_b.eflags = 0x00000202; /* IF = 1; */ 
tss b.eax = 
tss b.ecx 
tss_b.edx 
tss_b.ebx 
tss_b.esp 
tss_b.ebp 
tss b.esi 
tss b.edi 
tss b.es = 1 
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乍 看 之 下 ， 狐 似 会 有 很 多 看 不 恒 的 地 方 吧 ， 我 们 从 
后 半 段 对 寄存 器 赋值 的 地 方 开 始 看 。 这 里 我 们 给 cs 
置 为 GDT 的 2 号 ， 其 他 寄存 器 都 置 为 GDT 的 1 号 ， 
asmhead.nas 的 时 候 也 是 一 样 的 。 也 束 是 说 ， 我 们 这 
次 使 用 了 和 bootpack.c 相 同 的 地 址 段 。 当 然 ， 如 果 
你 用 别 的 地 址 段 也 没 问 题 ， 不 过 这 次 我 们 只 是 想 随 


便 做 个 任务 切换 的 实验 而 已 ， 这 种 态 烦 的 事情 还 是 
以 后 再 说 吧 。 


继续 看 剩 下 的 部 分 ， 关 于 eflags 的 赋值 ， 如 果 把 STI 
后 的 EFLAGS 的 值 通 过 io_load_eflags 赋 给 变量 的 
话 ， 该 变量 的 值 就 显示 为 0x00000202， 因 此 在 这 里 
束 直 接 使 用 了 这 个 值 ， 仪 此 而 已 。 如 果 还 有 看 不 悼 
的 地 方 ， 大 概 束 是 eip 和 esp 的 部 分 了 吧 。 


在 eip 中 ， 我 们 需要 定义 在 切换 到 这 个 任务 的 时 候 ， 
要 从 哪里 开始 运行 。 在 这 里 我 们 先 把 task_b_main 这 
个 函数 的 内 存 地 址 赋值 给 它 。 


本 次 的 bootpack.c 节 选 


void task_b_main(void) 


for (;;) { io_hlt(); } 


这 个 函数 只 执行 了 一 个 HLT， 没 有 任何 实际 作用 ， 
后 面 我 们 会 对 它 进 行 各 种 改造 ， 现 在 束 完 这 样 吧 。 


task_b_esp 是 专门 为 任务 B 所 定义 的 栈 。 有 人 可 能 会 
说 ， 直 接 用 任务 A 的 栈 不 束 好 了 吗 ? 那 可 不 行 ， 如 
果真 这 么 做 的 话 ， 栈 吏 会 混成 一 团 ， 程 序 也 无 法 正 


弟 运 行 。 


本 次 的 HariMain 节选 


int task_b_esp; 


task_b_esp = memman_alloc_4k(memman, 64 * 1024) + 64 * 
1024; 


总 之 先 写成 这 个 样子 了 。 我 们 为 任务 B 的 栈 分 配 了 
64KB 的 内 存 ， 并 计算 出 栈 底 的 内 存 地 址 。 请 各 位 
回忆 一 下 向 栈 PUSH 数 据 CARE) 的 动作 ，ESP 中 存 
入 的 应 该 栈 末 尾 的 地 址 ， 而 不 是 栈 开头 的 地 址 。 


好 了 ， 我 们 已 经 讲解 得 够 多 了 ， 现 在 总 算是 万 事 俱 
fei, 4 E“make run 一 下 吧 。 这 个 程序 如 果 运 行 
正名 的 话 应 该 是 什么 样子 呢 ? 咖 ， 局 动 之 后 的 10 秘 
内 ， 还 是 跟 以 前 一 样 的 ，10 秒 一 到 便 执 行 任 务 切 

换 ，task_b_main 开 始 运 行 。 因 为 task_b_main 只 有 一 
全 HLT， 所 以 接 下 来 程序 束 全 部 停止 了 ， 鼠 标 和 键 
横 也 应 该 都 没有 有 反应 了 。 

ME souis 这 样 看 起 来 好 像 很 无 聊 啊 ， 算 了 ， 总 之 我 们 
先 来 “make run2” 吧 。10 秒 钟 的 等 竺 还 真是 漫长 .…… 
E! Se Ss! 


看 来 我 们 的 首次 任务 切换 获得 了 圆满 成 功 。 


mo ER 
98 [ler -1 0] 
memory 32MB free : 29152KB 


fal A BAB Pe TE SRS 


2 任务 切换 进 阶 (harib12b) 


刚才 我 们 只 是 实现 了 一 次 性 从 任务 A 切换 到 任务 
B， 现 在 我 们 要 尝试 再 切换 回 任 务 A。 好 ， 那 我 们 
就 在 切换 到 任务 B 的 5 秒 后 ， 让 它 再 切换 回 任务 A 
吧 。 


这 其 实 很 容易 ， 只 要 稍微 改写 一 下 task_b_main 束 可 
LT 


本 次 的 bootpack.c 节 选 


void task_b_main(void) 


{ 


struct FIFO32 fifo; 
struct TIMER *timer; 
int i, fifobuf[128]; 


fifo32 init(&fifo, 128, fifobuf); 
timer = timer_alloc(); 
timer_init(timer, &fifo, 1); 
timer_settime(timer, 500); 


for (33) { 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
io_stihlt(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 


if (i == 1) { /* 超 时 时 间 为 5 秒 */ 
taskswitch3(); /* 返 回 任务 A */ 


你 看 ， 这 样 束 搞定 了 。 在 这 里 所 使 用 的 变量 名 ， 比 
如 fifo、timer 等 ， 和 HariMain 里面 是 一 样 的 ， 不 过 
别 担 心 ， 计 算 机 会 把 它们 当成 不 同 的 变量 来 处 理 。 
无 论 我 们 对 这 里 的 变量 如 何 赋值 ， 都 不 会 影响 到 
HariMain 中 的 对 应 变量 。 这 并 不 是 因为 它们 处 于 不 
同 的 任务 ， 而 是 因为 它们 名 字 虽 然 一 样 ， 但 实际 上 
根本 是 不 同 的 变量 〈 之 前 一 直 没 有 机 会 解释 这 一 
点 ， 现 在 稍微 晚 了 上 点， 不 过 还 是 在 这 里 讲 一 下 
吧 ) 。 


对 了 ，taskswitch3 还 没有 创建 ， 我 们 需要 创建 它 。 


本 次 的 naskfunc.nas 节 选 


_taskswitch3: 3 void taskswitch3(void) ; 
JMP 3*8:0 
RET 


好 了 ， 准 备 完毕 ! 


我 们 来 “make run” 一 下 。 哇 ， 经 过 10 秒 之 后 光标 停 
止 闪 烛 ， 鼠 标 没有 反应 ， 键 盘 也 无 法 输入 文字 了 ， 

然而 又 过 了 5 秒 ， 光 标 又 重新 开始 闪烁， 刚才 键盘 
没 反应 的 时 候 打 进去 的 字 一 口气 全 都 冒 了 出 来 ， 鼠 
标 也 又 能 动 了 。 


这 就 说 明 我 们 已 经 成 功 回 到 了 任务 A 并 继续 运行 
了 ， 真 顺利 呀 。 


3 做 个 简单 的 多 任务 (1) 
(harib12c ) 


接 下 来 ， 我 们 要 实现 更 快速 的 ， 而 且 是 来 回 交 丛 的 
任务 切换 。 这 样 一 来 ， 我 们 惑 可 以 告别 光标 停 住 、 
上限 标 卡 死 、 键 盘 打 不 了 字 等 情况 ， 从 而 让 两 个 任务 
看 上 去 好 像 在 同时 运行 一 样 。 


在 开始 动手 之 前 ， 笔 者 认为 像 taskswitch3、 
taskswitch4 这 种 写法 实在 不 好 。 假 设 我 们 有 100 个 任 
务 ， 难 道 束 要 创建 100 个 任务 切换 函数 不 成 ? 这 样 
肯定 不 行 ， 最 好 是 写成 一 个 函数 ， 比 如 像 
taskswitch(3); 这 样 。 


为 了 解决 这 个 问题 ， 我 们 先 创 建 这 样 一 个 函数 。 


本 次 的 naskfunc.nas 节 选 


_farjmp: ; void farjmp(int eip, int cs); 


JMP FAR [ESP+4] ; eip, cs 
RET 


“JMP FAR’ #344 AD) Be EFT farkt. ZEJMP FAR 
指令 中 ， 可 以 指定 一 个 内 存 地 址 ，CPU 会 从 指定 的 
内 存 地 址 中 读 取 4 个 字 节 的 数据 ， 并 将 其 存 入 EIP 寄 
存 器 ， 再 继续 读 取 2 个 字 节 的 数据 ， 并 将 其 存 入 CS 


寄存 郝 。 当 我 们 调用 这 个 函数 ， 比 如 
farjmp(eip,cs);， 在 [ESP+4] 这 个 位 置 就 存放 了 eip 的 
值 ， 而 [ESP+8] 则 存放 了 cs 的 值 ， 这 样 就 可 以 实现 
far 跳 转 了 。 


因此 我 们 需要 将 调用 的 部 分 改写 如 下 : 


taskswitch3(); > farjmp(0, 3 * 8); 


taskswitch4(); > farjmp(@, 4 * 8); 
TILU 


现在 我 们 来 缩短 切换 的 间隔 。 在 任务 A 和 任务 B 

中 ， 分 别 准 备 一 个 timer ts 变量 ， 以 便 每 隔 0.02 秒 执 
行 一 次 任务 切换 。 这 个 变量 名 中 的 ts 就 是 “task 
switch” 的 缩写 ， 代 表 “ 任 务 切换 计时 器 ”的 意思 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 
timer_ts = timer_alloc(); 
timer_init(timer_ts, &fifo, 2); 


timer_settime(timer_ts, 2); 


CHH) 


for (33) { 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
io_stihlt(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (i == 2) { 
farjmp(@, 4 * 8); 
timer_settime(timer_ts, 2); 
} else if (256 <= i && i <= 511) { /* 键 盘 数 
据 */ 
CREK) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
CREK) 
} else if (i == 10) { /* 16 秒 计时 器 */ 
putfonts8_asc_sht(sht_back, ©, 64, 
COL8_FFFFFF, COL8 008484, "1@[sec]", 7); 
} else if (i == 3) { /* 3 秒 计 时 器 */ 
putfonts8 asc_sht(sht_back, ©, 80, 
COL8 FFFFFF, COL8 08484, "3[sec]", 6); 
} else if (i <= 1) { /* 光 标 用 计时 器 */ 
CREK) 
} 


} 


void task_b_main(void) 

{ 
struct FIFO32 fifo; 
struct TIMER *timer_ts; 
int i, fifobuf[128]; 


fifo32_init(&fifo, 128, fifobuf); 


timer ts = timer_alloc(); 
timer_init(timer_ts, &fifo, 1); 
timer_settime(timer_ts, 2); 


for (33) { 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
io_stihlt(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (i == 1) { /* 任 务 切 换 */ 
farjmp(@, 3 * 8); 
timer_settime(timer_ts, 2); 


上 面 的 代码 应 该 没有 什么 难点 ， 不 过 还 是 稍微 解释 
一 下 吧 。 在 每 个 任务 中 ， 当 从 farjmp 返 回 的 时 候 ， 

我 们 都 将 计时 器 重新 设 定 到 0.02 秒 之 后 ， 以 便 让 程 
序 在 返回 0.02 秒 之 后 ， 再 次 执行 任务 切换 。 


好 了 ， 这 样 做 是 不 是 能 像 我 们 所 设想 的 那样 ， 让 键 
盘 和 鼠标 持续 啊 应 呢 ? 我 们 来 “make run”...... 不 
错 ， 键 舟 打 字 、 鼠 标 操作 、 光 标 内 烁 ， 全 都 运行 正 
To SOPRA KE. RIMS. 


不 过 ， 我 们 真 的 成 功 了 吗 ? 感觉 不 是 很 靠 谱 啊 ， 
task_b_main 到 展 有 没有 运行 啊 ? HA, OR RAAB 
法 来 确认 一 下 。 


4 做 个 简单 的 多 任务 (2) 
(harib12d) 


为 了 确认 task_b_main 到 底 有 没有 运行 ， 我 们 需要 让 

task_b_main 显 示 点 什么 东西 出 来 ， 最 好 是 显示 点 会 

动 的 东西 ， 要 不 还 是 让 它 数 数 吧 ...... IRI, pe MELE 
“BRAY SCE FM? CSE) 


本 次 的 bootpack.c 节 选 


void task_b_main(void) 


{ 


struct FIFO32 fifo; 

struct TIMER *timer_ts; 

int i, fifobuf[128], count = ð; 
char s[11]; 

struct SHEET *sht_back; 


CHH) 


for (33) { 

count++; 

sprintf(s, "%1@d", count); 

putfonts8_asc_sht(sht_back, ©, 144, 

COL8 FFFFFF, COL8 008484, s, 10); 

io_cli(); 

if (fifo32_status(&fifo) == 0) { 
io_sti(); 

} else { 
CREK) 


} 
} 
} 


SAXE, BEB Sale, AE 
sht_back。HariMain 知 道 这 个 变量 的 值 ， 但 
task_b_main 可 不 知道 。 怎 么 办 呢 ? 怎样 才能 把 这 个 
变量 的 值 从 任务 A 传 递 给 任务 B 呢 ? 随便 找 一 个 内 
存 地 址 存 进 去 ， 然 后 再 从 那里 谈 出 来 ， 这 样 应 该 可 
以 吧 。 好 ， 束 用 0x0fec 这 个 地 址 ， 这 个 地 址 是 
BOOTINFO-4。 


AS YR A HariMain t iE 

*((int *) @x@fec) = (int) sht_back; 

AW Wtask_b main 节选 

sht_back = (struct SHEET *) *((int *) Ox@fec); 


这 里 用 了 很 多 强制 数据 类 型 转换 操作 ， 代 码 比 较 难 
EE, ACRE 


现在 让 我 们 来 运行 一 下 。 不 知道 结果 如 何 ， 心 里 好 
紧张 啊 。“make run”, IE, z3) y3) y ! task_b main 
和 HariMain 在 同时 运行 ! 当然 ， 实 际 上 只 是 因为 切 


换 速 度 很 快 ， 所 以 造成 了 在 同时 运行 的 假象 。 无 论 
如 何 ， 我 们 的 多 任务 取得 了 圆满 成 功 ! 


(132, 134) 
38 [ler -1 


2] 
memory 32MB free : 29152KB 


10[sec] , 
3[sec ] window 


[MULTI-TASK GO GOW 


多 任务 成 功 


(其 实 我 们 在 harib12c 的 时 候 就 已 经 成 功 实现 了 多 
任务 ， 只 不 过 当时 还 没有 加 入 显示 功能 ， 所 以 无 法 
实际 感受 到 而 已 。) 


5 提高 运行 速度 Charib12e) 


刚 开 始 看 到 harib12d 的 成 果 还 党 得 挺 感 动 的 ， 过 段 
时 间 头 脑 冷 静 下 来 以 后 再 看 的 话 ， 发 现 task_b_main 
数 数 的 速度 即便 在 真 机 环境 下 运行 还 是 非常 慑 ， 我 
们 得 想 办 法 提高 它 的 运行 速度 。Harib10i 在 7 秒 钟 的 
时 间 内 可 以 数 到 0099969264， 相 比 之 下 ，harib12d 
也 太 慢 了 。 任 务 A 和 任务 B 交 蔡 运 行 的 情况 下 ， 人 性 
能 下 降 到 原来 的 一 半 还 可 以 理解 ， 如 果 比 这 个 还 慢 
a MILA TIERS T -o 


那 运行 速度 为 什么 会 这 么 慢 呢 ? 因为 我 们 的 程序 每 
计 1 个 数 就 在 画面 上 显示 一 次 ， 但 1 秒 钟 之 内 刷新 
100 次 以 上 的 话 ， 人 了 眼 根本 就 分 辩 不 出 来 ， 所 以 我 
们 不 需要 计 1 个 数 束 刷新 一 次 ， 只 要 每 隔 0.01 秒 刷新 
RIEK Jo 


本 次 的 bootpack.c 节 选 


void task_b_main(struct SHEET *sht_back) 
{ 


struct FIFO32 fifo; 

struct TIMER *timer_ts, *timer_put; 
int i, fifobuf[128], count = ð; 
char s[12]; 


fifo32_init(&fifo, 128, fifobuf); 
timer_ts = timer_alloc(); 


timer_init(timer_ts, &fifo, 2); 
timer_settime(timer_ts, 2); 
timer_put = timer_alloc(); 
timer_init(timer_put, &fifo, 1); 
timer_settime(timer_put, 1); 


for (;;) { 
count++; 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
io_sti(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (i == 1) { 
sprintf (s, "%11d", count); 
putfonts8_asc_sht(sht_back, ©, 144, 
COL8_FFFFFF, COL8_008484, s, 11); 
timer_settime(timer_put, 1); 
} else if (i == 2) { 
farjmp(@, 3 * 8); 
timer_settime(timer_ts, 2); 


基本 上 就 是 这 个 样子 。 对 了 ， 代 码 开 头 的 sht_back 
我 们 改 为 作为 函数 的 参数 来 传递 了 ， 关 于 这 一 点 我 
们 以 后 会 讲 到 ， 大 家 不 必 担 心 。 


另外 ， 上 面 的 代码 还 把 任务 切换 计时 器 超时 的 时 候 
向 FIFO 写 入 的 值 改 为 了 2。 其 实 不 改 也 没什么 问 


题 ， 只 不 过 因为 这 个 计时 器 定 了 0.02 秒 这 个 数 ， 所 
WIF A2 T o 


还 有 ，count 数 值 的 显示 格式 改 成 了 11 位 数字 ， 因 为 
运行 速度 变 快 了 的 话 ， 说 不 定数 字 位 数 会 不 够 用 呢 
(R) 。 


关于 将 sht_back 的 值 从 HariMain 传 递 过 来 的 方法 ，* 
((int *) 0x0fec) 这 样 的 写法 感觉 实在 是 不 好 看 ， 于 是 
果断 废弃 了 ， 我 们 用 栈 来 苦 代 它 。 


举 个 例子 ，load_tr(123); 这 样 的 函数 调用 ， 如 果 从 汇 
编 语言 的 角度 来 考虑 的 话 ， 参 数 指定 的 数值 

(123) 就 放 在 内 存 中 ， 地 址 为 ESP+4， 这 是 C 语 言 
的 一 个 既定 机 制 。 


既然 有 这 种 机 制 ， 那 么 我 们 可 以 反 过 来 利用 一 下 ， 
也 就 是 说 ， 在 HariMain 里 面 这 样 写 : 


AS YX AJ HariMain T 4 


task_b_esp = memman_alloc_4k(memman, 64 * 1024) + 64 * 
1024 - 8; 


*((int *) (task b esp + 4)) = (int) sht_back; 


这 样 一 来 ， 在 任务 B 启 动 的 时 候 ，[ESP+4] 这 个 地 址 
里 面 就 已 经 存 入 了 sht_back 的 值 ， 因 此 我 们 就 其 驴 
了 task_b_main， 让 它 以 为 自己 所 接收 到 的 sht_back 
是 作为 一 个 参数 传递 过 来 的 。 


可 能 有 人 不 明白 为 什么 我 们 要 把 task_b_esp 的 地 址 
减 8， 减 4 不 就 可 以 了 吗 ? 我 们 当然 不 能 减 4， 只 要 
仔细 思考 一 下 束 能 搞 清 楚 这 里 的 奥妙 。 


假设 memman alloc _ 4k 分配 出 来 的 内 存 地 址 为 
0x01234000， 由 于 我 们 申请 分 配 了 64KB 的 内 存 空 
间 ， 那 么 我 们 可 以 自由 使 用 的 内 存 地 址 束 是 从 
0x01234000 到 0x01243fff 为 止 的 这 一 块 。 如 果 在 这 
里 我 们 既 不 减 4 也 不 减 8， 而 是 直接 加 上 64* 1024 的 
话 ，task_b_esp 即 为 0x01244000。 如 果 我 们 减 去 4， 
task_b_esp 即 为 0x01243ffc， 但 我 们 写 入 sht_back 的 
地 址 是 task_b_esp + 4， 算 下 来 就 变 成 了 
0x01244000， 如 果 把 4 字 节 的 sht_back 值 写 入 这 个 地 
址 的 话 ， 就 超出 了 分 配给 我 们 的 内 存 范 
(0x01234000~0x01243fff) ， 这 样 不 行 。 


而 如 果 我 们 减 去 8，task_b_esp 即 为 0x01243ff8， 写 
入 sht_back 的 地 址 是 task_b_esp + 4， 即 0x01243ffc， 
从 这 个 地 址 同 后 写 入 4 字 节 的 sht_back 值 ， 则 正好 在 
分 配 出 来 的 内 存 范 围 (0x01234000~0x01243fff) 
内 完成 操作 ， 这 样 就 不 会 出 问题 了 。 


好 5 RIKET m BAER EER SS? WE, 
task_b_main 有 没有 被 我 们 欺骗 而 顺利 接收 到 
sht_back 的 值 呢 ?如 果 这 一 招 不 成 功 的 话 ，sht_back 
HAVEL CS HH EO ee IFA A E E RM ea JS HH Ba 
To “make run” , MINAS, MAT KR (请 
JER, ee ee ee 
态 ， 这 时 就 已 经 数 到 这 么 大 的 数字 了 ! ) 。 


1 
ae | 
memory 32MB free : 29152KB 


即便 是 模拟 器 环境 下 运行 速度 也 己 经 相当 快 了 
COLUMN-9 TH A féreturn? 


在 这 一 节 中 ，task_b main 已 经 变 得 像 一 个 普通 函 
数 一 样 了 ， 但 是 在 这 个 函数 中 干 万 不 使 用 


returno 


retum 的 功能 ， 说 到 底 其 实 是 返回 函数 被 调用 位 置 
的 一 个 JMP 指 令 ， 但 这 个 task_b _ main 并 不 是 由 某 


段 程 序 直接 调用 的 ， 因 此 不 能 使 用 return。 如 果 强 
行 return 的 话 ， 就 会 像 “ 执 行 数据 ”一 样 发 生 问 题 ， 
程序 无 法 正常 运行 。 


HariMain 的 情况 也 是 一 样 的 ， 也 禁止 使 用 return。 


我 们 在 15.1 节 中 讲 过 ， 为 了 记 住 现在 正在 执行 的 
指令 所 在 的 内 存 地 址 ， 需 要 使 用 EIP 寄 存 器 ， 那 么 
return 的 时 候 要 返回 的 地 址 又 记录 在 哪里 昵 ? 对 于 
记性 不 好 的 CPU 来 说 ， 上 痛 定 会 把 这 个 地 址 保存 在 
某 个 地 方 ， 没 错 ， 它 束 保 存在 栈 中 ， 地 址 是 
[ESP]。 


因此 ， 我 们 不 仅 可 以 利用 [ESP+4]， 还 可 以 利用 
[ESP] 来 欺骗 CPU， 其 实 只 要 癌 [ESP] 写 入 一 个 合 
适 的 值 ， 告 诉 CPU 应 该 返回 到 哪个 地 址 ， 
task _b _ main 中 束 可 以 使 用 return 了。 


6 测试 运行 速度 Charib12f) 


我 们 的 程序 运行 得 很 快 ， 可 是 到 确 有 多 快 呢 ? 我 们 
得 想 个 办 法 测 一 下 。 可 能 有 人 会 说 ， 别 搞 这 种 节 外 
生 枝 的 玩意 儿 了 ， 赶 快 继续 往 下 讲 吧 ! 咽 ， 要 说 也 
是 ， 这 的 确 是 有 点 不 务 正 业 了 ， 不 过 该 玩 的 时 候 也 
ot — HI ! 


我 们 同 task_b main 添加 了 一 些 代 码 。 


本 次 的 bootpack.c 节 选 


void task_b_main(struct SHEET *sht_back) 
{ 


struct FIFO32 fifo; 

struct TIMER *timer_ts, *timer_put, *timer 1s; 
int i, fifobuf[128], count = ð, count® = @; 
char s[12]; 


CHH) 

timer_1s = timer_alloc(); 
timer_init(timer_1s, &fifo, 100); 
timer_settime(timer_1s, 100); 


fòr (33) { 


count++; 

io_cli(); 

if (fifo32_status(&fifo) == 0) { 
io_sti(); 


} else { 
i = fifo32_get(&fifo) ; 
io sti(); 
if (i == 1) { 
《中 略 ) 
} else if (i == 2) { 
(中 上 略 ) 
} else if (i == 100) { 
sprintf(s, "%11d", count - counté@); 
putfonts8 asc sht(sht back, ©, 128, 
COL8 FFFFFF, COL8 008484, s, 11); 
count® = count; 
timer_settime(timer_1s, 100); 
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YE, “make run”。 不 错 ， 在 模拟 器 环境 下 运行 成 
Lis 


6 -1] 
memory 32MB free : 29152KB 


10[sec] 
3[sec] 


86952 


3479465 


上 面 的 数字 显示 的 是 速度 哦 
COLD 


现在 我 们 到 真 机 环境 运行 一 下 。 哇 ， 好 快 ! 果然 真 
机 环境 就 是 快 ， 速 度 已 经 达到 大 约 46382001 了 。 


“最 后 两 位 数字 的 值 经 常 变 动 ， 因 此 用 00 代 和 蔡 。 


我 们 把 这 个 速度 和 harib10i 做 个 对 比 。harib10i 在 7 秒 
内 计数 到 0099969264， 即 速度 为 每 秒 14281323， 相 
比 之 下 性 能 是 现在 的 3 倍 。 喷 ， 怎 么 会 这 样 ? 如 果 
是 2 倍 的 话 还 可 以 理解 ，3 倍 就 有 点 过 分 了 。 


看 到 这 个 结果 心里 当然 会 很 不 雍 ， 我 们 来 找 找 原 
因 。 嗯 ， 每 隔 0.01 秒 刷新 显示 是 不 是 不 太 好 呢 ?” 如 
果 显 示 计 数 是 导致 速度 慢 的 原因 ， 那 干脆 就 别 显 示 
了 吧 。 我 们 把 开头 的 timer_settime (timer_put, 1) ; 
一 句 删 挥 ， 这 样 一 来 由 于 计时 器 没有 被 设 定 ， 束 不 
会 引起 超时 中 断 ， 也 就 不 会 触 友 显示 了 。 


(160, 
oo E 
me 
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mory 32MB free : 29152KB 


现在 仅 显 示 速 度 值 了 


那么 在 真 机 环境 下 运行 情况 如 何 呢 ? 哇 ， 速 度 真 的 
快 了 不 少 ， 现 在 的 成 绩 是 6774100， 和 14281323 相 

比 ， 性 能 差距 为 2.1 倍 ， 这 样 已 经 很 令 人 满意 了 。 大 
概 JMP 的 地 址 也 会 影响 计数 的 速度 ， 另 外 ， 如 果 把 
速度 显示 改 成 每 隔 5 秒 刷新 一 次 ， 任 务 切换 间隔 再 

改 成 0.03 秒 的 话 ， 估 计 性 能 差距 可 以 更 加 接近 理想 
的 2.0 倍 ， 不 过 现在 这 个 阶段 我 们 就 不 去 一 一 尝试 

Js 


7 多 任务 进 阶 〈harib12g ) 


到 现在 为 止 ， 我 们 所 做 的 多 任务 都 是 依靠 在 
HariMain 和 task_b _ main 中 写 入 负责 任务 切换 的 代 伍 
来 实现 的 。 有 人 会 说 ， 这 种 多 任务 方式 “不 是 真正 
的 多 任务 ”即便 如 此 ， 应 该 也 不 至 于 被 说 成 是 “ 假 
的 ”多 任务 ) 。 


那么 真正 的 多 任务 又 是 什么 样 的 呢 ? 真正 的 多 任 
务 ， 是 要 做 到 在 程序 本 和 喘 不 知道 的 情况 下 进行 任务 
切换 。 既 然 如 此 ， 我 们 就 来 为 “ 纸 娃 娃 系 统 ” 添 加 真 
正 的 多 任务 吧 。 

首先 我 们 来 创建 这 样 一 个 函数 。 


本 次 的 mtask.c 节 选 


struct TIMER *mt_timer; 
int mt_tr; 


void mt_init(void) 


mt_timer = timer_alloc(); 

/* 这 里 没有 必要 使 用 timer_init */ 
timer settime(mt timer, 2); 
mt tr = 3 * 8; 

return; 


void mt_taskswitch(void) 
{ 
if (mt_tr == 3 * 8) { 
mt_tr = 4 * 8; 
} else { 
mt_tr = 3 * 8; 
} 
timer settime(mt timer, 2); 
farjmp(@, mt_tr); 
return; 


mt_init 函 数 的 功能 是 初始 化 mt_timner 和 mt tr 的 值 ， 
并 将 计时 器 设置 为 0.02 秒 之 后 ， 仅 此 而 已 。 在 这 
里 ， 变 量 mt_tr 实 际 上 代表 了 TR 和 寄存 器， 而 不 需要 
使 用 timer_init 是 因为 在 发 生 超时 的 时 候 不 需要 问 
FIFO 绥 冲 区 写 入 数据 。 具 体内 容 请 继续 往 下 看 。 


接 下 来 ，mt_taskswitch 孙 数 的 功能 是 按照 当前 的 
mt_tr 变 量 的 值 计 算出 下 一 个 mt_tr 的 值 ， 将 计时 器 
重新 设置 为 0.02 秒 之 后 ， 并 进行 任务 切 搞 ， 很 简单 
吧 。 


PT LLL 
下 面 我 们 来 改造 一 下 timer.c 的 inthandler20。 


本 次 的 timer.c 节 选 


void inthandler2@(int *esp) 
{ 


char ts = 0; 
(中略 》 
for (;;) { 
/* timers 的 计时 器 全 部 在 工作 中 ， 因 此 不 用 确认 flags 


if (timer->timeout > timerctl.count) { 
break; 


} 
/* 超 时 */ 
timer->flags = TIMER_ FLAGS ALLOC; 
if (timer != mt timer) { 
fifo32_put(timer->fifo, timer->data) ; 
} else { 
ts = 1; /* mt timer 超 时 */ 
} 
timer = timer->next; /* 将 下 一 个 计时 器 的 地 址 赋 给 
timer */ 
} 
timerctl.t@ = timer; 
timerctl.next = timer->timeout; 
if (ts != 0) { 
mt_taskswitch(); 
} 


return; 


在 这 里 ， 如 果 产 生 超时 的 计时 器 是 mt_timer 的 话 ， 
不 同 FIFO 写 入 数据 ， 而 是 将 ts 置 为 1。 最 后 判断 如 
果 ts 的 值 不 为 0， 就 调用 mt_ taskswitch 进 行 任 务 切 
换 。 


个 变量 呢 ? 在 /* 超时 */ 的 地 方 直接 调用 
mt_taskswitch wher S45? 也 束 是 下 面 这 样 : 


出 问题 的 例子 


void inthandler2@(int *esp) 


《中 上 略 ) 
for (33) { 
/* timers 的 计时 器 全 部 在 工作 中 ， 因 此 不 用 确认 flags 


if (timer->timeout > timerctl.count) { 
break; 


} 
/* 超 时 */ 
timer->flags = TIMER_ FLAGS ALLOC; 
if (timer != mt timer) { 
fifo32 put(timer->fifo, timer->data); 
} else { 
mt_taskswitch(); 
} 
timer = timer->next; /* 将 下 一 个 计时 器 的 地 址 赋 给 
timer */ 
} 
timerctl.t@ = timer; 
timerctl.next = timer->timeout; 
return; 


为 什么 不 这 样 写 呢 ? 这 样 写 的 确 可 以 让 代码 更 简 


短 ， 但 是 会 出 问题 。 


出 问题 的 原因 在 于 ， 调 用 mt _ taskswitch 进 行 任务 切 
换 的 时 候 ， 即 便 中 有 断 处 理 还 没完 成 ，IF (中 断 允 许 
标志 ) 的 值 也 可 能 会 被 重 设 回 1 (因为 任务 切换 的 
时 候 会 同时 切换 EFLAGS) 。 这 样 可 不 行 ， 在 中 断 
处 理 还 没完 成 的 时 候 ， 可 能 会 产生 下 一 个 中 断 请 

求 ， 这 会 导致 程序 出 错 。 


此 我 们 需要 采用 这 样 的 设计 一 等 中 断 处 理 全 部 
完成 之 后 ， 再 在 必要 时 调用 mt _taskswitch 。 


接 下 来 我 们 只 需要 将 HariMain 和 task_b_main 里 面 有 
天 任务 切换 的 代码 删 挤 即 可 。 删 代码 没什么 难度 ， 
而 有 旦 HariMain 义 很 长 ， 为 了 市 约 纸 张 我 们 束 省 略 

了 ， 只 把 task_b_main 写 在 下 面 吧 。 


本 次 的 bootpack.c 节 选 


void task_b_main(struct SHEET *sht_back) 
{ 


struct FIFO32 fifo; 

struct TIMER *timer_put, *timer_1s; 

int i, fifobuf[128], count = ð, count® = @; 
char s[12]; 


fifo32 init(&fifo, 128, fifobuf); 
timer_put = timer_alloc(); 
timer_init(timer_put, &fifo, 1); 
timer_settime(timer_put, 1); 


timer 1s = timer_alloc(); 
timer_init(timer_1s, &fifo, 100); 
timer_settime(timer_1s, 100); 


for (33) { 
count++; 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
io_sti(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (i == 1) { 
sprintf(s, "%11d", count); 
putfonts8_asc_sht(sht_back, ©, 144, 
COL8_FFFFFF, COL8 008484, s, 11); 
timer_settime(timer_put, 1); 
} else if (i == 100) { 
sprintf(s, "%11d", count - count@); 
putfonts8_asc_sht(sht_back, ©, 128, 
COL8_FFFFFF, COL8 008484, s, 11); 
count® = count; 
timer_settime(timer_1s, 100); 


像 这 样 ， 把 有 关 任 务 切换 的 部 分 全 部 删 挥 就 可 以 
To 


好 ， 我 们 来 试 试看 能 不 能 正常 工作 吧 。“make 
run”, MIS, BPO! 不 过 看 上 去 和 之 前 没什么 
DX Jill o 


和 上 一 节 相 比 ， 为 什么 现在 的 设计 可 以 称 为 "真正 

的 多 任务 ? 呢 ? 因为 如 果 使 用 这 样 的 设计 ， 即 便 在 

程序 中 不 进行 任务 切换 的 处 理 《〈《 比 如 瑟 记 写 了 ， 或 
者 因为 bug 没 能 正常 切换 之 类 的 ) ， 也 一 定 会 正 各 
完成 切换 。 之 前 那 种 多 任务 的 话 ， 如 果 任 务 B 因 为 
发 生 bug 而 无 法 进行 切换 ， 那 么 当 切 换 到 任务 B 以 

后 ， 其 他 的 任务 就 再 也 无 法 运行 了 ， 这 样 会 造成 无 
论 是 投 键 盘 还 是 动 鼠 标 都 坚 无 反应 的 悉 剧 。 


84485 
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真正 的 多 任务 也 成 功 了 ! 


真正 的 多 任务 不 会 发 生 这 样 的 问题 ， 因 此 这 种 方式 
更 好 ..…. 话 虽 如 此 ， 但 其 实 即便 是 harib12g， 在 任 
务 B 发 生 bug 的 情况 下 ， 也 有 可 能 出 现 键盘 输入 失去 
响应 的 问题 。 例 如 ， 明 明 写 了 io_cli0; 却 忘记 写 

io_stiO; 的 话 ， 中 上 断 束 会 一 直 处 于 蔡 止 状态 ， 即 使 产 


生 了 计时 喜 中 断 请 求 ， 也 不 会 被 传递 给 中 断 处 理 程 
序 。 这 样 一 来 ，mt taskswitch 当 然 也 残 不 会 被 调 
用 ， 这 意味 着 任务 切换 也 就 不 会 被 执行 。 


其 实 CPU 已 经 为 大 家 准备 了 解决 这 个 问题 的 方法 ， 
因此 我 们 稍 后 再 考 夺 这 个 问题 吧 。 


好 ， 我 们 在 真 机 环境 下 运行 一 下 ， 看 看 速度 会 不 会 
ABTS. WE? 速度 非但 没有 变 慢 ， 反 而 变 快 了 ? 运行 
结果 是 6493300， 和 之 前 的 14281323 相 比 ， 性 能 的 
差距 是 2.2 倍 。harib12f 的 时 候 还 是 差 3 倍 来 着 ， 这 次 
也 太 快 了 吧 。 我 们 再 把 timer_settime(timer_put,1T); 删 
反 ， 看 看 如 果 不 显示 计数 只 显示 速度 会 怎样 ? 说 不 
定 速度 会 变 得 更 快 呢 ? HE! 结果 出 来 了 ， 

6890930， 居 然 达 到 了 2.07 倍 ， 离 理想 值 2.0 倍 又 近 
了 一 步 呢 。 


现在 想 想 看 ， 为 什么 速度 反而 会 变 快 呢 ? 我 想 这 是 
因为 在 任务 切换 的 时 候 ， 我 们 不 再 使 用 FIFO 绥 冲 区 
的 缘故 。 之 前 我 们 问 FIFO 中 写 入 超时 的 编号 ， 然 后 
从 中 读 取 这 个 编写 来 判断 是 否 执 行 任务 切换 ， 相 比 
之 下 ， 现 在 的 做 法 貌似 对 于 CPU 来 说 负担 更 小 些 ， 
一 定 是 这 个 原因 吧 。 
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吧 ， 我 们 明天 继续 。 


第 16 天 多 任务 (2) 


。 任务 管理 上 自动 化 Charib13a ) 
。 让 任务 休眠 Charib13b) 
。 增 加 窗口 数量 Charib13c) 


设 定 任务 优先 级 (1) (harib13d) 
设 定 任务 优先 级 (2) (harib13e) 


1 任务 管理 目 动 化 (harib13a ) 


大 家 好 ! 昨天 我 们 已 经 实践 了 很 多 关于 多 任务 的 内 
容 ， 不 过 今天 我 们 还 得 继续 讲 多 任务 。 可 能 有 人 会 
Wh, “ 老 是 讲 多 任务 都 听 肛 了 啊 ! ”， 但 多 任务 真 的 
非常 重要 《当然 ， 如 果 你 不 想 做 一 个 多 任务 的 操作 
系统 ， 那 就 不 重要 啦 ) 。 从 笔者 的 角度 来 说 ， 和 希望 
大 家 能 够 在 充分 做 好 多 任务 机 制 的 基础 上 ， 再 利用 
人 ee 
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在 15.7 节 中 ， 我 们 已 经 实现 了 真正 的 多 任务 ， 不 过 
这 样 还 不 够 完善 ， 或 者 说 不 太 好 用 。 如 果 我 们 想 要 
运行 三 个 任务 的 话 ， 束 必须 改写 mt_taskswitch 的 代 
人 码 。 笔 者 认为 ， 这 样 的 设计 实在 太 逊 了 ， 如 果 能 像 
当初 定时 右 和 窗口 背景 的 做 法 一 样 (具体 如 下 )， 
是 不 是 和 澳 得 更 好 呢 ? 


task = task\_alloc(); 


task->tss.eip = ox; 
task->tss.esp = AO; 


(R E EXE AC E PP ek FF Ar IW 28 


task\_run(task) ; 
我 们 融 先 以 此 为 目标 ， 对 代码 进行 改造 吧 。 


于 是 我 们 写 了 下 面 这 样 一 段 程序 ，struct TASKCTL 
是 仿照 struct SHTCTL 写 出 来 的 ， 首 先 我 们 来 看 结构 


本 次 的 bootpack.h 节 选 


#define MAX_TASKS 1000 /* 最 大 任务 数量 */ 
#define TASK GDTO 3 /# 定 义 从 GDT 的 几 号 开始 分 配 
给 TSS */ 


struct TSS32 { 
int backlink, esp@, ss@, esp1, ssl, esp2, ss2, cr3; 
int eip, eflags, eax, ecx, edx, ebx, esp, ebp, esi, 
edi; 
int es, cs, ss, ds, fs, gs; 
int ldtr, iomap; 


j 


struct TASK { 
int sel, flags; /* sel 用 来 存放 GDT 的 编号 */ 
struct TSS32 tss; 

}; 


struct TASKCTL { 
int running; /* 正 在 运行 的 任务 数量 */ 
int now; /* 这 个 变量 用 来 记录 当前 正在 运行 的 是 哪个 任务 */ 


struct TASK *tasks[MAX_TASKS]; 
struct TASK tasks@[MAX_TASKS ] ; 
}; 


下 面 我 们 来 创建 用 来 对 struct TASKCTL 及 其 当中 包 
含 的 struct TASK 进行 初始 化 的 函数 task_init。 由 于 
struct TASKCTL 是 一 个 很 庞大 的 nity, 因此 我 们 让 
它 从 memman_alloc 来 申请 内 存 空 间 。 这 个 函数 是 用 
来 替代 mt_init 使 用 的 。 


我 们 使 用 sel 这 个 变量 来 存放 GDT 编 号， sel 

是 “selector 的 缩写 ， 意 为 选择 符 。 因 为 英特尔 的 大 
叔 管 段 地 址 叫做 selector， 所 以 笔者 只 是 照 猫 画 虎 而 
已 ， 也 就 是 代表 “应 该 从 GDT 里 面 选 择 哪个 编号 ”的 
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本 次 的 mtask.c 节 选 


struct TASKCTL *taskctl; 
struct TIMER *task_timer; 


struct TASK *task_init(struct MEMMAN *memman) 
{ 

int i; 

struct TASK *task; 

struct SEGMENT _DESCRIPTOR *gdt = (struct 
SEGMENT_DESCRIPTOR *) ADR_GDT; 

taskctl = (struct TASKCTL *) 


memman_alloc_4k(memman, sizeof (struct TASKCTL ) ) ; 
for (i = ð; i < MAX_TASKS; i++) { 


taskctl->tasks0[i].flags = ®ð; 
taskctl->tasks@[i].sel = (TASK GDT6 + i) * 8; 
set_segmdesc(gdt + TASK_GDT@ + i, 103, (int) 
&taskctl->tasks@[i].tss, AR_TSS32); 

} 

task = task_alloc(); 

task->flags = 2; /* 活 动 中 标志 */ 

taskctl->running = 

taskctl->now = 9; 

taskctl->tasks[@] = task; 

load_tr(task->sel); 

task_timer = timer_alloc(); 

timer_settime(task_timer, 2); 

return task; 


调用 task init， 会 返回 一 个 内 存 地 址 ， 意 思 是 “现在 
EMTA ET CARM-MES ST”. 
能 大 家 不 是 很 能 理解 这 个 说 法 ， 在 调用 init 之 后 ， 
所 有 程序 的 运行 都 会 被 当成 任务 来 进行 管理 ， 而 调 
人 
务 ， 这 样 一 Xi 通过 调用 任务 的 设置 函数 ， a BY DA 
对 任务 进行 各 种 控制 ， 比 如 说 修改 优先 级 等 。 


下 和 面 我 们 来 创建 用 来 初始 化 一 个 任务 结构 的 函数 。 


本 次 的 mtask.c 节 选 


struct TASK *task_alloc(void) 
{ 
int i; 
struct TASK *task; 
for (i = ð; i < MAX_TASKS; i++) { 
if (taskctl->tasks@[i].flags == 0) { 
task = &taskctl->tasks@[i]; 
task->flags = 1; /* 正 在 使 用 的 标志 */ 
task->tss.eflags = 0x0Q@000202; /* IF = 1; 


task->tss.eax ; /* 这 里 先 置 为 6*/ 
task->tss.ecx = 0; 
task->tss.edx = 
task->tss.ebx = 
task->tss.ebp 

task->tss.esi 

task->tss.edi = 

task->tss.es 

task->tss.ds = 

task->tss.fs = 

task->tss.gs 

task->tss.ldtr ð; 
task->tss.iomap = 0x40000000; 
return task; 


} 
} 
return 0; /* 全 部 正在 使 用 */ 


关于 寄存 器 的 初始 值 ， 这 里 先 随便 设置 了 一 下 。 如 
果 不 喜 欢 这 个 值 ， 可 以 在 bootpack.c 里 面 设 置 一 
"Bs 


接 下 来 是 task_run， 这 个 函数 非 党 短 ， 看 看 这 样 写 
如 何 。 
本 次 的 mtask.c 节 选 


void task_run(struct TASK *task) 
{ 


task->flags = 2; /* 活 动 中 标志 */ 


taskctl->tasks[taskctl->running] = task; 
taskctl->running++; 
return; 


IARAMH, taski BlltasksHy AR EB, 2A 
后 使 running 加 1， 仅 此 而 已 。 


最 后 是 task_switch， 这 个 函数 用 来 代替 
mt_taskswitch. 


在 timer.c 中 对 mt _ taskswitch 的 调用 ， 也 相应 地 修改 
为 调用 task_switch。 


本 次 的 mtask.c 节 选 


void task_switch(void) 
{ 


timer_settime(task_timer, 2); 
if (taskctl->running >= 2) { 
taskctl->now++; 
if (taskctl->now == taskctl->running) { 
taskctl->now = Q; 
} 


farjmp(@, taskctl->tasks[taskctl->now]->sel); 


return; 


当 running 为 1 时 ， 不 需要 进行 任务 切换 ， 函 数 直 接 
结束 。 当 running 大 于 等 于 2 时 ， 先 把 now 加 1， 然 后 
把 now 所 代表 的 任务 切换 成 当前 任务 ， 最 后 再 将 末 
尾 的 任务 移动 到 开头 。 


现在 我 们 用 以 上 这 些 结构 和 函数 ， 将 bootpack.c 改 
FF a 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


{ 


中略) 
struct TASK *task_b; 


CHH) 


task_init(memman) ; 
task_b = task_alloc(); 


task_b->tss.esp = memman_alloc_4k(memman, 64 * 
1024) + 64 * 1024 - 8; 
task_b->tss.eip = (int) &task_b_main; 


task_b->tss.es = 1 * 8; 
task_b->tss.cs = 2 * 8; 
task_b->tss.ss = 1 * 8; 
task_b->tss.ds = 1 * 8; 
task_b->tss.fs = 1 * 8; 


task_b->tss.gs = 1 * 8; 
*((int *) (task_b->tss.esp + 4)) = (int) sht_back; 
task_run(task_b); 


CHH) 


行 数 变 少 了 ， 不 过 相应 地 mtask.c 却 变 长 了 ， 好 像 也 
不 能 说 是 非常 好 。 不 过 好 在 ， 在 HariMain 中 ， 融 再 
也 不 用 管 GDT 到 底 怎样 、 任 务 B 的 tss 要 分 配 到 GDT 
的 几 号 等 。 这 些 研 烦 的 事情 ， 全 部 交 给 mtask.c 来 处 
理子 


当 需 要 增加 任务 数量 的 时 候 ， 不 用 再 像 之 前 那样 修 
改 task_switch 了 ， 只 要 先 task_alloc， 然 后 再 task_run 
LIT So 


Ta 我 们 来 运行 一 下 ， “make run” o ASG 貌似 
成 功 了 。 


2 让 任务 休眠 Charib13b) 


直到 harib13a 为 止 ， 我 们 所 实现 的 多 任务 ， 是 为 两 
个 任务 分 配 大 约 相 同 的 运行 时 间 。 这 也 不 能 说 是 不 
好 ， 不 过 相 比 之 下 ， 任 务 A 明 显 空闲 的 时 间 比 较 
多 。 没 有 键盘 输入 、 没 有 鼠标 操作 也 不 会 经 常 出 现 
定时 器 中 断 这 样 的 情况 ， 这 个 时 候 任务 A 没 什么 事 
做 ， 束 只 好 HLTT。 


HLT 的 时 候 能 省 电 ， 也 不 错 咏 ! 不 过 当 任 务 B 全 力 
以 赴 拼 命 干 活 的 时 候 ， 任 务 A 却 在 无 所 事 事 ， 这 样 
好 像 不 太 好 。 笔 者 觉得 ， 与 其 让 任务 A 内 着 没 事 
干 ， 还 不 如 把 这 些 时 间 分 给 坚 忙 的 任务 B 呢 。 


那么 怎样 才能 避免 任务 A 浪费 时 间 呢 ?如 果 我 们 不 
让 任务 A 去 HLT， 而 是 把 它 从 taskctl 一 >tasks[] 中 删 

挥 的 话 ， 叫 ， 这 应 该 是 一 个 不 错 的 主意 。 如 果 把 任 
务 A 从 tasks 中 删 控 ， 只 保留 任务 B， 那 任务 B 束 可 以 
全 力 以 赴 工 作 了 。 像 这 样 将 一 个 任务 从 tasks 中 删除 
的 操作 ， 用 多 任务 中 的 术语 来 说 叫做 “ 休 

眠 ”(sleep) 。 


不 过 这 样 也 有 一 个 问题 ， 当 任务 A 休 眠 时 ， 即 便 
FIFO 有 数据 过 来 ， 也 无 法 啊 应 了 ， 这 可 不 行 ， 当 
FIFO 有 数据 过 来 的 时 候 ， 必 须要 把 任务 A 唤 醒 。 人 怎 


么 唤醒 呢 ? 其 实 只 要 再 运行 一 次 task_run 就 可 以 了 
(KX) 。 


TOLT 
首先 我 们 创建 task_sleep。 


本 次 的 mtask.c 节 选 


void task_sleep(struct TASK *task) 
{ 


int i; 
char ts = 0; 


if (task->flags == 2) { /* URIE EAE SET RETR 


if (task == taskctl->tasks[taskctl->now]) { 
= 1; /*# 让 自己 休眠 的 话 ， 稍 后 需要 进行 任务 切换 


} 
/* 寻 找 task 所 在 的 位 置 */ 
for (i = ð; i < taskctl->running; i++) { 
if (taskctl->tasks[i] == task) { 
/* 在 这 里 */ 
break; 
} 
} 


taskctl->running--; 
if (i < taskctl->now) { 
taskctl->now--; /* 需 要 移动 成 员 ， 要 相应 地 处 理 */ 


} 

/* 移 动 成 员 */ 

for (; i < taskctl->running; i++) { 
taskctl->tasks[i] = taskctl->tasks[i + 1]; 


} 
task->flags = 1; /* 不 工作 的 状态 */ 
if (ts != 6) { 
/* 任 务 切 换 */ 
if (taskctl->now >= taskctl->running) { 
/* 如 果 now 的 值 出 现 异常 ， 则 进行 修正 */ 
taskctl->now = 0; 


} 
farjmp(@, taskctl->tasks[taskctl->now] - 
>sel); 
} 
} 
return; 
} 


ORIN TEP ERK, MAZI —HEVE RE. RIME 
RAITI BUM E “MES TE MES 
体 上 ?的 情形 还 是 很 简单 的 ， 只 要 在 tasks 中 搜索 该 
任务 ， 找 到 后 用 后 面 的 成 员 填 充 过 来 即 可 。 


问题 是 类 似 任 务 A 让 任务 A 休眠 这 样 “自己 让 自己 休 
眠 ”的 情形 ， 因 为 是 要 让 当前 正在 运行 的 任务 休 
眠 ， 因 此 在 处 理 结束 之 后 必须 马上 切换 到 下 一 个 任 
务 。 只 要 注意 以 上 两 点 ，task_sleep 的 代码 还 是 不 难 
理解 的 。 


接 下 来 是 当 FIFO 中 写 入 数据 的 时 候 将 任务 唤醒 的 功 
能 。 首 先 ， 我 们 要 在 FIFO 的 结构 定义 中 ， 添 加 用 于 


记录 要 唤醒 任务 的 信息 的 成 员 。 


本 次 的 bootpack.h 节 选 


struct FIFO32 { 
int *buf; 


int p, q, size, free, flags; 
struct TASK *task; 
}; 


然后 我 们 改写 fifo32_init， 让 它 可 以 在 参数 中 指定 一 
个 任务 。 如 果 不 想 使 用 任务 自动 唤醒 功能 的 话 ， 只 
要 将 task 置 为 0 即 可 。 


本 次 的 fifo.c 节 选 


void fifo32_init(struct FIFO32 *fifo, int size, int 
*buf, struct TASK *task) 
/* FIFO 绥 冲 区 初始 化 */ 
{ 
fifo->size = size; 
fifo->buf = buf; 
fifo->free = size; /#+ 剩 余 空间 */ 
fifo->flags = 0; 
fifo->p = 0; /* 写 入 位 置 */ 
fifo->q = 0; /* 读 取 位 置 */ 
fifo->task = task; /#* 有 数据 写 入 时 需要 唤醒 的 任务 */  /* 
REL 47 
return; 


} 


RE, RIKI 4 FIFO ABI , ERA 


任务 的 功能 。 


int fifo32_put(struct FIFO32 *fifo, int data) 
/* 癌 FIFO 写 入 数据 并 累积 起 来 */ 


if (fifo->free == { 
/* 没 有 剩余 空间 则 溢出 *V/ 
fifo->flags |= FLAGS OVERRUN; 
return -1; 


} 
fifo->buf[fifo->p] = data; 
fifo->p++; 
if (fifo->p == fifo->size) { 

fifo->p = ©; 
} 
fifo->free--; 
if (fifo->task != 0) { /* 从 这 里 开始 */ 

if (fifo->task->flags != 2) { /* 如 果 任 务 处 于 休眠 

状态 */ 
task_run(fifo->task); /#+ 将 任务 唤醒 */ 


} 
} ”/* 到 这 里 结束 */ 


return ð; 


我 们 奶 加 了 5 行 代码 。 在 这 里 如 果 任 务 已 经 处 于 唤 
醒 状 态 的 话 ， 再 次 对 其 task_run 是 不 行 的 (会 造成 
任务 重复 注册 ) ， 因 此 我 们 需要 先 确 认 该 任务 是 否 
处 于 休眠 状态 ， 然 后 再 将 其 唤醒 。 


最 后 我 们 来 改写 HariMain 。 
本 次 的 bootpack.c 节 选 


void HariMain(void) 
{ 
struct TASK *task_a, *task_b; 
(中 上 略 ) 
fifo32 init(&fifo, 128, fifobuf, 8); 
CHEK) 
task_a = task_init(memman) ; 
fifo.task = task_a; 
(中 上 略 ) 


for (;;) { 
io_cli(); 
if (fifo32_status(&fifo) == @) { 


task_sleep(task_a); 
io_sti(); 

} else { 
CREK) 


void task_b_main(struct SHEET *sht_back) 


中略 ) 
fifo32_init(&fifo, 128, fifobuf, ©); 
中略 ) 


最 开始 的 fifo32_init 中 指定 任务 的 参数 ， 我 们 用 0 代 


丛 了 。 因 为 我 们 在 任务 A 中 应 用 了 休 虐 ， 也 束 需 要 
使 用 让 FIFO 来 唤醒 的 功能 ， 不 过 在 这 个 时 间 点 上 多 
任务 的 初始 化 还 没有 完成 ， 因 此 无 法 指定 任务 ， 只 
能 先 在 这 里 用 0 代 谷 ， 也 惑 是 茶 用 目 动 唤醒 功能 。 


随后 ， 在 task_init 中 会 返回 目 己 的 构造 地 址 ， 我 们 
将 这 个 地 址 存 入 fifo.task。 


这 样 一 来 ， 当 FIFO 为 空 的 时 候 ， 任 务 A 将 执行 
task_sleep 来 蔡 代 之 前 的 HLT。 关 于 io_sti 和 
task_sleep 的 顺序 ， 需 要 稍微 动 点 脑筋 。 如 条 先 STI 
的 话 ， 在 进行 休眠 处 理 的 时 候 可 能 会 发 生 中 断 请 
求 ，FIFO 里 面 束 会 写 入 数据 ， 这 样 有 可 能 会 发 生 无 
法 成 功 唤 醒 等 异常 情况 。 因 此 ， 我 们 需要 在 禁止 中 
是 请 求 的 状态 下 进行 休眠 处 理 ， 然 后 在 唤醒 之 后 蕊 
上 执行 STI。 


task_b_main 不 需要 让 FIFO 唤 醒 ， 因 此 任务 参数 指定 
为 0。 


PT LLL 
那么 ， 这 样 做 是 否 能 成 功 呢 ， 我 们 来 试 试 
o “make run”， 哇 ， 速 度 很 快 。 请 注意 看 速度 显 
示 的 数字 。 


148512 
7340162 


速度 变 快 了 ? 


在 真 机 环境 下 进行 测试 ， 在 不 操作 鼠标 和 键盘 的 情 
况 下 ， 速 度 可 以 达到 13438300，harib12g 的 成 绩 是 
6493300， 相 比 之 下 速度 达到 了 2 倍 以 上 。 
大 家 可 能 会 觉得 速度 超过 ?2 倍 这 一 点 有 点 无 法 理 
解 ， 其 实 这 是 正常 的 ， 因 为 两 者 都 是 以 每 0.01 秒 
刷新 一 次 count 的 显示 。 


。 假 定 harib12g 的 任务 B 的 处 理 能 力 为 每 秒 100。 


。 其 中 的 10 用 于 显示 count， 剩 下 的 90 用 于 计算 


count++;. 


。 假 定 harib13b 的 任务 B 的 处 理 能 力 为 每 秒 198。 
(之 所 以 无 法 达到 200， 是 因为 休眠 的 任务 A 
并 不 是 完全 不 需要 消耗 处 理 能 力 ) 


。 用 于 显示 count 的 还 是 其 中 的 10， 剩 下 的 188 用 


于 计算 count++;。 
。188 是 90 的 2 倍 以 上 。 
a 基本 上 就 是 这 样 的 原理 。 


如 果 用 鼠标 不 停 移 动 窗口 ， 再 加 上 用 键盘 不 断 打 字 
的 话 ， 由 于 任务 A 会 变 得 比较 忙碌 ， 任 务 B 的 速度 

束 会 相应 下 降 ， 大 约会 降 到 8700000 左 右 。 如 果 我 
们 能 让 任务 A 更 忙碌 一 些 的 话 ， 最 终 任务 B 的 速度 

会 下 降 到 6493300， 也 就 是 任务 A 完全 不 休眠 时 的 

值 。 


和 harib10i 时 的 成 绩 14281323 相 比 ， 这 次 的 
13438300 还 有 6%6 左 右 的 差距 ， 这 应 该 是 每 0.01 秒 刷 
新 一 次 显示 导致 的 ， 因 此 我 们 把 这 个 去 掉 之 后 再 来 
测试 一 下 速度 。 做 法 和 之 前 有 所 不 同 ， 采 用 的 是 将 
task_b_main 中 的 两 处 timer_settime (timer_put, 1) ; 
改 成 timer_settime (timer_put. 100) ;的 方法 。 测 试 
结果 为 13782000， 关 距 缩小 到 3% 左 右 了 ， 可 以 说 
和 没有 多 任务 的 状态 非常 接近 了 。 


其 实 一 开始 笔者 也 是 按照 之 前 的 方法 ， 把 
timer_settime (timer_put, 1) ; 删 掉 来 测试 速度 
的 ， 但 测 出 来 的 结 末 居然 令 人 震惊 地 高 达 


36343300， 这 相当 于 14281323 的 2.5 倍 。 速 度 比 没 
有 多 任务 的 时 候 还 快 ， 这 个 结果 是 十 分 异常 的 ， 
这 是 由 于 JMP 指 令 的 跳 转 目标 地 址 发 生变 化 所 
BN 


因此 ， 为 了 不 让 跳 转 目标 地 址 发 生变 化 ， 我 们 只 
好 保留 那 条 语句 。 本 来 想 把 timer_put 的 中 断 间 陋 
设置 为 1000 或 者 10000 左 右 的 ， 不 过 这 样 一 来 指令 
的 长 度 会 发 生变 化 ， 所 以 只 好 设置 成 100 了 。 


从 这 个 问题 来 看 ， 用 C 语 言 测 试 速度 还 是 有 局 限 
性 的 。 如 果 要 精确 比较 速度 的 话 ， 只 能 在 仔细 考 
虑 地 址 问题 的 前 担 下， 用 汇编 语言 来 编写 程序 来 
实现 了 。 


3 增加 窗口 数量 (harib13c ) 


在 16.1 节 中 我 们 已 经 对 任务 的 新 增 做 了 简化 ， 因 此 
接 下 来 我 们 要 为 系统 增加 更 多 的 任务 ， 即 形成 任务 
A、 任 务 B0、 任 务 B1 和 任务 B2 的 格局 。 


任务 BO 一 B2 各 自 拥 有 自己 的 窗口 ， 它 们 的 功能 都 
一 样 ， 即 进行 计数 ， 这 有 点 像 在 Windows 中 启动 了 
一 个 应 用 程序 及 其 2 个 副本 的 感觉 。 对 了 ， 任 务 A 的 
a ee 己 经 不 需要 了 ， 因 此 将 它 
们 删 去 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 
unsigned char *buf_back, buf_mouse[256], *buf_win, 
*buf_win_b; 
struct SHEET *sht_back, *sht_mouse, *sht_win, 
*sht_win_b[3]; 
struct TASK *task_a, *task_b[3]; 
struct TIMER *timer; 


CHH) 
init_palette(); 


shtctl = shtctl_init(memman, binfo->vram, binfo- 
>scrnx, binfo->scrny); 


task_a = task_init(memman) ; 
fifo.task = task_a; 


/* sht_back */ 

sht_back = sheet_alloc(shtct1l); 

buf_back = (unsigned char *) 
memman_alloc_4k(memman, binfo->scrnx * binfo->scrny); 

sheet_setbuf(sht_back, buf_back, binfo->scrnx, 
binfo->scrny, -1); /* 无 透明 色 */ 

init_screen8(buf_back, binfo->scrnx, binfo->scrny); 


/* sht_win_b */ 
for (i = ð; i < 3; i++) { 


sht_win_b[i] = sheet_alloc(shtct1l); 

buf_win_b = (unsigned char *) 
memman_alloc_4k(memman, 144 * 52); 

sheet_setbuf(sht_win_b[i], buf win b, 144, 52, 
-1); /* 无 透明 色 */ 

sprintf(s, "task_b%d", i); 

make_window8(buf_win_b, 144, 52, s, @); 

task_b[i] = task_alloc(); 

task_b[i]->tss.esp = memman_alloc_4k(memman, 64 
* 1024) + 64 * 1024 - 8; 

task_b[i]->tss.eip = (int) &task_b main; 


task_b[i]->tss.es = 1 * 8; 
task_b[i]->tss.cs = 2 * 8; 
task_b[i]->tss.ss = 1 * 8; 
task_b[i]->tss.ds = 1 * 8; 
task_b[i]->tss.fs = 1 * 8; 
task_b[i]->tss.gs = 1 * 8; 


*((int *) (task_b[i]->tss.esp + 4)) = (int) 
sht_win_b[i]; 
task_run(task_b[i]); 
} 


/* sht_win */ 

sht win = sheet_alloc(shtctl); 

buf_win = (unsigned char *) 
memman_alloc_4k(memman, 160 * 52); 

sheet_setbuf(sht_win, buf_win, 144, 52, -1); /#* 无 透 
明 色 */ 

make window8(buf win, 144, 52, "task a", 1); 

make_textbox8(sht_win, 8, 28, 128, 16, 
COL8_FFFFFF); 

cursor x = 8; 

cursor_c = COL8 FFFFFF ; 

timer = timer_alloc(); 

timer_init(timer, &fifo, 1); 

timer_settime(timer, 50); 


/* sht_mouse */ 

sht_mouse = sheet_alloc(shtctl); 

sheet_setbuf(sht_mouse, buf_mouse, 16, 16, 99); 

init_mouse_cursor8(buf_mouse, 99); 

mx = (binfo->scrnx - 16) / 2; /* 计 算 坐 标 使 其 位 于 画面 
aky 

my = (binfo->scrny - 28 - 16) / 2; 


sheet_slide(sht_back, ©, @); 

sheet_slide(sht_win_b[@], 168, 56); 
sheet_slide(sht_win_b[1], 8, 116); 
sheet_slide(sht_win_b[2], 168, 116); 


sheet_slide(sht_win, 8, 56); 
sheet_slide(sht_mouse, mx, my); 
sheet_updown(sht_back, ð); 


sheet_updown(sht_win_b[@], 1); 
sheet_updown(sht_win_b[1], 2); 
sheet_updown(sht_win_b[2], 3); 
sheet_updown(sht_win, 4); 
sheet_updown(sht_mouse, 5); 
sprintf(s, "(%3d, %3d)", mx, my); 


putfonts8_asc_sht(sht_back, ©, ©, COL8_FFFFFF, 
COL8 008484, s, 10); 
sprintf(s, “memory %dMB free : %dKB", 
memtotal / (1024 * 1024), 
memman_total(memman) / 1024); 
putfonts8_asc_sht(sht_back, ©, 32, COL8_FFFFFF, 
COL8 008484, s, 40); 


for (33) { 

io_cli(); 

if (fifo32_status(&fifo) == 0) { 
task_sleep(task_a); 
io_sti(); 

} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 

CREK) 


} else if (512 <= i && i <= 767) { /* 光 标 用 
CHH ) 


} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CHIK) 


ERAR * / 


} 


} 


void make_window8 (unsigned char *buf, int xsize, int 
ysize, char *title, char act) 


CRH ) 
char c, tc, tbc; 
if (act != 0) { 
tc = COL8_FFFFFF; 


tbc = COL8 000084; 
} else { 

tc = COL8 C6C6C6; 

tbc = COL8 848484; 


} 

(中略 》 

boxfill8(buf, xsize, tbc, 
xsize - 4, 20 ); 


3， 


boxfill8(buf, xsize, COL8 848484, 1, 


xsize - 2, ysize - 2); 


boxfill8(buf, xsize, COL8 900000, ©, 


xsize - 1, ysize - 1); 


putfonts8 asc(buf, xsize, 24, 4, tc, 


for (y = ð; y < 14; y++) { 
(FAS ) 
} 


return; 


} 


void task_b_main(struct SHEET *sht_win_b) 


{ 
struct FIFO32 fifo; 


struct TIMER *timer_1s; 


3, 

ysize - 2, 

ysize - 1, 
title) ; 


int i, fifobuf[128], count = ©, count®@ = @; 


char s[12]; 


fifo32 init(&fifo, 128, fifobuf, ©8); 


timer 1s = timer_alloc(); 


timer_init(timer_1s, &fifo, 100); 


timer_settime(timer_1s, 100); 


for (33) { 
count++; 
io_cli(); 
if (fifo32_status(&fifo) 
io_sti(); 


o) { 


} else { 

i = fifo32_get(&fifo); 

io_sti(); 

if (i == 100) { 
sprintf(s, "%11d", count - counté@); 
putfonts8 asc sht(sht win b, 24, 28, 

COL8 @@0000, COL8 C6C6C6, s, 11); 

count® = count; 
timer_settime(timer_1s, 100); 


这 次 的 代码 相当 长 ， 不 过 我 们 只 是 对 之 前 的 程序 进 
行 了 整理 ， 难 度 并 没有 提高 。 不 要 被 代码 的 长 度 吓 
倒 ， 只 要 静 下 心 来 仔细 读 一 读 ， 应 该 很 快 就 会 理解 
的 。 


在 make_ window8 中 我 们 增加 了 一 个 act 变 量 。 当 act 
N1, BRE ANAS, “AON, BAA Cita 
显示 窗口 名 称 的 地 方 ) 会 变 成 灰色 。task_b_main 
中 ， 去 挥 了 每 0.01 秒 显示 一 次 count 的 部 分 ， 只 保留 
每 1 秒 显 示 速 度 的 功能 。 


我 们 来 运行 一 下 ，“make run”。 怎 么 样 ， 是 不 是 感 
觉 更 像 操作 系统 了 了 呢 ? 对 了 ， 现 在 只 有 任务 A 的 窗 
口 是 可 以 拖 动 的 〈 因 为 移动 窗口 的 部 分 没有 改写 进 


去 ) 。 

任务 B0~B2 这 3 个 任务 基本 上 是 以 同样 的 速度 在 运 
行 。 在 模拟 器 环境 下 它们 的 速度 会 有 所 差异 ， 但 在 
真 机 环境 下 还 是 十 分 接近 的 ， 如 下 : 

4684200 4684800 4684800 


es 
38 [ler 0 1] 
memory 32MB free : 28820KB 


AG 
cs. 


task b? 


09632 


4 个 任务 在 同时 工作 
看 来 运行 非常 成 功 。 


4 ” 设 定 任务 优先 级 1) 
Charib13d ) 


任务 B0~B2 以 同样 的 速度 运行 ， 从 公平 莞 争 的 角 
度 来 说 确实 不 错 ， 不 过 在 某 些 情况 下 ， 我 们 需要 提 
升 或 者 降低 某 个 应 用 程序 的 优先 级 ， 因 此 接 下 来 我 
们 要 来 实现 这 样 的 功能 。 


在 此 之 前 ， 任 务 切换 间隔 都 固定 为 了 0.02 秒 ， 我 们 
把 它 修改 一 下 ， 使 得 可 以 为 每 个 任务 在 0.01 秒 一 0.1 
秒 的 范围 内 设 定 不 同 的 任务 切换 间隔 ， 这 样 一 来 ， 
我 们 就 能 实现 最 大 10 倍 的 优先 级 差异 。 


本 次 的 bootpack.h 节 选 


struct TASK { 
int sel, flags; /* sel 代 表 GDT 编 号 */ 
int priority;  ”/* 这 里 ! */ 


struct TSS32 tss; 


}; 
变量 名 “priority” 是 “优先 级 ”一 词 的 英文 写法 。 
rT Ty | 


为 了 应 用 上 面 的 新 结构 ， 我 们 需要 改写 mtask.c。 


本 次 的 mtask.c 节 选 


Struct TASK *task_init(struct MEMMAN *memman) 


《中略 ) 

task = task_alloc(); 

task->flags = 2; /# 活 动 中 标志 #/ 
task->priority = 2; /* 6.62 秒 */ 
taskctl->running = 

taskctl->now = ©; 
taskctl->tasks[@] = task; 
load_tr(task->sel); 

task_timer = timer_alloc(); 
timer_settime(task_timer, task->priority) ; 
return task; 


对 task_init 的 改写 很 简单 ， 没 有 什么 需要 特别 说 明 
的 地 方 。 在 这 里 ， 我 们 给 最 开始 的 任务 设 定 了 0.02 
秒 这 个 标准 值 。 


接 下 来 是 用 来 运行 任务 的 task_run， 我 们 让 它 可 以 
通过 参数 来 设 定 优先 级 。 


本 次 的 mtask.c 节 选 


void task_run(struct TASK *task, int priority) 
{ 


if (priority > @) { 
task->priority = priority; 


} 

if (task->flags != 2) { 
task->flags = 2; /* 活 动 中 标志 */ 
taskctl->tasks[taskctl->running] = task; 
taskctl->running++ ; 


} 


return; 


上 面 的 代码 中 ， 一 开始 我 们 先 判断 了 priority 的 值 ， 
当 为 0 时 则 表示 不 改变 当前 已 经 设 定 的 优先 级 。 这 
样 的 设计 主要 是 为 了 在 唤醒 休眠 任务 的 时 候 使 用 。 


此 外 ， 即 使 该 任务 正在 运行 ， 我 们 也 能 使 用 
task_run 仅 改变 任务 的 优先 级 。 


接着 是 task_switch， 我 们 要 让 它 在 设置 定时 如 的 时 
候 ， 应 用 priority 的 值 。 


本 次 的 mtask.c 节 选 


void task_switch(void) 


{ 


struct TASK *task; 

taskctl->now++; 

if (taskctl->now == taskctl->running) { 
taskctl->now = Q; 

} 

task = taskctl->tasks[taskctl->now ] ; 


timer_settime(task_timer, task->priority) ; 
if (taskctl->running >= 2) { 
farjmp(@, task->sel); 


return; 


当 只 有 一 个 任务 的 时 候 ， 如 果 执 行 farjmp(0, task— 
>sel); 的 话 ， 虽 然 不 会 真 的 切换 但 确实 是 发 出 了 任务 
切换 的 指令 。 这 时 CPU 会 认为 “操作 系统 怎么 会 做 
这 种 坚 无 意义 的 事情 呢 ? 这 一 定 是 操作 系统 的 
bug! ”因而 拒绝 执行 该 指令 ， 程 序 运行 瓯 会 乱 套 。 
所以 我 们 大 要 竺 farjmp 之 前 ， 判 断 任务 数量 是 耕 在 2 
DAEs 


这 样 一 来 ， 对 mtask.c 的 改写 就 OK 了 - 


Litt 
现在 我 们 来 改写 fifo.c。 从 休眠 状态 唤醒 任务 的 时 候 
需要 调用 task_run， 我 们 这 次 主要 就 是 改写 这 个 地 
方 。 说 日 7 了， 其 实 我 们 只 是 将 任务 唤醒 ， 并 不 改变 
其 优先 级 ， 因 此 只 要 将 优先 级 设置 为 0 束 可 以 了 。 


本 次 的 fifo.c 节 选 


int fifo32_put(struct FIFO32 *fifo, int data) 
/* 癌 FIFO 写 入 数据 并 累积 起 来 */ 
{ 


(中 上 略 ) 
fifo->free--; 
if (fifo->task != 0) { 
if (fifo->task->flags != 2) { /#* 如 果 任 务 处 于 休 眼 


状态 */ 
task_run(fifo->task，6); /* 将 任务 唤醒 */ 
} 
} 
return ð; 


最 后 我 们 来 改写 一 下 HariMain， 做 一 做 改变 优先 级 
本 次 的 bootpack.c 节 选 
void HariMain(void) 
(中 上 略 ) 
/* sht win b */ 
for (i = ð; i < 3; i++) { 


CHH) 
task_run(task_b[i], i + 1); 


} 
中略 ) 


好 了 ， 大 功 告 成 。 


我 们 为 任务 B0 设 置 为 优先 级 1， 任 务 B1 为 2， 任 务 
B2 为 3， 因 此 B2 应 该 是 最 快 的 ， 而 B0 应 该 是 最 慢 
的 ， 其 速度 的 差异 应 该 正好 是 3 倍 的 关系 。 马 
上 “make run”— fF- 


piles 
88 [ler -1 22] 
memory 32MB free : 28816KB K 


task_a [x] task_bo x| 
[HARIB 13DE 59900 
110170 159173 
== 
结果 是 这 个 样子 
而 真 机 环境 下 的 结果 如 下 。 
1711130 3234785 4663010 

(1806134) (4758230) 


DAE SHY BEL NAS SAR Ze EMAER, AR BE YE 
AZER PUT AKA E, SUE Ba eee. W 
朱 以 任务 B0 为 基准 来 看 ， 任 务 B1 为 1.9 倍 ， 任 务 B2 
为 2.7 倍 。 虽 然 不 是 完美 的 整数 倍 这 一 氮 令 人 有 些 不 
磷 ， 不 过 用 C 语 言 写 的 程序 ， 多 多 少 少 会 有 些 误 
Fao AZ, RPM AR OATS RII AS 


5 议定 任务 优先 级 (2) 
(harib13e ) 


如 果 多 把 玩 一 下 harib13d， 会 发 现 鼠 标的 移动 速度 
好 像 有 点 慢 ， 尤 其 是 拖 住 窗口 快速 移动 的 时 候 ， 反 
应 很 糟 糙 。 模 拟 喜 环境 下 手 已 经 放 开 鼠标 了 可 它 还 
在 动 ， 即 使 到 了 真 机 环境 下 也 还 是 沉 得 有 点 不 利 


AJN Oo 


问题 的 原因 在 于 ， 其 他 任务 的 运行 造成 任务 A 运 行 
速度 变 慢 ， 从 而 导致 上述 情 形 。 要 解决 这 个 问 
题 ， 只 要 把 任务 A 的 优先 级 调 蜗 束 可 以 了 ， 调 到 最 


HariMain 中 将 启动 任务 A 的 部 分 改 为 task_run(task_a， 
10); 来 试 试看 ， 有 果然 速度 回 到 从 前 的 样子 了 。 


有 人 可 能 会 担心 ， 如 果 把 优先 级 设 为 10， 那 其 他 任 
务 的 运行 速度 不 就 变 慢 了 吗 ? 不 会 的 。 任 务 A 的 优 
先 级 无 论 设置 得 多 局 ， 也 一 点 痢 不 会 浪费 时 间 ， 
为 当 任 务 A 空 用 的 时 候 会 目 动 休眠 ， 只 要 进入 休眠 
状态 ， 即 从 tasks 中 删除 后 ， 优 先 级 的 设置 就 蜡 无 影 
啊 了 ， 其 他 任务 的 运行 速度 也 就 和 之 前 没什么 区 别 
e 


上 述 例子 说 明 ， 任 务 优先 级 古 个 很 好 用 的 东西 。 我 
们 不 芒 把 这 个 例子 来 总 结 一 下 : 在 操作 系统 中 有 一 
些 处 理 ， 即 使 牺牲 其 他 任务 的 性 能 也 必须 要 尽快 完 
%， 人 否则 会 引起 用 户 的 不 满 ， 融 比如 这 次 对 鼠标 的 
处 理 。 对 于 这 类 任务 ， 我 们 可 以 让 它 在 处 理 结束 后 
马上 休眠 ， 而 优先 级 则 可 以 设置 得 非常 高 。 


这 种 宁可 牺牲 其 他 任务 性 能 也 必须 要 尽快 处 理 的 任 
务 可 不 是 只 有 鼠标 一 个 ， 比 如 键盘 处 理 也 是 一 样 ， 
网 络 处 理应 该 也 属于 这 类 (如果 速度 太 慢 的 话 可 能 
会 丢失 数据 哦 ) 。 播 放 音乐 也 是 ， 如 条 音乐 播放 任 
务 的 优先 级 太 低 的 话 ， 首 乐 束 会 一 卡 一 卡 的 。 


我 们 当然 可 以 把 这 些 任务 的 优先 级 都 设置 成 10， 不 
过 真 这 样 做 的 话 ， 妆 它们 之 中 的 两 个 以 上 同时 运行 
的 时 候 ， 可 能 还 是 会 出 问题 。 如 条 合 音乐 和 鼠标 做 
比较 ， 那 应 该 是 音乐 更 重要 吧 。 因 为 如 果 及 生 *“ 在 
播放 音乐 的 时 候 移动 窗口 ， 音 乐 卡 住 > 这 种 情况 ， 

用 户 肯 定 会 党 得 超级 不 磷 的 。 相 比 之 下 ， 哪 但 鼠标 
的 反应 稍微 慢 些 ， 我 们 也 要 保证 音乐 播放 的 质量 。 


然而 按照 现在 的 设计 ， 妆 优先 级 为 10 的 两 个 任务 同 
时 运行 时 ， 优 先 哪个 就 全 攒 运气 了 ， 任 务 切 换 先 轮 
到 谁谁 吏 局 了 了。 运气 好 的 那个 任务 可 以 消耗 很 多 时 
间 来 完成 它 的 工作 ， 而 为 外 一 个 优先 级 同样 是 10 的 
任务 束 只 能 等 每 了 。 也 就 是 说 ， 如 果 运 气 不 好 ， 首 


乐 播 放 束 会 变 得 一 团 糟 ， 而 这 样 的 操作 系统 显然 不 
怎么 好 用 。 


CLLD 
因此 我 们 需要 设计 一 种 架构 ， 使 得 即便 高 优先 级 的 
任务 同时 运行 ， 也 能 够 区 分 哪个 更 加 优先 。 


其 实 也 没有 架构 那么 复杂 ， 基 本 上 就 是 创建 了 几 个 
struct TASKCTL 。 个 数 随 意 ， 多 少 都 行 ， 我 们 在 这 
里 先 按 创建 3 个 来 讲解 。 


最 上 层 的 TASKCTL 
LEVEL 0 


( 比 任务 A 更 加 优先 的 任务 ) 


中 间 的 TASKCTL 
LEVEL 1 


(和 任务 A 差不多 的 任务 ) 


最 下 层 的 TASKCTL 


这 种 架构 的 工作 原理 是 ， 最 上 层 的 LEVEL 0 中 只 要 
存在 哪怕 一 个 任务 ， 则 完全 忽略 LEVEL 1 和 LEVEL 
2 中 的 任务 ， 只 在 LEVEL 0 的 任务 中 进行 任务 切 

fh. “4LEVEL 0 中 的 任务 全 部 休眠 ， 或 者 全 部 降 到 
下 层 LEVEL， 也 就 是 当 LEVEL 0 中 没有 任何 任务 的 
时 候 ， 接 下 来 开始 轮 到 LEVEL 1 中 的 任务 进行 任务 
切换 。 当 LEVEL 0 和 LEVEL 1 中 都 没有 任务 时 ， 那 


就 该 轮 到 LEVEL 2 出 场 了 。 


在 这 种 架构 下 ， 只 要 把 音乐 播放 任务 设置 在 LEVEL 
0 中 ， 就 可 以 保证 获得 比 鼠 标 更 高 的 优先 级 。 


实际 上 ， 我 们 不 需要 创建 多 个 TASKCTL， 只 要 在 
TASKCTL 中 创建 多 个 tasks[] 即 可 。 


本 次 的 bootpack.h 节 选 


#define MAX_TASKS_ LV 100 
#define MAX_TASKLEVELS 10 


struct TASK { 
int sel, flags; /* se1 用 来 存放 GDT 的 编号 */ 
int level, priority; 
struct TSS32 tss; 

}; 


struct TASKLEVEL { 
int running; /* 正 在 运行 的 任务 数量 */ 
int now; /* 这 个 变量 用 来 记录 当前 正在 运行 的 是 哪个 任务 */ 
struct TASK *tasks[MAX_TASKS_ LV]; 


is 


struct TASKCTL { 
int now_lv; /* 现 在 活动 中 的 LEVEL */ 
char lv_change; /+* 在 下 次 任务 切换 时 是 否 需 要 改变 LEVEL */ 
struct TASKLEVEL level[MAX_TASKLEVELS ]; 
struct TASK tasks@[MAX_TASKS]; 


}; 


对 于 每 个 LEVEL 我 们 设 定 最 多 允许 创建 100 个 任 
务 ， 总 共 10 个 LEVEL。 人 至 于 其 余 有 变更 的 地 方 ， 与 
其 在 这 里 用 文字 讲解 ， 不 如 看 看 在 程序 中 的 实际 应 
用 更 加 容易 理解 。 


首先 ， 我 们 先 写 几 个 用 于 操作 struct TASKLEVEL 的 
函数 ， 如 果 没 有 这 些 函 数 的 话 ，task_run 和 
task_sleep 会 变 得 见长 难 异 。 

其 中 task_now 函 数 ， 用 来 返回 现在 活动 中 的 struct 
TASK 的 内 存 地 址 。 


本 次 的 mtask.c 节 选 


struct TASK *task_now(void) 
{ 


Struct TASKLEVEL *tl = &taskctl->level[taskctl- 


>now_lv]; 
return tl->tasks[tl->now]; 


} 


这 里 面包 仿 很 多 结构 ， 比 较 楷 珊 ， 不 过 仔细 看 看 应 
ipl Ae A o 


task_add 函 数 ， 用 来 向 struct TASKLEVEL 中 添加 一 
个 任务 。 
本 次 的 mtask.c 节 选 


void task_add(struct TASK *task) 
{ 


struct TASKLEVEL *tl = &taskctl->level[task- 
>level]; 

tl->tasks[tl->running] = task; 

tl->running++; 


task->flags = 2; /* 活 动 中 */ 
return; 


MAX ae oe 等 ， 这 可 以 判断 在 一 个 LEVEL 
HH fe #25 HHT 100 ELE REZ, 不 过 我 们 
把 它 省 i J, 不 好 意思 ， 偷 个 | Pitt o 


task_removersi 2%, FH4éM struct TASKLEVEL# itl 
除 一 个 任务 。 


本 次 的 mtask.c 节 选 


void task_remove(struct TASK *task) 


{ 


int i; 


struct TASKLEVEL *tl = &taskctl->level[task- 
>level]; 


/#* 寻 找 task 所 在 的 位 置 */ 
for (i = ð; i < tl->running; i++) { 
if (tl->tasks[i] == task) { 
A 


break; 


} 


tl->running--; 
if (i < tl->now) { 
tl->now--3 /* 需 要 移动 成 员 ， 要 相应 地 人 处理 */ 


if (tl->now >= tl->running) { 
/* 如 果 now 的 值 出 现 异 常 ， 则 进行 修正 */ 
tl->now = Q; 

} 

task->flags = 1; /* 休眠 中 */ 


/* 移动 */ 

for (; i < tl->running; i++) { 
tl->tasks[i] = tl->tasks[i + 1]; 

} 


return; 


上 面 的 代码 基本 上 是 照搬 了 task_sleep 的 内 容 。 


task_switchsub 函 数 ， 用 来 在 任务 切换 时 决定 接 下 来 


切换 到 哪个 LEVEL。 


本 次 的 mtask.c 节 选 


void task_switchsub(void) 


{ 


int i; 
/* 寻 找 最 上 层 的 LEVEL */ 
for (i = @; i < MAX_TASKLEVELS; i++) { 
if (taskctl->level[i].running > @) { 
break; /* 找 到 了 */ 


} 


taskctl->now_lv = i; 
taskctl->lv_change = @; 
return; 


到 目前 为 止 ， 和 struct TASKLEVEL 相 关 的 函数 已 经 
差不多 都 写 好 了 ， 准 备 工作 做 到 这 里 ， 接 下 来 的 事 
情 束 人 简单 多 了 。 


下 面 我 们 来 改写 其 他 一 些 函 数 ， 首 先是 task_init。 
最 开始 的 任务 ， 我 们 先 将 它 放 在 LEVEL 0, that 
最 高 优先 级 LEVEL 中 。 这 样 做 在 有 些 情况 下 可 能 会 
有 问题 ， 不 过 后 面 可 以 再 用 task_run 重 新 设置 ， 
此 不 用 担心 。 


本 次 的 mtask.c 节 选 


struct TASK *task_init(struct MEMMAN *memman) 


CHH) 

for (i = 6; i < MAX_TASKLEVELS; i++) { 
taskctl->level[i].running = ð; 
taskctl->level[i].now = Q; 

} 

task = task_alloc(); 

task->flags = 2; /* 活 动 中 标志 */ 

task->priority = 2; /* 0.62 秒 */ 

task->level = ð; /* 最 高 LEVEL */ 

task_add(task) ; 

task_switchsub();  /* LEVEL 设置 */ 

load_tr(task->sel); 

task_timer = timer_alloc(); 

timer_settime(task_timer, task->priority) ; 

return task; 


开始 的 时 候 只 有 LEVEL 0 中 有 一 个 任务 ， 因 此 我 们 
按照 这 样 的 方式 来 进行 初始 化 。 


下 面 是 task_run， 我 们 要 让 它 可 以 在 参数 中 指定 
LEVEL. 


本 次 的 mtask.c 节 选 


void task_run(struct TASK *task, int level, int 
priority) 
{ 


if (level < 6) { 


level = task->level; /* 不 改变 LEVEL */ 


if (priority > 0) { 
task->priority = priority; 


} 


if (task->flags == 2 && task->level != level) { /* 
改变 活动 中 的 LEVEL */ 
task_remove(task); /# 这 里 执行 之 后 flag 的 值 会 变 为 
1， 于 是 下 面 的 if 语 句 块 也 会 被 执行 */ 
} 
if (task->flags != 2) { 
/* 从 休眠 状态 唤醒 的 情形 */ 
task->level = level; 
task_add(task) ; 
} 


taskctl->lv_change = 1; /* 下 次 任务 切换 时 检查 LEVEL */ 
return; 


在 此 之 前 ，task_run 中 下 一 个 要 切换 到 的 任务 是 回 
定 不 变 的 ， 不 过 现在 情况 就 不 同 了 。 例 如 ， 如 果 用 
task_run 启 动 了 一 个 比 现在 活动 中 的 任务 LEVEL 更 
高 的 任务 ， 那 么 在 下 次 任务 切换 时 ， 就 必须 无 条 件 
地 切换 到 该 LEVEL 中 的 该 任务 去 。 


最 上 层 的 LEVEL 0 
S E 


中 间 的 LEVEL 1 
C Eza ][( 任务 b ) 


最 下 层 的 LEVEL 2 


Ee) 


此 外 ， 如 果 当 前 活动 中 的 任务 LEVEL 被 下 调 ， 那 么 
此 时 就 必须 将 其 他 LEVEL 的 任务 放 在 优先 的 位 置 
(同样 以 上 图 来 说 的 话 ， 比 如 当 LEVEL 0 的 任务 被 
降级 到 LEVEL 2 时 ， 任 务 切 换 的 目标 就 需要 从 
LEVEL 0 变 为 LEVEL 1) 。 


综 上 所 述 ， 我 们 需要 在 下 次 任务 切换 时 先 检查 
LEVEL， 因 此 将 lv_change 置 为 1。 


接 下 来 是 task_sleep， 在 这 里 我 们 可 以 调用 
task_remove， 因 此 代码 会 大 大 缩短 。 


本 次 的 mtask.c 节 选 


void task_sleep(struct TASK *task) 
{ 
struct TASK *now_task; 
if (task->flags == 2) { 
/* 如 果 处 于 活动 状态 */ 


now_task = task_now(); 
task_remove(task); /* 执 行 此 语句 的 话 flags 将 变 为 1 


i 
if (task == now task) { 
/* 如 果 是 让 自己 休眠 ， 则 需要 进行 任务 切换 */ 
task_switchsub(); 
now_task = task_now(); /* 在 设 定 后 获取 当前 任务 
的 值 */ 
farjmp(@, now_task->sel); 
} 
} 
return; 


XFA EIA IB RR 


mtask.c 的 最 后 是 task_switch， 除 了 当 lv_change 不 为 
0 时 的 处 理 以 外 ， 其 余 几 乎 没有 变化 。 


void task_switch(void) 


{ 


struct TASKLEVEL *tl = &taskctl->level[taskctl- 
>now_lv]; 
struct TASK *new_task, *now_task = tl->tasks[tl- 
>now | ; 
tl->now++; 
if (tl->now == tl->running) { 
tl->now = 0; 


if (taskctl->lv_change != 0) { 
task_switchsub() ; 


tl = &taskctl->level[taskctl->now_lv]; 
} 
new_task = tl->tasks[tl->now]; 
timer_settime(task_timer, new_task->priority) ; 
if (new_task != now_task) { 

farjmp(@, new_task->sel); 


return; 


对 比 前 面 内 容 来 读 的 话 ， 应 该 很 容易 理解 。 到 此 为 
止 ， 我 们 对 mtask.c 的 改写 就 完成 了 。 


唤醒 休眠 任务 的 task_run 稍 稍 修改 一 下 而 已 。 优 先 
级 和 LEVEL 都 不 需要 改变 ， 只 要 维持 原状 将 任务 唤 
AREY Ay. 


本 次 的 fifo.c 节 选 


int fifo32_put(struct FIFO32 *fifo, int data) 
/* 问 FIFO 写 入 数据 并 累积 起 来 */ 


CHH) 
fifo->free--; 
if (fifo->task != ð) { 
if (fifo->task->flags != 2) { /#* 如 果 任 务 处 于 休 眼 
状态 */ 
task_run(fifo->task, -1, ©); /* 将 任务 唤醒 */ 


} 


return ð; 


最 后 我 们 来 改写 HariMain， 可 到 底 该 怎么 改 呢 ? R 
们 就 暂且 将 任务 A 设 为 LEVEL 1， 任 务 B0 一 B2 设 为 
LEVEL 2 吧 。 这 样 的 话 ， 当 任务 A 忙碌 的 时 候 就 不 
会 切换 到 任务 B0 一 B2， 鼠 标 操 作 的 响应 应 该 会 有 

不 小 的 改善 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 


init_palette(); 

shtctl = shtctl_init(memman, binfo->vram, binfo- 
>scrnx, binfo->scrny); 

task_a = task_init(memman) ; 

fifo.task = task_a; 

task_run(task_a, 1, ©); /* 这 里 ! */ 


CHH) 


/* sht_win_b */ 
for (i = ð; i < 3; i++) { 
CRH) 
task_run(task_b[i], 2, i + 1); /* 这 里 ! */ 


中略 ) 
} 


好 ， 我 们 来 “make run”. iH fila EF Mharib13d—tk 
一 样 ， 但 如 果 用 鼠标 不 停 地 拖 动 窗口 的 话 ， 就 会 感 
到 啊 应 速度 和 之 前 有 很 大 不 同 。 相 对 地 ， 拖 动 窗口 
时 任务 B0 一 B2 会 变 得 非常 慢 ， 这 了 束 代 表 我 们 的 设 

计 成 功 了 ， 撤 花 ! 

多 任务 的 基础 部 分 到 这 里 就 算 完 成 了 。 明 天 我 们 还 
会 补充 一 些 代码 来 完善 一 下 ， 然 后 束 开 始 制 作 一 些 
更 有 操作 系统 范 儿 的 东西 了 。 大 家 上 晚安! 


第 17 天 ”命令 行 窗 口 


© WATES (harib14a) 

。 创建 命令 行 窗 口 (harib14b) 

o 切换 输入 窗口 (harib14c) 

。 实现 字符 输入 Charib14d) 

e SAMA (Charib14e ) 

。 大 写字 母 与 小 写字 母 (harib14f) 
。 对 各 种 锁定 键 的 支持 Charib14g ) 


1 闲置 任务 (harib14a) 


今天 一 开始 ， 请 大 家 先 回 忆 一 下 任务 A 的 情形 。 在 
harib13e 中 ， 任 务 A 下 面 的 LEVEL 中 有 任务 B0 一 
B2， 因 此 FIFO 为 空 时 我 们 可 以 让 任务 A 进 入 休眠 状 
态 。 那 么 ， 如 果 我 们 并 未 局 动 任务 B0 一 B2 的 话 ， 
任务 A 又 将 会 如 何 呢 ? 


首先 ， 如 果 我 们 不 对 任务 A 进 行 任 何 改写 ， 束 按照 
它 现在 的 样子 进入 休眠 状态 的 话 ， 大 家 想 一 想 ， 会 
发 生 什么 昵 ? 一 旦 任务 A 休眠 ，mtask.c 将 自动 寻找 
下 层 LEVEL 中 的 任务 ， 但 由 于 这 一 次 我 们 没有 局 动 
任务 B0 一 B2， 因 此 程序 就 找 不 到 其 他 的 任务 而 导 

致 运行 出 现 异 常 。 


如 果 这 样 不 行 ， 那 我 们 把 休眠 的 部 分 再 改 回 io_hltO; 
不 就 好 了 吗 ? 这样 一 来 ， 不 但 程序 运行 不 会 出 现 异 
To MEABE, W! ...... 话 虽 如 此 ， 但 如 果 一 
个 操作 系统 要 根据 下 层 LEVEL 是 否 存 在 任务 来 改写 
程序 的 话 ， 大 家 和 觉得 靠 谱 吗 ? 笔者 认为 ， 即 使 不 改 
写 程 序 ， 也 能 目 动 在 适当 的 LEVEL 运 行 适 当 的 任 
务 ， 这 样 的 操作 系统 才 是 优秀 的 操作 系统 。 


因此 ， 一 般 情 况 下 可 以 让 任务 休眠 ， 但 当 所 有 
LEVEL 中 都 没有 任务 存在 的 时 候 ， 就 需要 HTL 了 。 


接 下 来 我 们 就 控 照 这 个 要 求 来 改写 mtask.c。 
CLLD 


那么 我 们 从 task_sleep 开 始 改 起 吧 。 且 慢 ， 我 们 确实 
可 以 这 样 来 改 ， 但 是 改写 之 后 task_sleep 将 变 得 更 加 
复杂 ， 速 上 度 也 会 打折 扣 ( 说 是 会 打折 扣 ， 其 实 应 该 
a ee 。 其 实 我 们 还 有 更 好 
的 方法 。 


如 果 “ 所 有 LEVEL 中 都 没有 任务 ?融会 出 问题 ， 那 我 
们 只 要 避免 这 种 情况 有 发生 不 就 可 以 了 吗 ? 这 类 似 于 
我 们 写 定 时 才 的 时 候 所 采用 的 “卫兵 ”的 思路 。 


本 次 的 mtask.c 节 选 


void task_idle(void) 


for (33) { 
io hlt(); 
} 


} 


我 们 创建 这 样 一 个 任务 ， 并 把 它 一 直 放 在 最 下 层 

LEVEL, AA nef UNA? “idle” CAEL) 就 是 代 
表 “ 不 工作 ， 空 闲 ” 的 意思 ， 这 个 任务 的 功能 只 是 执 
行 HTL。 


这 样 一 来 ， 即 便 任 务 A 进 入 休眠 状态 ， 系 统 也 会 自 
动 切换 到 上 面 这 个 闲置 任务 ， 于 是 便 开 始 执行 
HTL 。 当 我 们 移动 鼠标 ，FIFO 中 有 数据 写 入 的 时 
候 ， 任 务 A 就 会 被 唤醒 ， 系 统 会 自动 切换 到 任务 A 
继续 工作 。 


综 上 上 所 述 ， 我 们 完全 不 需要 对 task_sleep 等 代码 进行 
任何 改动 ， 只 需 在 task_init 中 将 这 个 闲置 任务 放 在 
最 下 层 LEVEL 中 就 可 以 了 。 


本 次 的 mtask.c 节 选 


struct TASK *task_init(struct MEMMAN *memman) 

{ 
struct TASK *task, *idle; 
CHAS ) 


idle = task_alloc(); 
idle->tss.esp = memman_alloc_4k(memman, 64 * 1024) 
+ 64 * 1024; 

idle->tss.eip = (int) &task_idle; 

idle->tss.es * 8; 

idle->tss.cs 
idle->tss.ss 
idle->tss.ds 
idle->tss.fs 
idle->tss.gs 
task_run(idle, 


3 
3 
3 
3 


1 
2 
1 
1 
1 
1 
M 


8 
8 
8 
8 
8 
T 


AX 


; 
ASKLEVELS - 1, 1); 


return task; 


了 怠 是 这 样 ， 很 简单 吧 。 
PTTL 
接着 我 们 来 测试 一 下 ， 将 HariMain 改 成 下 面 这 样 。 


本 次 的 bootpack.c 节 选 
void HariMain(void) 
《中略 》 
/* sht win b */ 


for (i = ð; i < 3; i++) { 


CHH) 


*((int *) (task_b[i]->tss.esp + 4)) = (int) 
sht_win_b[i]; 
/* task_run(task_b[i], 2, i + 1); */ /* 这 里 ! */ 


} 
中略 ) 


也 就 是 说 ， 我 们 不 让 系统 运行 任务 B0 一 B2， 这 样 
就 只 剩 下 任务 A 和 task _ idle 了。 当然 ， 这 样 改 只 是 
不 启动 任务 而 已 ， 窗 口 还 是 会 照常 显示 的 。 


然后 我 们 来 “make run”， 男 面 如 下 。 


[HARIB 14AN 


只 有 任务 A 的 情况 下 也 不 会 出 现 异常 哦 ! 


2 创建 命令 行 窗口 (harib14b) 


所 谓 命 令 行 窗口 ， 束 是 大 家 在 运行 “make run” 的 时 
候 所 使 用 的 那个 黑 底 白字 的 ， 在 里 面 输入 文件 名 整 
可 以 运行 程序 的 东西 。 接 下 来 我 们 束 做 一 个 试 试 
Aa 


“这 玩意 儿 能 算 古 命令 行 窗 口 吗 ? ”我 们 一 开始 做 出 
来 的 东西 很 可 能 带 来 这 样 的 疑问 ， 不 过 没关系 ， 我 
们 会 让 它 逐 步 肥 展 壮大 ， 最 终 实现 可 以 局 动 应 用 程 
序 的 功能 。 你 看 ， 是 不 古越 来 越 像 个 操作 系统 的 样 
TIE? KA ELSAK F PIE. 


我 们 并 不 打算 将 命令 行 窗 口 作为 任务 A 的 一 部 分 ， 
而 是 单独 做 成 一 个 新 的 任务 。 这 样 一 来 ， 吏 像 任务 
B0 一 B2 一 样 ， 我 们 可 以 很 容易 地 创建 多 个 命令 行 
窗口 。 

我 们 对 任务 B 的 程序 进行 一 些 修改 ， 并 将 任务 A 程 
序 的 一 部 分 融合 进去 ， 就 写成 了 下 耐 这 个 样子 。 计 
数 我 们 已 经 玩 展 了， 上 所 以 把 计数 的 代码 从 任务 B 中 
删除 。 

本 次 的 bootpack.c 节 选 


void HariMain(void) 


中略) 


/* sht_cons */ 


sht_cons = sheet_alloc(shtct1l); 

buf_cons = (unsigned char *) 
memman_alloc_4k(memman, 256 * 165); 

sheet_setbuf(sht_cons, buf cons, 256, 165, 


无 透明 色 */ 


make_window8(buf_cons, 256, 165, 
make_textbox8(sht_cons, 8, 28, 240, 128, 


COL8 68666668 ; 
task_cons 


sht_cons; 


eip = (int) &console task; 


es 
CS 
SS 
ds 
fs 


gS = 


PRPRPPNPB 


= task_alloc(); 
task_cons->tss.esp 
1024) + 64 * 1024 - 8; 
task_cons->tss. 
task_cons->tss. 
task_cons->tss. 
task_cons->tss. 
task_cons->tss. 
task_cons->tss. 
task_cons->tss. 
*((int *) (task_cons->tss.esp + 4)) = 


XX XX * * * 


x g; 


= 


370); 


memman_alloc_4k(memman, 64 * 


task_run(task_cons, 2, 2); /* level=2, priority=2 


*/ 
CHATS ) 


sheet_slide(sht_back, 
sheet_slide(sht_cons, 32, 


sheet_slide(sht_win, 
sheet_slide(sht_mouse, mx, my); 
sheet_updown(sht_back, 
sheet_updown(sht_cons, 


sheet_updown(sht_win, 


ð, 


64, 


Q); 
1); 
2); 


sheet_updown(sht_mouse, 3); 
CHH) 
} 


void console task(struct SHEET *sheet) 
{ 

struct FIFO32 fifo; 

struct TIMER *timer; 

struct TASK *task = task_now(); 


int i, fifobuf[128], cursor_x = 8, cursor_c = 
COL8_ 900000; 
fifo32 init(&fifo, 128, fifobuf, task); 


timer = timer_alloc(); 
timer_init(timer, &fifo, 1); 
timer_settime(timer, 50); 


for (33) { 
io _cli(); 
if (fifo32_status(&fifo) == @) { 
task_sleep(task) ; 
io_sti(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (i <= 1) { /* 光 标 用 定时 器 */ 
if (i != 6) { 
timer_init(timer, &fifo, @); /* 下 次 
置 6 */ 
cursor_c = COL8 FFFFFF ; 
} else { 
timer_init(timer, &fifo, 1); /* Fix 
AL 
cursor_c = COL8_000000; 


timer_settime(timer, 50); 

boxfill8(sheet->buf, sheet->bxsize, 
cursor_c, cursor_x, 28, cursor_x + 7, 43); 

sheet_refresh(sheet, cursor_x, 28, 
cursor_x + 8, 44); 


有 一 个 地 方 需要 解释 一 下 ， 束 是 console_task 中 task 
= task_now(); 这 里 。 在 console_task 中 需要 执行 休 
眠 ， 因 此 必须 要 知道 自己 本 喘 的 TASK 结构 所 在 的 
内 存 地 址 。 由 于 HariMain 中 准备 了 task_cons， 可 以 
像 sheet 那 样 从 HariMain 传 入 这 个 地 址 ， 但 那样 也 有 
点 过 于 党 琐 了 。 名 然 想 到 在 mtask.c 中 不 是 有 个 
task_now 函 数 吗 ， 就 用 它 来 获取 TASK 地 址 好 了 。 


我 们 来 “make run”， 结 果 如 下 。 


| 


a 


aska 
[HARIB 14B 


看 上 去 像 个 像 命令 行 窗 口 的 样子 ? 
作为 我 们 的 命令 行 窗 口 稚 形 ， 看 上 去 还 不 赖 。 


3 切换 输入 窗口 (harib14c ) 


命令 行 窗口 这 东西 ， 如 果 不 能 在 里 面 输入 字符 的 话 
就 量 无 用 处 了 ， 因 此 我 们 得 让 它 能 接受 字符 输入 才 
行 。 不 过 现在 无 论 我 们 输入 什么 字符 ， 都 会 跑 到 任 
务 A 的 窗口 中 去 ， 所 以 为 了 能 够 往 命令 行 窗口 中 输 
入 字符 ， 我 们 要 让 系统 在 按 下 “Tab” 键 的 时 候 ， 将 
输入 窗口 切换 到 命令 行 窗 口上 去 。 


虽说 是 切换 窗口 ， 其 实 我 们 只 是 先 将 窗口 标题 栏 的 
PENA oe GER) 。 真 正 负 贡 输 入 切换 的 
部 分 我 们 下 一 市 再 写 ， 改 变 先 从 表面 工夫 开始 吧 。 


要 改变 窗口 标题 栏 闫 色 ， 最 好 将 make_window8 中 
描绘 窗口 标题 栏 的 代码 ， 和 描绘 窗口 剩余 部 分 的 代 
人 码 区 分 开 来 ， 我 们 将 这 个 函数 改写 一 下 。 


本 次 的 bootpack.c 节 选 


void make_window8 (unsigned char *buf, int xsize, int 
ysize, char *title, char act) 


boxfill8(buf, xsize, COL8 C6C6C6, 0, ð, 
xsize - 1, 0 ); 
boxfill8(buf, xsize, COL8 FFFFFF, 1, T; 


xsize - 2, 1 Y3 


boxfill8(buf, xsize, COL8 C6C6C6, ®©, ð, 
Q, ysize - 1); 

boxfill8(buf, xsize, COL8 FFFFFF, 1, 1, 
1, ysize - 2); 


boxfill8(buf, xsize, COL8 848484, xsize - 2, 1, 
xsize - 2, ysize - 2); 

boxfill8(buf, xsize, COL8 @@0000, xsize - 1, 0, 
xsize - 1, ysize - 1); 


boxfill8(buf, xsize, COL8 C6C6C6, 2, 2, 
xsize - 3, ysize - 3); 

boxfill8(buf, xsize, COL8 848484, 1, ysize 
- 2, xsize - 2, ysize - 2); 

boxfill8(buf, xsize, COL8 900000, ©, ysize 


- 1, xsize - 1, ysize - 1); 
make wtitle8(buf, xsize, title, act); 
return; 


} 


void make_wtitle8(unsigned char *buf, int xsize, char 

*title, char act) 

{ 

static char closebtn[14][16] = { 

"0000000000000000" , 
“0QQQQQQQQQQQQQ9O , 
“0QQQQQQQQQQQQQ9$O , 
"OQQQ@A@QQQQ@@QQF@" , 
"OQQQQ@A@QQA@@QQQF@" , 
"0QQQQQ@@@A@QQQQF@" , 
"0QQQQQQ@@QQQQQF@" , 
"0QQQQQ@@@AQQQQF@" , 
"OQQQQ@@QQA@@QQQF@" , 
"OQQQ@@QQQQ@@QQF@" , 
“0QQQQQQQQQQQQQ9O , 
“0QQQQQQQQQQQQQ9Q , 
"O$$$$$$$$$$Í$$$0", 


06000000000000000 
int x, y; 
char c, tc, tbc; 
if (act != 0) { 
tc = COL8_FFFFFF; 
tbc = COL8_000084; 
} else { 


tc = COL8 C6C6C6; 

tbc = COL8 848484; 
} 
boxfill8(buf, xsize, tbc, 3, 3, xsize - 4, 20); 
putfonts8 asc(buf, xsize, 24, 4, tc, title); 
for (y = 03 y < 14; y++) { 

for (x = 03; x < 16; x++) { 

c = closebtn[y][x]; 


if (c == '@') { 
c = COL8 000000; 
} else if (c == '$') { 
c = COL8 848484; 
} else if (c == 'Q') { 
c = COL8 C6C6C6; 
} else { 
c = COL8 FFFFFF ; 
} 
buf[(5 + y) * xsize + (xsize - 21 + x)] = 
C; 
} 
} 
return; 


ERAN S I, BERRA AS HariMain. 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


中略 ) 
int key_to = 0; /* 这 里 ! */ 


CHH) 


for (33) { 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
CHH ) 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
Sprintf(s, "%02X", i - 256); 
putfonts8_asc_sht(sht_back, ©, 16, 
COL8_FFFFFF, COL8 008484, s, 2); 
if (i < @x54 + 256) { 
CHH) 


if (i == 256 + @x@e && cursor_x > 8) { 
/* 退 格 键 */ 
CHEK) 


} 
/* 从 此 开始 */ if (i == 256 + @xef) { /* Tab 键 */ 
if (key to == 6) { 
key to = 1; 
make_wtitle8(buf_win, sht win- 
>bxsize, "task a", @); 
make_wtitle8(buf_cons, 
sht_cons->bxsize, "console", 1); 
} else { 


key to = ð; 

make_wtitle8(buf_win, sht win- 
>bxsize, "task a", 1); 

make_wtitle8(buf_cons, 
sht_cons->bxsize, "console", @); 


sheet_refresh(sht_win, ©, @, 
sht_win->bxsize, 21); 

sheet_refresh(sht_cons, 0, ®, 
sht_cons->bxsize, 21); 


/* 到 此 结束 */ } 
/* 重 新 显示 光标 */ 


boxfill8(sht_win->buf, sht_win->bxsize, 
cursor_c, cursor_x, 28, cursor_x + 7, 43); 
sheet_refresh(sht_win, cursor_x, 28, 
cursor_x + 8, 44); 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
di * / 


(中 上 略 ) 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CHIK) 


这 段 代 人 码 的 重点 在 于 key_to 这 个 变量 ， 用 于 记录 键 
盘 输 入 〈key) 应 该 发 送 到 (to) 哪里 。 为 0 则 发 送 
到 任务 A， 为 1 则 发 送 到 命令 行 窗 口 任务 。 


还 是 一 如 既往 地 “make run”， 然 后 按 下 Tab 键 试 试 
看 。 


按 下 Tab 键 之 后 


HE, PREZ SAS! 真 不 错 啊 。 心 情 好 激动 ， 先 按 个 
10 次 Tab 键 看 看 。 哄 哄 哄 哄 .…... 


然后 又 很 得 意 地 输入 了 “abc” 斌 试看， 果然 ， 结 果 是 
这 个 样子 。 


ABCH 


RIAL eA 4 Ml ! 


UF, Be RRITAR K E A a A ! 


4 实现 字符 输入 Charib14d) 


要 实现 字符 的 输入 ， 只 要 在 键盘 被 按 下 的 时 候 问 
console_task 的 FIFO 发 送 数 据 即 可 。 但 要 发 送 数 
据 ， 必 须要 知道 struct FIFO 的 内 存 地 址 才 行 。 唔 ， 
这 可 怎么 办 呢 ? 


我 们 可 以 让 任务 A 在 创建 task_cons 的 时 候 ， 顺 便 将 
FIFO 也 准备 好 。 这 样 一 来 ， 任 务 A 就 能 知道 
task_cons 所 使 用 的 FIFO 的 地 址 ， 我 们 的 问题 便 迎 刃 
而 解 了 。 


放 到 struct TASK 里 面 去 吧 。 基 本 上 没有 什么 任务 是 
完全 用 不 到 FIFO 的 ， 因 此 我 们 把 它们 绑 定 起 来 。 


本 次 的 bootpack.h 节 选 
struct TASK { 


int sel, flags; /* sel 代 表 GDT 编 号 */ 
int level, priority; 


struct FIFO32 fifo; /* 这 里 ! */ 
struct TSS32 tss; 


接 下 来 我 们 来 修改 一 下 HariMain， 使 其 判断 key_to 
的 值 并 癌 task_cons 的 FIFO 发 送 数 据 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 


for (33) { 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
task sleep(task a); 
io_sti(); 
} else { 
i = fifo32_get(&fifo); 
io sti(); 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
sprintf(s, "%@2X", i - 256); 
putfonts8_asc_sht(sht_back, ©, 16, 
COL8 FFFFFF, COL8 008484, s, 2); 
/* 从 此 开始 */ if (i < 6x54 + 256 && keytable[i - 256] 
l= 0) { /* 一 般 字 符 */ 
if (key_to == 6) { /* 发 送 给 任务 A */ 
if (cursor x < 128) { 
/* 显 示 一 个 字符 之 后 将 光标 后 移 一 
人 
s[6] = keytable[i - 256]; 
s[1] = ð; 
putfonts8_asc_sht(sht_win, 
cursor_x, 28, COL8 900000, COL8_FFFFFF, s, 1); 
cursor_xX += 8; 


} else { /# 发 送 给 命令 行 窗 口 */ 
fifo32_put(&task_cons->fifo, 
keytable[i - 256] + 256); 


/* 到 此 结束 */ } 
} 
if (i == 256 + @x@e) { /* 退 格 键 */ 
/* 从 此 开始 */ if (key to == 0) { /* 发 送 给 任务 A */ 
if (cursor x > 8) { 
/* 用 空 日 探 除 光 标 后 将 光标 前 移 一 
RA 


putfonts8_asc_sht(sht_win, 
cursor_x, 28, COL8_000000, COL8_FFFFFF, " ", 1); 
cursor_X -= 8; 


} 
} else { /* 发 送 给 命令 行 窗口 */ 
fifo32_put(&task_cons->fifo, 8 


+ 256); 
/* 到 此 结束 */ } 
} 
if (i == 256 + @x@f) { /* Tab 键 */ 
《中略 》 
} 
/* 重 新 显示 光标 */ 


boxfill8(sht win->buf, sht win->bxsize, 
cursor_c, cursor_x, 28, cursor_x + 7, 43); 
sheet_refresh(sht_win, cursor_x, 28, 
cursor x + 8, 44); 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 


据 */ 
CHH) 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
(AHR ) 
} 
} 
} 


当 key_to 不 为 0 时 ， 系 统 会 癌 命 令 行 窗 口 任务 发 送 键 
盘 数 据 ， 文 持 一 般 的 字符 输入 和 退 格 键 。 由 于 在 命 
令 行 衫 口中 也 使 用 了 定时 需 等 ， 为 了 不 与 键盘 数据 
冲突 ， 我 们 在 写 入 FIFO 的 时 候 将 键盘 数据 的 值 加 上 
256. 


ENS íT Bl A ACIS BERET IN BR, FP AN ee ER 
BIEN PERLE IN RGR, Me ASAI 
keytable[] 转 换 后 的 值 。 完 其 原因 ， 是 由 于 这 样 做 可 
以 省 去 在 命令 行 窗 口 任务 中 将 按键 编码 转换 成 字符 
编码 的 步 又 。 


对 于 退 格 键 ， 我 们 将 它 的 字符 编码 定义 为 8， 因 为 
在 ASCII 码 中 ， 编 码 8 就 对 应 着 退 格 键 ， 我 们 只 是 和 
它 接轨 而 已 。 当 然 ， 如 果 你 不 想 用 8 也 完全 没有 问 


日 


题 。 


console_task 也 需要 改写 一 下 ， 因 为 我 们 必须 让 它 能 
够 接收 并 处 理 键 租 数据 。 此 外 ， 我 们 还 得 把 &fifo 改 
© M&task—>fifo. 


本 次 的 bootpack.c 节 选 


void console task(struct SHEET *sheet) 


struct TIMER *timer; 

struct TASK *task = task_now(); 

int i, fifobuf[128], cursor_x = 16, cursor_c = 
COL8_ 900000; 

char s[2]; 


fifo32 init(&task->fifo, 128, fifobuf, task); 
timer = timer_alloc(); 

timer_init(timer, &task->fifo, 1); 
timer_settime(timer, 50); 


/* 显 示 提 示 符 */ 
putfonts8_asc_sht(sheet, 8, 28, COL8_FFFFFF, 
COL8_ 900000, ">", 1); 


for (33) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
task_sleep(task) ; 


io_sti(); 
} else { 
i = fifo32_get(&task->fifo) ; 
io_sti(); 
if (i <= 1) { /* 光 标 用 定时 器 */ 
if (i != 6) { 


timer_init(timer, &task->fifo, @); 
/* TREO */ 
cursor_c = COL8_FFFFFF; 
} else { 
timer_init(timer, &task->fifo, 1); 
/* 接 下 来 置 1 */ 
cursor_c = COL8 900000; 
} 


timer_settime(timer, 50); 


if (256 <= i && i <= 511) { /* 键 盘 数据 (通过 
任务 A) */ 
if (i == 8 + 256) { 
/* 退 格 键 */ 
if (cursor x > 16) { 
/* 用 空 日 擦 除 光标 后 将 光标 前 移 一 位 */ 
putfonts8 asc_sht(sheet, 
cursor x, 28, COL8 FFFFFF, CoL8_000000, " ", 1); 


cursor x -= 8; 
} else { 
/* 一 般 字符 */ 


if (cursor x < 240) { 

/* 显 示 一 个 字符 之 后 将 光标 后 移 一 位 
*/ 

s[Q] i - 256; 

s[1] = ð; 

putfonts8_asc_sht(sheet, 
cursor_x, 28, COL8 FFFFFF, COL8_000000, s, 1); 

cursor_xX += 8; 


} 
} 


} 
/* 重 新 显示 光标 */ 
boxfill8(sheet->buf, sheet->bxsize, 
cursor_c, cursor_x, 28, cursor_x + 7, 43); 
sheet_refresh(sheet, cursor_x, 28, cursor_x 
+ 8, 44); 
} 


} 


上 面 的 程序 基本 是 由 HariMain 照 猎 画 虎 而 来 ， 唯 一 
的 一 点 区 别 束 是 开头 显示 提示 人 符 作 ?的 地 方 了 。 退 


格 键 的 处 理 上 也 对 可 以 删除 的 界限 作 了 调整 ， 以 避 
免 退 格 时 擦 掉 提示 符 。 


我 们 来 运行 一 下 看 看 , “make run”。 


co nsole 
emoy >HARIB 14DE 


_ K 
E = 
Ay LAH AL JR! 


成 功 了 ， 真 是 个 伟大 的 胜利 。 现 在 我 们 可 以 输入 瑞 
文 、 数 字 和 符 写 了 ， 但 还 无 法 输入 “和 “%”。 好 
吧 ， 接 下 来 我 们 来 解决 这 个 问题 。 


5 符号 的 输入 Charib14e) 
我 们 这 一 节 的 课题 就 是 要 实现 “1” 和 “%” 的 输入 。 


为 了 能 够 输入 “> 和”“%”， 我 们 必须 要 处 理 Shift 键 。 

根据 14.4 节 的 按键 编码 表 ，Shift 键 的 按键 编码 如 下 
(觉得 看 表格 看 贱 烦 的 话 ， 可 以 目 己 “make run”— 

下 ， 按 键 的 时 候 屏 幕 上 会 显示 出 按键 编码 ) 。 

按 下 键 时 的 数值 表 


因此 ， 我 们 准备 一 个 key_shift 变 量 ， 当 左 Shift 按 下 
时 置 为 1， 右 Shift 按 下 时 置 为 2， 两 个 都 不 按时 置 为 
0， 两 个 都 按 下 (有 人 会 这 么 干吗 ?) 的 时 候 就 置 
为 3。 


当 key_shift 为 0 时 ， 我 们 用 keytable0[] 将 按键 编码 转 
换 为 字符 编码 ， 而 当 key_shift 不 为 0 时 ， 则 使 用 
keytable1[] 进 行 转换 。 


将 上 面 的 思路 用 程序 写 到 HariMain 中 ， 束 是 下 面 这 


样 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CRH) 
static char keytable0[0x80] = { 
ð, ð, Te igs ar et, 5 "© Uk 
'8', Baer O Wa at ð, ð, 


"Ds F 2 'G 3 "HAS Jis K', AEs sae i "y ð, 
ð, oa lee Ea Xs CSa 'V', 

“Bry 'N', 'M', iS ' a i D ð, ES ð, i 
A ð, ð, ð, ð, ð, ð, 

ð 6, 0, 6 6, 6 6 7，8， 


O, 0, O, Ox5c, ©, 0， O, 0, O, 0, 
0, O, 0, Ox5c, ©, 0 
}; 
static char keytable1[@x80e] = { 
O, 0, WE" ，0x22， i 


"Dis F K 'G', 'H', oe K", a "+", 人 ð, 
ð, 1 o oy ae ae SE 'V', 

'B', 'N', 'M', nels ons ae ð, E. ð, ' 
ee ð, 0, ©, ©, O, ð, 

ð, ©, 0, 6 6 0, 6 '7', '8', 


Ae 9 '6', '+', i Maes 

C2 ag, a uo OL ge a EGS 0; Q, ð, ð, ð, ð, 
ð, ð, ð, ð, ð, 

ð, ©, 0 0, 08, 6 O 8, 0 @; 
ð, 0, 6, 0, 90， 

ð, Q, ð, ae ð, 9， ð, ð, ð, ð, 
0, @, A Oi, 8 
}; 
int key to = @, key_shift = Q; 
(中略 》 
for (;;) { 

io _cli(); 


if (fifo32_status(&fifo) == 0) { 
task_sleep(task_a); 
io_sti(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (256 <= i && i <= 511) { /* 键 盘 数 据 */ 
Sprintf(s, "%02X", i - 256); 
putfonts8_asc_sht(sht_back, ©, 16, 


COL8_FFFFFF, COL8 008484, s, 2); 


if (i < 6x86 + 256) { /* 将 按键 编码 转换 为 


字符 编码 */ 


if (key_shift == ð) { 
s[@] = keytable@[i - 256]; 
} else { 
s[@] = keytable1[i - 256]; 
} 
y else { 
s[@] = ð; 
} 
if (s[@] != 0) { /* 一 般 字符 */ 
if (key_to o) { ”/* 发 送 给 任务 A */ 


if (cursor_x < 128) { 
/* 显 示 一 个 字符 之 后 将 光标 后 移 一 
位 
s[1] = ð; 
putfonts8_asc_sht(sht_win, 
cursor_x, 28, COL8 9090000, COL8_FFFFFF, s, 1); 
cursor_X += 8; 


} 
} else { /* 发 送 给 命令 行 窗 口 */ 
fifo32_put(&task_cons->fifo, 
s[@] + 256); 
} 


if (i == 256 + @x@e) { /* 退 格 键 */ 
CHH) 


if (i == 256 + @x@f) { /* Tab 键 */ 
(中略 》 


if (i == 256 + @x2a) { /* 左 Shift ON */ 
key_shift |= 1; 


if (i == 256 + 0x36) { /*4Shift ON */ 
key_shift |= 2; 


} 
if (i == 256 + @xaa) { /*AShift OFF 
*/ 
key_shift &= ~1; 
} 
if (i == 256 + @xb6) { /* 右 Shift OFF 
*/ 


key shift &= ~2; 


} 
CHE ) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 


据 */ 
CHH) 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
《中 上 略 ) 


关于 keytable0[] 和 keytable1[]， 考 虑 到 顺便 文 

持 “ 和 “的 输入 也 不 错 ， 就 让 它 一 直 文 持 到 0x80 
的 转换 吧 。 在 keytable1[] 中 ， 对 于 天文 字母 和 小 键 
的 部 分 没有 进行 改动 。 


程序 的 原理 是 ， 先 将 按键 编码 转换 成 字符 编码 ， 转 
换 结果 存 入 s[0]。 如 果 遇 到 无 法 转换 的 按键 编码 ， 
则 辐 s[0] 存 入 0。 剩 下 的 部 分 没有 什么 难度 ， 只 要 仔 
细 读 读 程 序 应 该 就 可 以 理解 了 。 


我 们 来 运行 一 下 ， 结 果 如 下 。 


TT | 
[HARIB14E | |i 


可 以 输入 符号 了 ! 


虽然 我 们 只 修改 了 任务 A， 但 在 命令 行 窗 口中 也 可 
以 输入 符号 了 ， 真 不 错 。 不 过 现在 我 们 输入 的 英文 
们 需要 实现 小 写字 母 的 输入 ， 一 起 看 下 一 他 吧 。 


6 ”大写 字母 与 小 写字 母 harib14f) 


要 实现 区 分 大 号 、 小 写字 母 的 输入 ， 我 们 必须 要 同 
时 判断 Shift 键 的 状态 以 及 CapsLock 的 状态 。 


CapsLock 为 OFF & Shift 键 为 OFF 小写 英文 字 


CapsLock AOFF & Shift 键 为 ON - 大 写 英 文字 母 
CapsLock 为 ON & Shift 键 为 OFF - 大 写 英 文字 母 
CapsLock 为 ON & Shift 键 为 ON | 小 与 瑞 文 字母 


综 上 所 述 ， 我 们 可 以 将 需要 转换 为 小 写字 母 的 条 件 
总 结 如 下 : 


© 输入 的 字符 为 英文 字母 
e “CapsLock OFF & Shift 键 为 OFF” 或 
者 “CapsLock 为 ON & Shift 键 为 ON” 


我 们 已 经 知道 如 何 获 取 Shift 键 的 状态 ， 但 是 
CapsLock 的 状态 要 如 何 获取 呢 ?BIOS 知 道 
CapsLock 的 状态 ， 可 现在 我 们 处 于 32 位 模式 ， 没 办 
法 加 BIOS 碍 询 。 不 过 别 担 心 ， 在 asmhead.nas 中 ， 


我 们 已 经 从 BIOS 获 取 到 了 键盘 状态 ， 束 保存 在 
binfo—>leds'# 。 


bjinfo->leds 的 第 4 位 — ScrollLock% 
binfo->leds 的 第 5 位 =~ NumLock 状 态 
binfo->leds 的 第 6 位 + CapsLock 状 态 


只 要 使 用 上 述 数据 ， 我 们 就 可 以 处 理 大 小 写字 母 的 
输入 了 。 


在 计 语 名 中， 除了 && 运 算 符 ， 还 有 一 个 | 运算 符 ， 
这 个 运算 符 代 表 “ 只 要 其 中 任意 一 个 条 件 成 立即 

可 ”的 意思 ， 我 们 可 以 用 它 来 改写 HariMain， 使 其 
能 够 实现 小 写字 母 的 输入 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 
int key_to = 0, key_shift = @, key_leds = (binfo- 
>leds >> 4) & 7; /*iK HL! */ 


CHH) 


for (33) { 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
task_sleep(task_a); 
io_sti(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
sprintf(s, "%@2X", i - 256); 
putfonts8_asc_sht(sht_back, ©, 16, 
COL8_FFFFFF, COL8 008484, s, 2); 
if (i < 6x86 + 256) {  /* 将 按键 编码 转换 


CHH) 
} else { 
s[6] = ð; 


为 字符 编码 */ 


} 
/* 从 此 开始 */ if ('A' <= s[@] 8& s[@] <= 'Z') { /* 当 
输入 字符 为 英文 字母 时 */ 
if (((key_leds & 4) == 6 && 
key shift == ð) || 
((key_leds & 4) != 0 && 
key shift != @)) { 
S[@] += 0x20;  /* 将 大 写字 母 转换 


为 小 写字 母 */ 
} 
/* 到 此 结束 */ } 
if (s[@] != 6) { /* 一 般 字 符 */ 
《中 上 略 )》 
} 
(中 上 略 》 


} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
CHAK ) 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 


(中 上 略 》 


要 获取 CapsLock 等 锁定 键 的 状态 ， 我 们 只 需要 第 4 
一 6 位 的 数据 ， 剩 下 的 数据 对 我 们 没 用 ， 所 以 在 

key_leds 中 只 从 binfo 一 >leds 取 出 指定 的 3 个 比特 即 
可 。 这 里 我 们 还 做 了 4 个 比特 的 右 移 位 ， 这 是 为 了 


在 下 一 市 中 能 够 更 加 方便 地 使 用 这 些 数据 。 


我 们 所 使 用 的 ASCII 码 中 ， 将 大 与 字母 的 编码 加 上 
0x20， 束 得 到 相应 的 小 写字 母 编 码 。 利 用 这 一 性 
质 ， 我 们 束 可 以 将 大 写字 母 转换 为 小 写字 母 。 


我 们 来 运行 一 下 ，“make run”， 结 果 如 下 。 


可 以 输入 小 写字 母 了 ! 


呀 ， 这 样 就 变 得 酷 多 了 吧 。 啥 ? 不 能 满足 于 这 点 成 
绩 ? 其 实 这 样 插 好 的 不 是 吗 ， 一 步 一 个 脚印 ， 享 受 
每 一 次 进步 ， 这 样 才 有 成 就 感 呀 。 


我 们 已 经 实现 了 根据 CapsLock 的 状态 来 切换 大 小 写 
字母 的 输入 ， 那 大 家 想 不 想 实现 在 按 下 CapsLock 键 
的 时 候 切 换 CapsLock 的 状态 呢 ? 一 定 很 想 吧 ? CHG 
哈 ， 笔 者 又 在 目 说 目 话 了 。 ) 


COLUMN-10 键盘 的 设计 问题 ? 


在 harib14f 中 ， 对 于 同时 按 住 左右 Shift 键 输入 字母 
的 情况 ， 我 们 的 程序 也 做 了 相应 的 处 理 ， 即 同时 
按 下 两 个 Shift 键 ， 和 只 按 下 其 中 一 个 Shift 键 效果 
fe FEN. 


但 当 笔 者 试验 了 一 番 之 后 ， 却 发 现 了 一 件 很 有 意 
思 的 事情 一 一 按 下 左 Shift 十 右 Shift 十 A 是 无 法 输 
入 的 ， 可 是 左 Shift 十 右 Shift 十 Z 却 可 以 输入 。 


一 开始 笔者 还 惊 眉 地 想 “ 粳 故 ! 别 是 bug 吧 ! ”， 但 
后 来 看 了 一 下 显示 出 来 的 按键 编码 ， 发 现 这 貌似 
是 键盘 本 入 设计 的 问题 。 其 实在 Windows 中 也 会 
发 生 同 样 的 现象 。 


笔者 用 家 里 好 几 台 电脑 试验 了 一 下 ， 发 现 无 论 用 
哪个 键盘 ，ASDF 这 4 个 键 ， 在 同时 按 下 两 边 Shift 


键 的 情况 下 都 无 法 输入 。 不 过 笔者 家 里 的 键盘 无 
一 例外 都 是 便宜 货 ， 说 不 定 中 高 级 键 租 上 吏 不 会 
RATA Hl. KAMARA MEN a, te Ay LAA 
目 己 的 键盘 试 试 看 哦 。 


7 对 各 种 锁定 键 的 文 持 〈harib14g ) 


好 ， 让 我 们 开始 吧 。 回 头 再 看 一 授 14.4 节 中 的 编码 
表 《〈 不 想 看 表格 的 同学 还 是 可 以 目 己 按键 租 看 编码 
R) ， 我 们 可 以 得 到 ; 


Q@x3a: CapsLock 
@x45: NumLock 
@x46: ScrollLock 


因此 当 我 们 接收 到 上 述 按 键 编码 时 ， 只 要 将 binfo 一 
>leds 中 对 应 的 位 置 改 写 束 可 以 了 。 这 和 key_shift 基 
本 上 是 一 样 的 ， 很 容易 实现 。 


到 这 里 ， 我 们 已 经 实现 了 锁定 键 模式 的 切换 ， 不 过 
现在 还 是 有 一 个 问题 ， 模 式 是 可 以 切换 了 ， 但 是 键 
A ETI TRAN TT BI ANSE AIER HES 
生 下 述 情 况 : 明明 CapsLock 灯 没 亮 ， 但 在 系统 中 却 
0 
RE. 


RT AGI K Beth ERAN IA, Fee aid 
载 。 


http://community.osdev.info/?(AT)keyboard 
。 关 于 LED 的 控制 


o 对 于 NumLock 和 CapsLock 等 LED 的 控制 ， 可 
采用 下 面 的 方法 回 键 盘 发 送 指令 和 数据 。 


。 读 取 状态 寄存 器 ， 等 待 bit 1 的 值 变 为 0 


a 问 数据 输出 〈《0060) 写 入 要 发 送 的 1 个 字 
TELE o 


等 待 键 柱 返回 1 个 字 节 的 信息 ， 这 和 等 待 

键盘 输入 所 采用 的 方法 相同 (用 IRQ 等 待 
或 者 用 轮 询 状态 寄存 器 bit 1 的 值 直 到 其 变 
为 0 都 可 以 ) 。 


a 返回 的 信息 如 有 果 为 0xfa， 表 明 1 个 字 节 的 
数据 已 成 功 发 送 给 键盘 。 如 为 0xfe 则 表明 
发 送 失败 ， 需 要 返回 第 1 步 重 新 及 送 。 


o 要 控制 LED 的 状态 ， 需 要 按 上 述 方法 执行 两 
次 ， 回 键盘 发 送 EDxx 数 据 。 其 中 ，xx 的 bit 0 
RE ScrollLock, bit 1 代表 NumLock，bit 2 代 
表 CapsLock (ORREK, 1RR) o bit 
3 一 7 为 保留 位 ， 置 0 即 可 。 


有 了 这 些 信 息 ， 我 们 总 算 看 到 希望 了 ， 于 是 我 们 写 
了 以 下 程序 。 


本 次 的 bootpack.c 节 选 


#define KEYCMD_LED Q@xed 


void HariMain(void) 


CHH) 
struct FIF032 fifo, keycmd; 
int fifobuf[128], keycmd_buf[32]; 

CPH) 

int key_to = 0, key_shift = @, key_leds = (binfo- 

>leds >> 4) & 7, keycmd_wait = -1; 

《中略 ) 
fifo32 init(&keycmd, 32, keycmd_buf, 0); 

CPH) 


/# 为 了 避免 和 键盘 当前 状态 冲突 ， 在 一 开始 先进 行 设 置 */ 
fifo32 put(&keycmd, KEYCMD LED); 
fifo32_put(&keycmd, key_leds); 


for (;;) { 
if (fifo32_status(&keycmd) > @ && keycmd wait < 
o) { /* 从 此 开始 */ 

/* 如 果 存 在 癌 键盘 控制 占 发 送 的 数据 ， 则 发 送 它 。”*/ 
keycmd wait = fifo32 get(&keycmd); 
wait_KBC_sendready() ; 
io_out8(PORT_KEYDAT, keycmd_wait) ; 

} ”/* 到 此 结束 */ 


io_cli(); 


if (fifo32_status(&fifo) == @) { 
task sleep(task a); 


io_sti(); 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (256 <= i && i <= 511) { /* 键盘 数据 */ 
CHH ) 


/* 从 此 开始 */ if (i == 256 + 6x3a) { /* CapsLock */ 

key_leds ^= 4; 
fifo32 put(&keycmd, KEYCMD LED); 
fifo32 put(&keycmd, key_leds); 

} 

if (i == 256 + @x45) { /* NumLock */ 
key _leds ^= 2; 
fifo32 put(&keycmd, KEYCMD_LED); 
fifo32 put(&keycmd, key_leds); 


if (i == 256 + 0x46) { /* ScrollLock 


*/ 
key_leds ^= 1; 
fifo32_put(&keycmd, KEYCMD_LED); 
fifo32_put(&keycmd, key_leds); 
} 
if (i == 256 + Oxfa) { /* 键 盘 成 功 接 收 到 
数据 */ 
keycmd wait = -1; 
} 
if (i == 256 + Oxfe) { /* 键 盘 没 有 成 功 接 
收 到 数据 */ 


wait_KBC_sendready(); 
io_out8(PORT_KEYDAT, keycmd_wait) ; 
/* 到 此 结束 */ } 
CHH ) 
} else if (512 <= i && i <= 767) { /* 和 鼠标 数 
据 */ 


CHIK) 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CRIK) 


程序 的 工作 原理 是 这 样 的 。 首 先 ， 我 们 创建 了 一 个 
Hkeycmd 的 FIFO 绥 冲 区 ， 它 不 是 用 来 接收 中 断 请 
求 的 ， 而 是 用 来 管理 由 任务 A 同 键 盘 控 制 絮 发送 数 
据 的 顺序 的 。 如 果 有 数据 要 发 送 到 键盘 控制 器 ， 首 
先 会 在 这 个 keycmd 中 累积 起 来 。 


keycmd_wait® Œ, ROR Ze AN TA BERETS Hill AS ACIS BL 
据 的 状态 。 当 keycmd_wait 的 值 为 -1 时 ， 表 示 键 盘 控 
制 器 处 于 通常 状态 ， 可 以 发 送 指令 ;， 当 值 不 为 -1 
时 ， 表 示 键 盘 控 制 器 正在 等 竺 发送 的 数据 ， 这 时 要 
发 送 的 数据 被 保存 在 keycmd_wait 变 量 中 。 


在 for 循 环 的 开头 ， 当 keycmd 中 有 数据 ， 且 
keycmd_wait 为 -1 时 ， 回 键盘 发 送 1 个 字 节 的 数据 ， 

在 开始 发 送 数据 的 同时 ，keycmd_wait 变 为 非 -1 的 
值 。 随 后 ， 当 从 键盘 接收 到 0xfa 返 回信 息 时 ， 
keycmd_wait 恢 复 为 -1， 继 续 发 送 下 一 个 数据 。 当 从 
键盘 接收 到 的 返回 信息 为 0xfe 时 ， 则 重新 发 送 刚 才 
的 数据 。 


在 for 循 环 前 面 ， 我 们 癌 键 盘 控 制 占 设置 了 指示 灯 的 
状态 ， 也 许 这 一 段 是 可 有 可 无 的 ， 不 过 这 样 可 以 保 
证 key_leds 的 值 和 实际 的 键盘 指示 灯 状 态 绝 对 不 会 
发 生 冲 突 的 情况 ， 因 此 保险 起 见 还 是 设置 了 。 


好 了 ， 我 们 来 “make run”。 本 来 想 贴 一 张 运行 时 的 
截图 ， 不 过 这 里 友 生 变化 的 不 是 屏幕 画面 ， 而 是 键 
檬 的 指示 灯 ， 所 以 很 遗憾 ， 没 有 办 法 给 大 家 展示 这 
个 令 人 感动 的 场面 了 。 


I? 不 管 怎 么 按 CapsLock 键 ， 在 笔者 的 Windows 上 
都 无 法 点 亮 指 示 灯 ， 不 过 NumLock 和 ScrollLock 却 

是 正常 的 。 哦 ， 按 Shift 十 CapsLock 指 示 灯 就 亮 了 ， 

好 奇怪 啊 ， 我 们 明明 不 是 这 样 设计 的 呢 。 


由 于 实在 无 法 理解 这 一 现象 ， 笔 者 又 重新 “make 
run” 了 harib14f， 按 下 NumLock 进 行 实验 ， 喷 ? 
harib14f 中 也 可 以 点 亮 NumLock 指 示 灯 呢 !。 看 起 来 
在 这 个 QEMU 模 拟 器 中， 键盘 的 指示 灯 貌 似 并 不 是 
由 模拟 器 管理 ， 而 是 由 Windows 管 理 的 。 


1 harib14f 中 还 尚未 实现 对 指示 灯 的 控制 。 一 一 译 
者 注 


于 是 我 们 在 真 机 环境 下 再 挑战 一 下 。 哇 ， 这 次 完美 
了 ，harib14f 无 法 改变 键盘 指示 灯 的 状态 ， 而 
harib14g 则 可 以 正常 控制 键盘 指示 灯 。 撤 论 ! 


好 ， 今 天 就 到 这 里 吧 ， 明 天 我 们 继续 来 做 命令 行 窗 
口 哦 ! 


第 18 天 dir 命令 


o 控制 光标 闪烁 (1) Charib15a) 
© 控制 光标 闪烁 (2) Charib15b) 
。 对 回 车 键 的 文 持 (harib15c) 

。 对 窗口 滚动 的 支持 (harib15d) 


mem 4 Charib15e) 
cls 命 令 Charib15f) 
dir 命 令 Charib15g ) 


1 控制 光 标 闪 烁 (1) (harib15a) 


我 们 已 经 完 成 了 一 个 很 像样 的 命令 行 窗口 ， 看 起 来 
越 来 越 有 操作 系统 范 儿 了 ， 真 是 可 辟 可 质 。 今 天 我 
们 也 要 咱 足 干劲 继续 努力 哦 。 


说 起 来 ， 如 果 和 仔细 观察 一 下 Windows 的 话 ， 就 会 发 
现 和 我 们 的 “ 纸 娃娃 系统 ”有 个 不 同 的 地 方 。 在 
Windows 中 ， 只 有 可 以 接受 键盘 输入 的 窗口 有 光标 
闪烁 ， 而 其 他 的 窗口 中 是 不 显示 光标 的 。 这 样 的 设 
计 姐 似 挺 不 错 的 ， 不 然 所 有 的 窗口 光标 都 闪烁 的 话 
眼睛 要 花 掉 了 ， 那 我 们 也 来 照 猎 画 虎 试 试看 吧 。 


怎样 才能 模仿 出 这 个 效果 呢 ? 判断 是 否 按 下 Tab 键 
的 是 HariMain， 而 控制 光标 闪烁 的 是 HariMain 和 
console_task. 


TTTT 
首先 ， 我 们 从 比较 简单 的 HariMain 开 始 考虑 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 
{ 
(中 上 略 ) 


for (33) { 
CHH) 
if (fifo32_status(&fifo) == 0) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /* 键 盘 数 据 */ 
CREK) 
if (i == 256 + 6xef) { /* Tab 键 */ 
if (key to == 0) { 
key to = 1; 
make_wtitle8(buf_win, sht win- 
>bxsize, "task a", @); 
make_wtitle8(buf_cons, 
sht_cons->bxsize, "console", 1); 


/* 从 此 开始 */ cursor_c = -1; /* 不 显示 光标 */ 
/* 到 此 结束 */ boxfill8(sht win->buf, sht win- 
>bxsize, COL8 FFFFFF, cursor_x, 28, cursor_x + 7, 43); 
} else { 
key to = @; 


make_wtitle8(buf_win, sht win- 
>bxsize, "task a", 1); 
make_wtitle8(buf_cons, 
sht_cons->bxsize, "console", @); 
/*IX FAL */ cursor_c = COL8_000000; /* 显 示 
光标 */ 
} 
sheet _ refresh(sht win， ®©, @, 
sht win->bxsize, 21); 
sheet_refresh(sht_cons, 0, ©, 
sht_cons->bxsize, 21); 


} 
CREK) 
/# 重 新 显示 光标 */ 
/* 从 此 开始 */ if (cursor c >= 6) { 
boxfil18(sht_win->buf, sht_win- 


>bxsize, cursor_c, cursor_x, 28, cursor_x + 7, 43); 
/* 到 此 结束 */ } 
sheet_refresh(sht_win, cursor_x, 28, 
cursor_x + 8, 44); 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 


《中略 》 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
/* 从 此 开始 */ if (i != ð) { 
timer_init(timer, &fifo, @); /* Fix 


据 */ 


He */ 
if (cursor_c >= @) { 
cursor_c = COL8 900000; 
} 
} else { 
timer_init(timer, &fifo, 1); /* Fix 
fil */ 


if (cursor_c >= 0) { 
cursor_c = COL8 FFFFFF ; 
} 
} 
timer_settime(timer, 50); 
if (cursor_c >= @) { 
boxfil18(sht_win->buf, sht_win- 
>bxsize, cursor_c, cursor_x, 28, cursor_x + 7, 43); 
sheet_refresh(sht_win, cursor_x, 
28, cursor_x + 8, 44); 


/* 到 此 结束 */ } 


我 们 将 按 下 Tab 键 时 的 处 理 以 及 光标 闪烁 的 处 理 改 


写 了 一 下 ， 当 不 想 显 示 光 标的 时 候 ， 使 cursor_c 为 
负 值 

这 样 一 来 ， 任 务 A 的 窗口 中 光标 就 可 以 停止 闪烁 
了 ， 成 功 了 ! 命令 行 窗 口 因为 还 没有 改过 ， 所 以 即 
便 不 是 处 于 输入 模式 ， 光 标 也 依然 会 闪烁 。 


“make run” 一 下 ， 结 果 如 下 。 


ariblsa 从 


任务 A 的 光标 不 见 了 哦 ! 


2 控制 光标 闪烁 (2) Charib15b) 


接 下 来 我 们 来 实现 稍微 有 点 矿 烦 的 命令 行 窗 口中 光 
PSNR 的 控制 。 之 所 以 说 稍微 有 点 厂 烦 ， 古 因为 命 
令 行 窗口 是 另外 一 个 任务 ， 无 法 从 HariMain 中 改变 
它 里 面 的 变量 。 


那么 应 该 怎样 由 HariMain 〈 任 务 A) 向 

console_ task (MS TAO) 传递 信息 ， 告 诉 它 “不 
需 让 光标 闪烁 ?或 者 “需要 让 光标 闪烁 >? 呢 ? 像 传 递 
按键 编码 一 样 ， 我 们 可 以 使 用 FIFO 来 实现 。 


我 们 先 将 光标 开始 内 烁 定义 为 2， 停 止 内 烁 定义 为 
3。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 


for (33) { 

CRH) 

if (fifo32_status(&fifo) == 0) { 
《中 略 ) 

} else { 
《中 略 ) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 

《中 略 ) 


if (i == 256 + 6xef) { /* Tab 键 */ 
if (key to == 0) { 

key to = 1; 

make_wtitle8(buf_win, sht win- 
>bxsize, "task a", @); 

make_wtitle8(buf_cons, 
sht_cons->bxsize, "console", 1); 

cursor_c = -1; /* 不 显示 光标 */ 

boxfill8(sht win->buf, sht win- 
>bxsize, COL8 FFFFFF, cursor_x, 28, 

cursor_x + 7, 43); 

/# 这 里 ! */ fifo32_put(&task_cons->fifo, 2); 
/* 命 令 行 窗口 光标 ON */ 


} else { 
key to = 0; 
make_wtitle8(buf_win, sht win- 
>bxsize, "task a", 1); 
make_wtitle8(buf_cons, 
sht_cons->bxsize, "console", @); 
cursor_c = COL8 900000; /* 显 示 光 


标 */ 
/# 这 里 ! */ fifo32_put(&task_cons->fifo, 3); 
/* 命 令 行 窗口 光标 OFF */ 


} 

sheet _ refresh(sht win， 6，6， 
sht win->bxsize, 21); 

sheet_refresh(sht_cons, 0, 9, 
sht_cons->bxsize, 21); 


} 
CHAS ) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
中略 ) 


} else if (i <= 1) { /* 光 标 用 定时 器 */ 
中略 ) 


HariMain 这 样 改 就 差不多 了 。 


下 面 该 轮 到 console task 了 。 在 启动 的 时 候 是 任务 A 
处 于 输入 状态 ， 因 此 我 们 在 一 开始 束 将 cursor_c 置 
为 -1， 剩 下 的 部 分 和 任务 A 大 同 小 异 。 


本 次 的 bootpack.c 节 选 


void console task(struct SHEET *sheet) 
{ 


struct TIMER *timer; 

struct TASK *task = task_now(); 

int i, fifobuf[128], cursor_x = 16, cursor_c = -1; 
eee eS | 

char s[2]; 


中略) 


for (35) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
task_sleep(task) ; 
io_sti(); 
} else { 
i = fifo32_get(&task->fifo) ; 


io_sti(); 
if (i <= 1) { /* 光 标 用 定时 器 */ 
/* 从 此 开始 */ if (i != @) { 
timer init(timer, &task->fifo, ©); 
/*# 下 次 置 为 8 */ 
if (cursor_c >= @) { 
cursor_c = COL8 FFFFFF; 
} 
} else { 
timer_init(timer, &task->fifo, 1); 
/*FIREAI */ 
if (cursor_c >= @) { 
cursor_c = COL8 900000; 
} 
/* 到 此 结束 */ } 
timer_settime(timer, 50); 


} 


if (i == 2) {  /#* 光 标 ON */  ”/* 从 此 开始 */ 
cursor_c = COL8_FFFFFF; 
} 
if (i == 3) {  /* 光 标 OFF */ 
boxfill8(sheet->buf, sheet->bxsize, 
COL8_000000, cursor_x, 28, cursor_x + 7, 43); 
cursor_c = -1; 


} ”/* 到 此 结束 */ 


if (256 <= i && i <= 511) { /* 键 盘 数据 (通过 
任务 A) */ 
if (i == 8 + 256) { 
/* 退 格 键 */ 
if (cursor x > 16) { 
/* 用 空白 探 除 光标 后 将 光标 前 移 一 位 
Sy 


putfonts8 asc_sht(sheet, 
cursor x, 28, COL8 FFFFFF, CoL8_000000, " ", 1); 
cursor x -= 8; 


} 
} else { 
/* 一 般 字 符 */ 
Lf Co or x < 240) { 
/* 显 示 一 个 字符 之 后 将 光标 后 移 一 位 
yh 
s[6] i - 256; 
s[1] = ð; 
putfonts8_asc_sht(sheet, 
cursor_x, 28, COL8 FFFFFF, COL8_000000, s, 1); 
cursor_xX += 8; 


} 
} 


} 

/* 重 新 显示 光标 */ 

if (cursor_c >= @) { /* 从 此 开始 */ 

boxfill8(sheet->buf, sheet->bxsize, 

cursor_c, cursor_x, 28, cursor_x + 7, 43); 

} ”/* 到 此 结束 */ 

sheet refresh(sheet, cursor x, 28, cursor x 
+ 8, 44); 

} 


} 


还 是 一 如 既往 来 “make run”， 不 知道 能 不 能 成 功 
HE o 


console Ea 


task_a x] 
fharib15bij [< 


= = 


3 ”对 回 车 键 的 支持 (harib15c ) 


既然 大 家 精神 振奋 ， 那 瓯 让 我 们 一 或 作 气 继续 前 进 
IE. 


现在 的 命令 行 窗口 里 面 ， 按 下 回 车 键 是 完全 没有 反 
应 的 ， 我 们 得 让 它 对 回 车 键 进行 响应 才 行 。 有 具体 应 
该 如 何 响应 呢 ? 暂且 只 要 简单 地 换个 行 就 好 了 。 实 
际 上 ， 这 里 应 该 对 输入 的 字符 进行 判断 ， 然 后 执行 
相应 的 命令 才 对 ， 不 过 一 上 来 就 搞 这 个 也 太 难 了 
点 ， 笔 者 的 讲解 会 跟 不 上 的 ， 因 此 我 们 还 是 先 不 管 
什么 命令 了 ， 全 部 直接 忽略 掉 吧 。 

|i | yt E 
我 们 先 修改 一 下 HariMain， 使 其 在 按 下 回 车 键 时 问 
命令 行 窗口 发 送 10+256 这 个 值 。 之 所 以 用 10， 是 因 
为 用 于 控制 换行 的 ASCII 码 就 是 10， 我 们 在 这 里 照 
搬 一 下 而 已 。 当 然 ， 如 果 你 喜欢 用 别 的 值 ， 也 是 完 
全 没有 问题 的 哦 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 
{ 
CHS ) 


for (33) { 
CHH ) 
if (fifo32_status(&fifo) == 0) { 
《中 上 略 》 
} else { 
《中 上 略 》 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
《中 上 略 》 
/* 从 此 开始 */ if (i == 256 + 6@x1lc) { /* 回 车 键 */ 
if (key_to != 6) { /* 发 送 至 命令 行 


Ey 
fifo32_put(&task_cons->fifo, 10 
+ 256); 
/* 到 此 结束 */ } 
CREK) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
CREK) 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CREK) 


然后 我 们 还 要 修改 用 来 接收 数据 的 console_task。 之 

前 我 们 已 经 有 了 一 个 cursor_x 变 量 ， 按 照 这 个 样子 
再 创建 一 个 cursor_y 变 量 ， 当 按 下 回 车 键 时 ， 将 
cursor_y 加 1 天 可 以 了 。 


本 次 的 bootpack.c 节 选 


void console task(struct SHEET *sheet) 
{ 


struct TIMER *timer; 

struct TASK *task = task_now(); 

int i, fifobuf[128], cursor_x = 16, cursor_y = 28, 
cursor_c = -1;  /* 这 里 ! */ 


CHH) 
for (33) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
CHH ) 
} else { 
i = fifo32_get(&task->fifo) ; 
io_sti(); 
CHH ) 
if (256 <= i && i <= 511) { /* 键 盘 数据 (通过 
任务 A) */ 
if (i == 8 + 256) { 
/* 退 格 键 */ 
CHH) 
/* 从 此 开始 */ } else if (i == 16 + 256) { 
/* 回 车 键 */ 


if (cursor y < 28 + 112) { 
/* 用 空格 将 光标 擦 除 */ 
putfonts8 asc_ sht(sheet, 
cursor_x, cursor_y, COL8 FFFFFF, COL8 86806686860, " ", 1); 
cursor_y += 16; 
/* 显 示 提 示 符 */ 
putfonts8 asc_ sht(sheet, 8, 
cursor_y, COL8 FFFFFF, COL8 666660, ">", 1); 
cursor x = 16; 
/* 到 此 结束 */ } 
} else { 
/* 一 般 字符 */ 


中略) 
} 


} 

/* 重 新 显示 光标 */ 

if (cursor_c >= @) { 
(PEAT -7 boxfill8(sheet->buf, sheet->bxsize, 
cursor_c, cursor_x, cursor_y, cursor_x + 7, cursor_y + 
15); 

} 

sheet_refresh(sheet, cursor_x, cursor_y, 
cursor_x + 8, cursor_y + 16); /* 这 里 ! */ 


} 


} 


好 ， 改 成 这 样 差 不 多 了 ， 到 撒 能 不 能 成 功 呢 ? 我 们 


还 是 有 照常 “make run” 一 下 。 


换行 成 功 了 哦 ! 
END ORAS, HB! 


4 ”对 窗口 深 动 的 支持 (harib15d) 


在 harib15c 中 ， 到 最 后 一 行 的 时 候 回 车 键 就 不 管用 
了 ， 原 因 很 简单 ， 因 为 下 面 没 有 更 多 的 行 了 ， 这 可 
不 像 个 操作 系统 的 样子 啊 。 在 别 的 操作 系统 中 过 到 
这 样 的 情况 会 怎样 处 理 呢 ?窗口 应 该 会 回 下 深 动 才 
对 。 那 么 我 们 来 让 “ 纸 娃 娃 系 统 ” 也 支持 窗口 深 动 
HE 


要 实现 窗口 深 动 ， 只 要 将 所 有 的 像素 问 上 移动 一 行 
就 可 以 了 。 元 系 移 动 这 种 操作 大 家 应 该 已 经 习惯 了 
IE? 移动 完成 之 后 ， 还 需要 将 最 下 面 一 行 涂 黑 ， 合 
则 上 面 一 行 的 内 容 就 会 残留 在 那里 。 


本 次 的 bootpack.c 节 选 


void console task(struct SHEET *sheet) 


{ 
中略 ) 


int x, y; 
CHH ) 


for (33) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
CREK) 
} else { 
CREK) 


if (256 <= i && i <= 511) { /# 键 盘 数据 (通过 


任务 A) */ 
if (i == 8 + 256) { 
/* 退 格 键 */ 
CHH) 
} else if (i == 10 + 256) { 
/* Enter */ 


/* 用 空格 将 光标 探 除 */ 
putfonts8 asc sht(sheet, cursor_x, 
cursor_y, COL8 FFFFFF, COL8 68680606860, " ", 1); 


LW if (cursor y < 28 + 112) { 

cursor_y += 16; /* 换 行 */ 

} else { 

/# 滚 动 */ 

for (y = 28; y < 28 + 112; y++) 
{ 

for (x = 8; x < 8 + 240; 

x++) { 


sheet->buf[x + y * 
sheet->bxsize] = sheet->buf[x + (y + 16) * 
sheet ->bxsize |; 


} 
} 
for (y = 28 + 112; y < 28 + 
128; y++) { 
for (x = 8; x < 8 + 240; 
x++) { 


sheet->buf[x + y * 
sheet->bxsize] = COL8 900000; 
} 
} 
sheet_refresh(sheet, 8, 28, 8 + 
240, 28 + 128); 
} 
/#* 显 示 提 示 符 */ 
putfonts8_asc_sht(sheet, 8, 


cursor_y, COL8 FFFFFF, COL8_000000, ">", 1); 


/* 到 此 为 止 */ cursor x = 16; 
} else { 
/* 一 般 字 符 */ 
(中略 》 
} 


貌似 完工 下 ’ 测试 一 下 ’ “make run’. 


WAM! 窗口 深 动 了 哆 ! 


我 们 又 成 功 了 。 一 切 顺利 呀 ， 如 此 顺利 到 底 是 好 还 
FLARE WE... SR FE RIE AREER | 


5 mem 合 令 Charib15e) 


之 前 我 们 已 经 成 功 实现 了 屏幕 滚动 ， 现 在 该 是 到 了 
让 它 执行 命令 的 时 候 了 。 不 过 这 值得 纪念 的 第 一 个 
命令 到 底 该 花 落 谁 家 呢 ? 纠结 了 一 番 之 后 ， 还 是 决 
定 来 做 mem 命 令 吧 。 


mem 命 令 残 是 memory 的 缩写 ， 也 就 是 用 来 显示 内 
存 使 用 情况 的 命令 。 画 面 上 虽然 已 经 显示 了 剩余 内 
存 ， 不 过 现在 被 命令 行 窗口 挡住 看 不 见 了 。 因 此 我 
们 就 不 让 它 继 续 显 示 了 ， 改 成 用 命令 来 得 询 好 了 。 


而 且 ， 这 种 功能 对 于 一 个 命令 来 说 也 是 很 容易 实现 
的 ， 比 起 之 前 在 背景 上 面 显 示 剩 余 内 存 来 说 ， 还 是 
用 命令 来 得 询 比 较 像 个 操作 系统 的 样子 。 既 然 如 
此 ， 那 我 们 干脆 顺便 把 按键 编码 、 鼠 标 坐 标的 显示 
也 一 起 去 挥 吧 。 


既然 方针 已 定 ， 那 束 开 工 吧 。 前 先 从 去 挤 多 余 的 显 
示 开 始 ， 这 个 非常 容易 ， 我 们 给 这 次 去 挥 的 行 加 上 
了 /A 注释 标记 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 
// sprintf(s, "(%3d, %3d)", mx, my); 
// putfonts8 asc sht(sht back, ©, ©, COL8_FFFFFF, 
COL8 668484，s，16); 
// sprintf(s, "memory %dMB free : %dKB", 
// memtotal / (1024 * 1024), 
memman_total(memman) / 1024); 
// putfonts8_asc_sht(sht_back, ©, 32, COL8 FFFFFF, 
COL8 008484, s, 40); 


(中 上 略 ) 
for (;;) { 
CHEK) 
if (fifo32_status(&fifo) == 0) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
// sprintf(s, "%02X", i - 256); 
// putfonts8_asc_sht(sht_back, ©, 16, 
COL8_FFFFFF, COL8 008484, s, 2); 
(中 上 略 》 
} else if (512 <= i && i <= 767) { /* 和 鼠标 数 
据 */ 
if (mouse decode(&mdec, i - 512) != ð) 
{ 
// /* 数 据 已 达到 3 个 字 节 ， 显 示 */ 
// sprintf(s, "[lcr %4d %4d]", mdec.x, 
mdec.y); 
// if ((mdec.btn & 0x01) != @) { 
// s[1] = TEA; 


// } 


// if ((mdec.btn & 0x02) != @) { 


// siaus 
// } 
// if ((mdec.btn & 0x04) != ð) { 
// s[2] = 'C'; 
// 
// putfonts8 asc_sht(sht_back, 32, 16, 
COL8_FFFFFF, COL8 008484, s, 15); 
(中 上 略 ) 
// sprintf(s, "(%3d, %3d)", mx, my); 
// putfonts8 asc sht(sht back, ©, 9, 
COL8_FFFFFF, COL8 008484, s, 10); 
CRH) 


} 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CHIK) 


EIR, AUS a A> 21417, HAEE. Midt e 
来 我 们 要 实现 mem 命 令 ， 行 数 叉 会 变 多 啦 。 


增加 了 mem 命 令 的 部 分 后 ， 就 变 成 了 这 样 。 


本 次 的 bootpack.c 节 选 


void console task(struct SHEET *sheet, unsigned int 
memtotal) 


{ 


CHH) 

char s[30], cmdline[30]; [XET #7 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR;  /# 这 里 ! */ 


中略) 


for (;;) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /* 键 盘 数据 (通过 
任务 A) */ 
if (i == 8 + 256) { 
/* 退 格 键 */ 
CHEK) 
} else if (i == 10 + 256) { 
/* 回 车 键 */ 
/* 将 光标 用 空格 探 除 后 换行 */ 
putfonts8 asc sht(sheet, cursor_x, 
cursor_y, COL8 FFFFFF, COL8 6868066860, " ", 1); 
/* 从 此 开始 */ cmdline[cursor_x / 8 - 2] = ð; 


cursor_y = cons_newline(cursor_y, 


sheet) ; 

/* 执 行 命令 */ 

if Soe == 'm' && cmdline[1] 
== 'e' && cmdline[2] == 'm' && ee nell == ð) { 


/* mem 命 令 */ 

sprintf(s, "total %dMB", 
memtotal / (1024 * 1024)); 

putfonts8 asc _sht(sheet, 8, 
cursor_y, COL8 FFFFFF, COL8 900000, s, 30); 

cursor_y = 
cons_newline(cursor_y, sheet); 


sprintf(s, "free %dKB", 
memman_total(memman) / 1024); 
putfonts8 asc _sht(sheet, 8, 
cursor_y, COL8 FFFFFF, COL8_000000, s, 30); 
cursor_y = 
cons_newline(cursor_y, sheet); 
cursor_y = 
cons_newline(cursor_y, sheet); 
} else if (cmdline[Q@] != ð) { 
/# 不 是 命令 ， 也 不 是 空 行 */ 
putfonts8 asc_sht(sheet，8， 
cursor_y, COL8 FFFFFF, COL8 @@00e0, "Bad 
command.", 12); 
cursor_y = 
cons _newline(cursor_y, sheet); 
cursor_y = 
cons_newline(cursor_y, sheet); 
/* 到 此 结束 */ } 
/* 显 示 提 示 符 */ 
putfonts8 asc sht(sheet, 8, 
cursor_y, COL8 FFFFFF, COL8_000000, ">", 1); 
cursor x = 16; 
} else { 
/* 一 般 字 符 */ 
if (cursor x < 240) { 
/* 显 示 一 个 字符 之 后 将 光标 后 移 一 位 


t7 
s[@] = i - 256; 
s[1] = 9; 
fe Ay cmdline[cursor_x / 8 - 2] =i - 
256; 


putfonts8_asc_sht(sheet, 
cursor_x, cursor_y, COL8 FFFFFF, COL8 9@00@@, s,1); 
cursor_xX += 8; 


} 


介绍 一 下 重点 。 首 先 我 们 添加 了 memtotal 和 
memman 两 个 变量 ， 它 们 古 执 行 mem 命 令 所 必需 
的 。 关 于 memtotal， 我 们 采用 和 sheet 相 同 的 方法 从 
HariMain 传 递 过 来 ， 因 此 我 们 还 需要 改写 一 下 
HariMain. 
本 次 的 bootpack.c 节 选 
void HariMain(void) 

(FARE) 

/* sht_cons */ 

sht_cons = sheet_alloc(shtct1l); 


CHH) 


task_cons->tss.esp = memman_alloc_4k(memman, 64 * 


1024) + 64 * 1024 - 12;  /* 这 里 ! */ 

CHH) 

*((int *) (task_cons->tss.esp + 4)) (int) 
sht_cons; 

*((int *) (task_cons->tss.esp + 8)) = memtotal; /* 
se 


中略) 


} 


回来 继续 讲解 console_task， 我 们 还 添加 了 一 个 


cmdline Œ, Ei“ eT” (command line) 的 
缩写 。 这 个 变量 用 来 记录 通过 键盘 输入 的 内 容 ， 

在 “ 键 租 数 据 ” 处 理 的 “一 般 字 符 ? 部 分 ， 将 输入 的 内 
容 顺 次 累积 起 来 。 


然后 ， 处 理 回 车 键 输入 的 部 分 我 们 已 经 完全 改写 

了 。 在 这 里 出 现 的 cons_newline 是 一 个 用 来 换行 的 

水 数 ， 当 到 达 最 后 一 行 的 时 候 还 会 日 动 深 动 。 如 果 

把 换行 处 理 直 接 写 在 程序 中 会 导致 代码 非常 难 读 ， 

See nee PRIA, RIŽU Py AS 
ieee 


本 次 的 bootpack.c 节 选 


int cons_newline(int cursor_y, struct SHEET *sheet) 


{ 


int x, y; 
if (cursor_y < 28 + 112) { 

cursor_y += 16; /# 换 行 */ 
} else { 

/* 深 动 */ 

for (y = 28; y < 28 + 112; y++) { 

for (x = 8; x < 8 + 240; x++) { 
Sheet->buf[x + y * sheet->bxsize] = 
sheet->buf[x + (y + 16) * sheet->bxsize]; 


} 
for (y = 28 + 112; y < 28 + 128; y++) { 
for (x = 83 x < 8 + 240; x++) { 
Sheet->buf[x + y * sheet->bxsize] = 
COL8 000000; 


} 
} 
sheet_refresh(sheet, 8, 28, 8 + 240, 28 + 128); 


} 


return cursor_y; 


这 里 应 该 没有 什么 难点 ， 我 们 继续 回 到 


console_task. 


当 按 下 回 车 键 时 ， 换 行 后 程序 会 恋 取 cmdline 的 值 ， 
分 析 所 输入 的 内 容 。 如 果 输 入 的 内 容 为 “mem”， 则 
执行 mem 命 令 ， 显 示 内 存 的 相关 信息 ; 如 不 

为 “mem”， 程 序 无 法 理解 这 个 命令 ， 则 显示 “Bad 
command” 错 误 人 信息。 不 过 ， 在 什么 都 不 输入 的 情 
况 下 按 回 车 键 不 会 显示 错误 信息 ， 也 不 会 执行 什么 
HE. 

我 们 的 系统 能 够 出 现 错 误 信 息 了 ， 看 上 去 是 不 是 超 
有 操作 系统 范 儿 呢 ? 笔者 认为 错误 信息 特别 有 操作 
系统 的 感觉 ， 于 是 就 给 加 上 去 啦 〈 笑 ) 。 


讲解 到 此 结 


我 们 来 运行 一 下 ，“make run”， 然 后 输入 一 些 东 西 
试 试看 。 结 果 如 下 。 


aE OG | 


天 啊 ， 这 实在 是 酪 党 7 了! 操作 系统 的 感觉 大 幅 上 
升 ， 真 是 越 来 越 有 干 幼 了 ! 


6 cls 命 令 (harib15f) 


上 来 先 问 个 问题 ， 大 家 知道 cls 命 令 吗 ? ME? 不 知 
道 ? 那 真是 太 遗 憾 啦 。 好 吧 ， 大 家 可 以 在 Windows 
的 命令 行 窗口 中 执行 cls 命 令 试 试看 。 明 和 白 了 ? 没 
昔 ， 这 个 命令 的 作用 是 清除 屏幕 上 的 内 容 ， 也 束 
是 “clear screen” (iE) 的 缩写 。 顺 便 补 充 个 小 知 
识 ， 在 Linux 中 清 屏 命 令 是 “clear”。 


下 面 我 们 束 要 给 “ 纸 娃娃 系统 ?也 增加 cls 这 个 命令 。 
可 能 有 人 会 说 ， 这 种 无 聊 的 命令 做 了 有 喻 用 ? 别 说 
那么 让 人 伤心 的 话 咏 ， 好 多 这 也 征 笔者 的 个 人 喜好 
My CR) 。 


于 是 ， 只 要 像 mem 命 令 一 样 ， 把 cls 命 令 也 加 进去 就 
好 了 ， 不 过 在 这 里 我 们 要 介绍 一 个 新 的 小 技巧 。 


在 haribl15e 中 ， 为 了 读 取 输入 的 命令 内 容 ， 我 们 是 
这 样 写 的 : 


if (cmdline[6] == 'm' && cmdline[1] == 'e' && 


cmdline[2] == 'm' && cmdline[3] == 6) { 


这 种 写法 相当 差劲 ， 而 且 代 码 也 很 难 读 。 如 果 我 们 


把 cmdline 这 么 长 的 变量 名 简化 成 c 试 试看 呢 ? 


if (c[6] == 'm' && c[1] == 'e' && c[2] == 'm' && c[3] 


这 个 好 像 不 错 ， 人 代码 变 短 了 点 。 
其 实 我 们 还 可 以 写成 这 样 ， 看 下 面 的 代码 。 


if (strcmp(cmdline, "mem") == 6) { 


怎么 样 ， 是 不 是 特别 棒 ? 如 果 还 不 明白 这 样 写 的 好 
处 ， 可 以 想象 一 下 如 果 要 做 一 个 像 “haribote” 这 样 8 
个 字符 的 命令 的 语 权 怎么 NE? 就 知道 有 人 懒得 想 
象 ， 笔 者 帮 你 写 出 来 吧 。 


if (c[6] == 'h' && c[1] == 'a' && c[2] == 'r' && c[3] 
== 'i' && c[4] == 'b' && 


c[5] == 'o' && c[6] == ‘'t' && c[7] == 'e' && 
c[8] == @) { 


这 样 的 代码 ， 不 筑 得 很 糟糕 吗 ? 放样 写 的 证 ， ja 
AN) EGE “Db? AST" DLE, fT S © /\“haribote” 2 
成 了 “harbiote”， 可 能 你 都 完全 发 现 不 了 ， 人 简直 是 难 
谈 到 了 极点 。 不 过 ， 从 要 使 用 stremp， 即便 变量 名 
还 是 cmdline 那 么 长 ， 也 可 以 写成 这 样 : 


if (strcmp(cmdline, "haribote") == @) { 


这 么 短 的 代码 就 搞定 了 ， 你 看 ， 好 处 显而易见 吧 ? 


stremp 这 个 水 数 ， 只 要 声明 #include 即 可 使 用 ， 
此 在 bootpack.c 中 我 们 也 要 用 它 。 


于 是 ， 在 添加 了 cals 命令 之 后 ，bootpack.c 就 变 成 了 
下 面 这 样 。 


本 次 的 bootpack.c 节 选 


void console task(struct SHEET *sheet, unsigned int 
memtotal) 


CHH) 


for (;;) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
CHAK ) 
} else { 
CHAK ) 
if (256 <= i && i <= 511) { /# 键 盘 数 据 OM 
任务 A) */ 
if (i == 8 + 256) { 
/* 退 格 键 */ 
CHH) 
} else if (i == 10 + 256) { 
/* 回 车 键 */ 
CHH) 
PA if (strcmp(cmdline, "mem") == @) { 


/* mem 命 令 */ 
CREK) 
/* 从 此 开始 */ } else if (strcmp(cmdline, "cls") 


/* cls 命 令 */ 
for (y = 28; y < 28 + 128; y++) 


for (x = 8; x < 8 + 240; 
X++) { 
sheet->buf[x + y * 
sheet->bxsize] = COL8 900000; 


} 


sheet_refresh(sheet, 8, 28, 8 + 
240, 28 + 128); 
/* 到 此 结束 */ cursor y = 28; 
} else if (cmdline[6] != ð) { 
/# 不 是 命令 ， 也 不 是 空 行 */ 


CREK) 
} 
(中 上 略 ) 
} else { 
(中 上 略 ) 
} 


顺利 写 完 了 ， 我 们 来 “make run”， 然 后 执行 cls 命 令 
WAA. IE, RRR I! 


[harib15f 


可 能 有 人 没 看 明白 ， 这 是 执行 了 als 命 令 之 后 的 样 
Fis 

照 这 样 下 去 ， 我 们 已 经 可 以 随意 增加 更 多 的 命令 了 
呢 。 你 要 是 特别 中 意 哪个 命令 ， 一 定 要 添加 进去 玩 


玩 看 哦 。 如 果 成 功 的话 ， 干 劲 会 更 足 呢 。 


7 dir 命 令 (haribl5g) 


好 了 ， 现 在 我 们 已 经 可 以 目 己 来 尽情 谎 加 命令 了 ， 
不 过 作为 一 个 操作 系统 ， 我 们 的 目标 还 是 制作 可 执 
行文 件 《〈《 比 如 .exe) 来 让 它 运 行 。 笔 者 很 想 马 上 进 
入 这 个 话题 ， 不 过 在 此 之 前 ， 我 们 先 来 制作 一 个 显 
示人 磁盘 内 文件 名 称 的 命令 吧 。 通 过 这 个 命令 的 制 
作 ， 我 们 可 以 学 习 对 磁盘 中 文件 信息 的 操作 方法 ， 
为 明天 制作 可 执行 文件 打 好 基础 。 


那么 dir 命 令 到 底 是 和 干什么 用 的 呢 ? 大 家 在 Windows 
的 命令 行 窗 口中 输入 “dir" 执 行 一 下 天 明白 了 ， 除 了 
会 显示 文件 名 ， 还 会 显示 文件 的 日 期 和 大 小 。 在 
Linux 中 与 dir 对 应 的 命令 是 ls。 接 下 来 我 们 整 来 实现 
这 个 命令 的 功能 。 


怎样 才能 让 系统 执行 dir 命 令 呢 ? 要 显示 文件 名 等 信 
县 ， 我 们 需要 读 取 磁盘 的 内 容 ， 这 得 借助 BIOS 的 帮 
助 。 当 然 ， 不 通过 BIOS 来 恋 写 磁盘 的 方法 也 是 有 
的 ， 但 是 较 难 实现 ， 所 以 这 里 残 不 介绍 了 。 


不 过 ， 现 在 “ 纸 娃娃 系统 ” 正 处 于 32 位 模式 ， 想 使 用 
BIOS 也 不 行 。BIOS 不 能 用 ， 不 用 BIOS 读 取 破 盘 的 


方法 驻 不 讲 ， 这 样 的 话 你 要 让 我 怎么 来 读 倍 盘 啊 ! 
其 实 大 家 不 用 担心 。 没 错 ， 其 实在 进入 32 位 模式 之 
前 ， 我 们 不 是 已 经 从 磁盘 读 了 很 多 内 容 了 吗 ? 有 10 
个 柱 面 那么 多 呢 ! 实在 想 不 起 来 的 话 ， 请 再 翻 到 3.4 
TAAIE, 


Webi, BAREH 3.47, IE, RK 
好 怀念 呢 。 仅 仅 过 了 15 天 ， 差 异 竟 然 如 此 之 大 ! 
不 ， 应 该 说 是 进步 如 此 之 快 吧 一 《做 感慨 状 ) 。 


那么 已 经 读 出 来 的 这 些 数据 ， 存 放 在 内 存 中 的 什么 
地 方 呢 ? 在 8.5 节 中 写 得 很 清楚 ， 是 0x00100000 一 
0x00267fff。 其 中 存放 文件 名 的 地 方 义 在 哪里 呢 ? 
其 实 我 们 也 已 经 说 过 了 ， 不 过 大 家 可 能 都 不 记得 了 
吧 ， 参 考 3.5 节 从 0 柱 面 、0 磁 头 、1 扇 区 开始 的 
0x002600 之 后 ， 也 束 是 内 存 地 址 的 0x00102600 开 始 
写 入 。 


这 些 数据 的 具体 内 容 ， 在 这 里 需要 详细 讲解 一 下 。 
作为 试验 ， 我 们 在 磁盘 映像 中 加 入 了 haribote.sys、 
ipl10.nas 和 make.bat 这 3 个 文件 (加 入 其 他 文件 也 可 
以 ， 这 里 暂 以 这 3 个 文件 为 例 ) 我 们 对 Makefile 稍 作 
修改 。 


本 次 的 Makefile 节 选 


haribote.img : ip110.bin haribote.sys Makefile 
$(EDIMG) imgin:../z_tools/fdimg@at.tek \ 
wbinimg src:ip11@.bin len:512 from:0 to:@ \ 


copy from:haribote.sys to:@: \ 
copy from:ipl1@.nas to:@: \ 
copy from:make.bat to:@: \ 
imgout:haribote. img 


然后 我 们 make 一 下 ， 碍 看 人 厂 盘 映像 中 0x002600 字 贡 
以 后 的 部 分 ， 内 容 如 下 。 
破 盘 映像 的 内 容 


+0 +1 +2 +3 
0123456789ABCDEF 


002600 48 41 52 
HARIBOTESYS .... 
002610 60 00 00 


002620 49 50 4C 


IPL16 NAS .... 
002630 060 00 00 


002640 4D 41 4B 
MAKE BAT .... 
002650 60 00 00 


看 起 来 这 里 的 内 容 是 以 32 个 字 节 为 单位 循环 的 ， 这 
32 个 字 节 的 结构 如 下 。 


struct FILEINFO { 
unsigned char name[8], ext[3], type; 
char reserve[1@]; 
unsigned short time, date, clustno; 


unsigned int size; 


开始 的 8 个 字 节 是 文件 名 。 文 件 名 不 足 8 个 字 节 时 ， 

后 面 用 空格 补足 。 文 件 名 超过 8 个 字 节 的 情况 比较 
复杂 ， 我 们 在 这 里 先 只 考 夸 不 超过 8 个 字 节 的 情况 
吧 ， 一 上 来 丈 挑 成 高 难度 的 话 ， 很 容易 产生 挫败 感 

ee 
写 的 。 


如 果 文 件 名 的 第 一 个 字 节 为 0xe5， 代 表 这 个 文件 已 
经 被 删除 了 ; 文件 名 第 一 个 字 节 为 0x00， 人 代表 这 一 
段 不 包含 任何 文件 名 信息 。 从 磁盘 映像 的 0x004200 
承 开始 存放 文件 haribote.sys 了 ， 因 此 文件 信息 最 多 
可 以 存放 224 个 。 


接 下 来 3 个 字 节 是 扩展 名 ， 和 文件 名 一 样 ， 不 足 3 个 
字 节 时 用 空格 补足 ， 如 果 文 件 没 有 扩展 名 ， 则 这 3 
个 字 节 都 用 空格 补足 。 扩 展 名 和 文件 名 一 样 ， 也 全 
部 使 用 了 大 写字 母 。 


后 面 1 个 字 节 存放 文件 的 属性 信息 。 我 们 这 3 个 文件 
的 属性 都 是 0x20。 一 般 的 文件 不 是 0x20 束 是 0x00， 
至 于 其 他 的 值 ， 我 们 来 看 下 面 的 说 明 。 


8@x81...….. 只 读 文 件 (不 可 写 入 ) 
0x62..…. 隐 藏 文件 

6x64...….. 系 统 文 件 

6x68..….. 非 文件 信息 《比如 磁盘 名 称 等 ) 


当 一 个 文件 既是 只 该 文件 又 是 隐藏 文件 时 ， 将 上 面 
的 对 应 值 加 算 即 可 ， 即 0x03。 


到 此 为 止 的 总 计 12 个 字 节 ， 基 本 上 存放 的 都 是 字符 
编码 信息 ， 不 会 出 现 负 数 ， 因 此 在 数据 结构 声明 中 


使 用 unsigned 类 型 。 


接 下 来 的 10 个 字 节 为 保留 ， 也 就 是 说 ， 是 为 了 将 来 
可 能 会 保存 更 多 的 文件 信息 而 预 留 的 ， 在 我 们 的 破 
时 映像 中 都 是 0x00。 话 说 ， 这 个 磁盘 格式 是 由 
Windows 的 开发 商 微软 公司 定义 的 ， 因 此 ， 这 段 保 
留 区 域 以 后 要 如 何 使 用 ， 也 是 由 微软 公司 来 决定 
的 。 其 他 人 要 目 行 定义 的 话 也 可 以 ， 只 不 过 将 来 可 


能 会 和 Windows 产 生 不 兼容 的 问题 。 


下 面 2 个 字 节 为 WORD 整 数 ， 存 放 文 件 的 时 间 。 
此 即便 文件 的 内 容 痢 一 样 ， 这 里 大 家 看 到 的 数值 也 
可 能 是 因 人 而 寞 的 。 册 下 面 2 个 字 市 存放 文件 的 日 
期 。 这 些 数 人 虽然 怎 么 看 都 不 像 是 时 间 和 日 期 ， 但 
只 要 用 微软 公司 的 公式 计算 一 下 ， 束 可 以 转换 为 


时 、 分 、 秒 等 信息 了 。 


接 下 来 的 2 个 字 节 也 是 WORD 整 数 ， 代 表 这 个 文件 
的 内 容 从 磁盘 上 的 哪个 而 区 开始 存放 。 变 量 名 
clustno AS KESE” (cluster number) Hia 

By “TR IX SEHK SA A el, FE BRIG 
A A SERRA Al “bg XE SS T o 


最 后 的 4 个 字 节 为 DWORD 整 数 ， 存 放 文 件 的 大 小 。 


有 J 了 上面 这 些 信 息 ， 感 觉 dir 命 令 应 该 可 以 实现 了 ， 
我 们 来 做 做 看 吧 。 
本 次 的 bootpack.h 节 选 


/* asmhead.nas */ 
struct BOOTINFO { /* OxOffO-Oxefff */ 
FHK) 


}; 


#define ADR_BOOTINFO  exeeeeeffe 
#define ADR_DISKIMG 0x00100000 /* 这 里 ! */ 


本 次 的 bootpack.c 节 选 


struct FILEINFO { 
unsigned char name[8], ext[3], type; 


char reserve[1@]; 
unsigned short time, date, clustno; 


unsigned int size; 
}; 
void console task(struct SHEET *sheet, unsigned int 
memtotal) 


(中 略 ) 
struct FILEINFO *finfo = (struct FILEINFO *) 


(ADR_DISKIMG + @x@@2600); /* 这 里 ! */ 


(中 上 略 ) 
for (;;) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /#* 键 盘 数 据 (通过 
任务 A) */ 
if (i == 8 + 256) { 
/* 退 格 键 */ 
CHEK) 
} else if (i == 10 + 256) { 
/* 回 车 键 */ 


CHH) 


/* GUAT tS */ 

if coer emp emal ings "mem") == @) { 
/* mem 命 令 */ 
CHH ) 


} else if (strcmp(cmdline, "cls") 


== @) { 
/* cls 命 令 */ 
CHH ) 
/* 从 此 开始 */ } else if (strcmp(cmdline, "dir") == 
ə) { 
/* dir 命 令 */ 
for (x = ð; x < 224; X++) { 
if (finfo[x].name[@] == 
@xee) { 
break; 
} 
if (finfo[x].name[@] 
Q@xe5) { 


if ((finfo[x].type & 
0x18) == 0) { 
sprintf(s, 
"filename.ext %7d", finfo[x].size); 
for (y = 03 y < 8; 


y++) { 
s[y] = 

finfo[x].name[y]; 

} 

s[ 9] = 
finfo[x].ext[@]; 

s[10] = 
finfo[x].ext[1]; 

s[11] = 


finfo[x].ext[2]; 


putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, 
COL8_ 000000, s, 


30); 


cursor_y = 
cons_newline(cursor_y, sheet); 
} 
} 
} 
/* 到 此 结束 */ cursor y = 


cons_newline(cursor y, sheet); 


} else if (cmdline[6] != ð) { 
/* 不 是 命令 ， 也 不 是 空 行 */ 


CHAI 


} 
CHEK) 
} else { 
/* 一 般 字 符 */ 
(中 上 略 ) 


先 大 概 写成 这 个 样子 ， 可 以 显示 文件 名 、 扩 展 名 和 
文件 大 小 。 到 的 能 不 能 成 功 呢 ?我 们 来 “make 
run”， 然 后 “dir”。 


hariblsg 


IE, CHORE ! 


IE, EIER IR! 话说 回来 ， 不 显示 出 来 的 话 才 
让 人 抓 狂 ， 运 行 成 功 了 真 的 很 开心 呢 。 


对 了 ， 如 果 你 不 喜欢 Windows 风 格 的 dir 命 令 ， 觉 得 
Linux 风 格 的 ls 命令 更 好 的 话 ， 没 问题 ， 当 然 可 以 把 
这 个 命令 给 改 成 ls 哦 。 至 于 应 该 修改 哪里 嘛 ， 对 于 
已 经 读 到 这 里 的 人 ， 应 该 不 用 再 解释 了 吧 ? 


ES, SAMBA, WA IL 


第 19 天 MHE 


。type 命 令 (harib16a) 
。type 命 令 改 恨 (harib16b) 

e 对 FAT 的 文 持 (harib16c) 

。 代 码 整理 Charib16d) 

。 第 一 个 应 用 程序 Charib16e ) 


1 type 命令 (harib16a ) 


大 家 好 。 笔 者 觉得 “ 纸 娃 娃 系 统 ” 最 近 越 来 越 有 操作 
系统 的 样子 了 ， 不 知道 大 家 是 不 是 也 有 同感 呢 ? S 
天 我 们 的 系统 即将 可 以 运行 应 用 程序 了 哦 ， 很 激动 
人 心 吧 ! 


昨天 经 过 我 们 的 努力 ， 终 于 可 以 显示 磁盘 中 的 文件 
名 和 文件 大 小 信息 了 ， 不 过 ， 这 离 运 行 应 用 程序 还 
到 得 远 。 因 此 ， 接 下 来 我 们 要 讲解 一 下 如 何 读 取 文 
件 本 号 的 内 容 。 


在 Windows 的 命令 行 中 ， 有 一 个 叫做 type 的 命令 ， 
输入 “type 文件 名 ”就 会 显示 出 文件 的 内 容 。 在 Linux 
中 有 一 个 cat 命 令 ， 功 能 基本 上 是 一 样 的 。 

可 能 有 人 还 不 知道 type 命 令 ， 我 们 来 演示 一 下 。 


也 束 是 说 ， 我 们 要 在 “ 纸 娃娃 系统 ”上 也 实现 这 样 的 
功能 。 


那么 到 底 应 该 如 何 读 取 文 件 呢 ? BANE EWS 
盘 映 像 入 手 寻找 线索 吧 。 


FG 我 们 再 回头 看 看 昨天 讲 过 的 文件 信息 的 部 
分 。 这 是 harib15g 的 倒 盘 映像 ， 和 上 昨天 看 到 的 只 有 
少许 不 同 ， 没关系 ， 我 们 就 当 是 复习 了 。 


EX)C¥WINNT¥syste m32¥omdexe 3 
$(MAKE) haribote. img 


运行 type Makefile 的 结 
磁盘 映像 的 内 容 


+0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F 
0123456789ABCDEF 


002600 48 41 52 49 42 4F 54 45 53 59 53 20 66 66 00 00 
HARIBOTESYS .... 
002610 060 86 00 66 66 BO 18 74 FF 32 62 66 70 6C 00 BO 
i t.2..pl.. 
002620 49 50 4C 31 30 20 20 20 4E 41 53 20 00 00 00 00 
IPL10 NAS .... 
002630 00 00 00 00 00 BO 59 7A 42 35 39 66 95 OB 66 66 


002640 4D 41 4B 45 20 20 20 20 42 41 54 20 00 88 00 00 
MAKE BAT .... 
002650 00 08 00 66 66 66 F6 10 81 30 3F 66 2E 66 00 00 
oe OD ss 
002660 66 88 86 OO OO 0O 0O OO BO OO 0O BO 0O BO 00 LO 


这 里 面 有 一 个 32 个 字 市 的 数据 结构 : 


struct FILEINFO { 
unsigned char name[8], ext[3], type; 
char reserve[1@]; 
unsigned short time, date, clustno; 
unsigned int size; 


其 中 clustno 这 个 成 员 ， 人 代表 文 件 从 磁盘 上 的 哪个 局 
区 开始 存放 ， 我 们 只 把 这 个 部 分 写 出 来 看 看 。 


原来 如 此 ..….….….. 说 喻 昵 ， 其 实 完全 没 看 懂 吧 〈 吾 
R) 。 好 吧 ， 接 下 来 我 们 就 来 找 一 找 文 件 的 内 容 到 


底 存放 在 磁盘 上 的 哪个 扇 区 。 首 先 来 看 第 一 个 文件 
HARIBOTE.SYS 的 位 置 ， 这 个 很 简单 ， 在 
0x004200。 喷 ， 你 怎么 知道 的 ?其实 看 一 下 3.4 节 就 
明白 了 ， 这 可 不 是 超 能 力 哟 。 


也 就 是 说 ， 貌 似 clustno = 0x0002 就 代表 0x004200 的 


mi, EMS, BUN HORA SY CTF 


IPL10.NAS 在 哪里 呢 ? 我 们 在 磁极 映像 中 找 找 看 。 
HARIBOTE.SYS 的 大 小 差不多 27KB， 估 摸 着 也 惑 
是 在 它 27KB 之 后 的 位 置 附近 吧 。 你 看 ， 找 到 了 ! 
在 0x00b000 这 个 位 置 。 


LI nlx! 


File Edit View Jump Tools Help 
See pe eenen] pales 


+ 
00 00 00 00 00 0 
00 00 00 00 00 0 


到 
: Ox38 (59) Ro á 


0x00b000 附 近 的 样子 
MAKE.BAT 我 们 也 找到 了 ， 在 0x00bc00 这 个 位 置 。 


EC -iox 


File Edit View Jump Tools Help 


00 00 00 00 00 0 


Q 

O 

fom) 

fom} 
oo 
OO 
OO 
OO 
oO 


0 
0 
F 
5 
6 
0 


0 

0 
oF 7 
25 3 
36 2 
00 0 
0 
0 


00 00 
00 00 00 00 00 
00 00 00 00 00 0 
00 00 00 00 00 0 


OQQON 
PEPE WINS OG 


-00 00 00 0 
fooscoo: ox2E (46) I,474560bytes ASCH. R.O. 7 


0x00bc00 附 近 的 样子 
于 是 ， 我 们 把 上 面 搜集 到 的 线索 总 结 一 下 


clustno = 0x0002 — 0x004200 
clustno = 0x0039 — 0x00b000 
clustno = 0x003f — Ox00bc00 


唔 ， 这 个 里 面 有 什么 规律 呢 ? 首先 ， 我 们 从 0x0039 
和 0x003f 开 始 看 ， 把 它们 相 减 ，0x3f - 0x39 =6， 也 
就 是 说 ，culstno 每 增加 6， 磁 盘 映 像 中 的 位 置 就 增 

加 0xc00 个 字 节 ， 将 0xc00 除 以 6 得 到 0x200， 即 512 

个 字 节 。 


如 果 能 马上 想到 512 个 字 节 代表 什么 ， 那 你 真是 
RA! 没 错 ，1 个 局 区 的 容量 正好 是 512 个 字 节 。 
就 是 说 ，clustno 的 值 相 拳 1， 在 侯 稻 映像 中 文件 的 
位 置 就 相差 1 个 肩 区 ， BUS 12h 。 如 果 以 clustno 
= 0x0002 为 起 点 出 发 倒 推 的 话 ， 笔 者 认为 clustno = 
0x0000 应 该 就 相当 于 0x003e00 这 个 位 置 。 


如 果 当真 如 此 ， 那 我 们 就 可 以 总 结 出 下 面 这 个 公 


式 。 


那么 这 个 公式 是 否 正确 呢 ? 我 们 来 试 算 一 下 。 


0x0002 * 512 + Ox003e00 = Ox000400 + 


@x@@3e00 = 0x004200 (正确 ) 


0x0039 * 512 + 6Xx6603e66 = Ox007200 + 
9Xx663e66 = OxeQ@beee (正确 ) 


9Xx663f * 512 + 6Xx6603e66 = 6Xx667e66 + 
9Xx663e66 = 69Xx66bc66 (正确 ) 


IE, MI! 看 来 这 个 公式 可 行 。 
CLLD 


有 了 上 面 的 知识 ， 接 下 来 只 要 将 文件 的 内 容 逐 字 节 
BEAL HOR IF AN TE BR ERAT S. RF, RIRS 
代码 了 哦 。 


本 次 的 bootpack.c 节 选 


void console task(struct SHEET *sheet, unsigned int 
memtotal) 


CHH) 
char s[30], cmdline[30], *p; /* 这 里 ! */ 
《中略 ) 


for (33) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
CREK) 
} else { 


《中 上 略 》 
if (256 <= i && i <= 511) { /* 键 盘 数 据 (通过 
IEZA) */ 
if (i == 8 + 256) { 


(中 上 略 ) 
} else if (i == 10 + 256) { 
/* Enter */ 
CHS ) 
if (strcmp(cmdline, "mem") == @) { 
CREK) 
} else if (strcmp(cmdline, "cls") 
== 0) { 
CREK) 
} else if (strcmp(cmdline, "dir") 
== @) { 
CREK) 

/从 此 开始 */ } else if (cmdline[6] == 't' && 
cmdline[1] == 'y' && age == 'p' && cmdline[3] == 
'e' && cmdline[4] = ') { 

/* type 命 令 */ 
/* 准 备 文件 名 */ 
for (y = @; y < 11; y++) { 
Siyi a 25 
} 
y = 
for ie = 5; y < 11 && 
cmdline[x] != @; x++) { 
if (cmdline[x] == '.' && y 
<= 8) { 
y = 8; 
} else { 
S[y] = cmdline[x]; 
if ('a' <= s[y] & s[y] 
<= 'z') { 


/* 将 小 写字 母 转 换 成 大 


写字 母 */ 
s[y] -= 0x20; 


y++; 


} 


} 
LAFTRIP" 
for (x = ð; x < 224; ) { 
if (finfo[x].name[8] == 


0x00) { 
break; 
} 
if ((finfo[x].type & 0x18) 
== 0) { 
for (y = ð; y < 11; 
y++) { 
if 
(finfo[x].name[y] != s[y]) { 
goto 
type_next_file; 
} 
} 
break; /* 找 到 文件 */ 
} 
type_next_file: 
X++; 
} 
if (x < 224 && finfo[x].name[Q] 
l= 0x00) { 
/* 找 到 文件 的 情况 */ 
y = finfo[x].size; 
p = (char *) 


(finfo[x].clustno * 512 + 0x003e00 + ADR_DISKIMG ) ; 
cursor_X = 8; 
for (x = ð; x < y; x++) { 
/* 逐 字 输 出 */ 


s[Q] 
s[1] 


p[x]; 
ð; 


putfonts8_asc_sht(sheet, cursor_x, cursor- y, 
COL8_FFFFFF, 
COL8_000000, s, 1); 
cursor_x += 8; 


if (cursor_x == 8 + 
240) { /* 到 达 最 右 病 后 换行 */ 
cursor x = 8; 
cursor_y = 
cons_newline(cursor_y, sheet); 
} 
} 
} else { 


/* 没 有 找到 文件 的 情况 */ 

putfonts8 asc sht(sheet, 8, 
cursor_y, COL8 FFFFFF, COL8 666660, "File not found.", 
15); 


cursor_y = 
cons _newline(cursor_y, sheet); 
} 
/* 到 此 结束 */ cursor_y = 


cons_newline(cursor_y, sheet); 
} else if (cmdline[@] != ð) { 


CREK) 
} 
(中 上 略 ) 
} else { 
(中 上 略 ) 
} 
} 
CREK) 


CLLD 
这 次 的 代码 比较 长 ， 我 们 还 是 来 稍微 讲解 一 下 。 


首先 看 type 命 令 那 一 段 开 头 的 地 方 ， 我 们 这 次 没有 
使 用 strcmp (cmdline,“type”) ， 而 是 用 了 之 前 那 种 
很 难 读 的 写法 。 其 实 笔者 也 想 用 stremp 来 着 ， 不 过 
在 这 里 用 strcmp 的 话 ， 当 输入 “type make.bat* 时 ， 就 
会 输出 “Bad command.” 了 ， 这 可 不 行 啊 。 这 是 由 于 
strcmp 会 比较 字符 串 的 长 度 ， 因 此 仅 开 头 5 个 字符 一 
致 是 不 会 被 判定 相等 的 。 


接 下 来 的 程序 中 (“准备 文件 名 ”的 地 方 )， 首 先 将 
s[0 一 10] 这 11 个 字 节 用 空格 的 字符 编码 填充 ， 然 后 
恋 取 cmdline[5 一 ] 并 复制 到 s[0 一 ]， 在 复制 的 同时 ， 

将 其 中 的 小 写字 和 母 转换 为 大 写字 母 。 随 后 ， 当 过 到 
句点 时 ， 则 可 以 断定 接 下 来 的 部 分 为 扩展 名 ， 于 是 
将 复制 的 目标 改 为 s[8 一 ]。 经 过 这 样 的 转换 ， 我 们 
束 得 到 了 和 磁盘 内 格式 相同 的 文件 名 。 


“寻找 文件 > 这 一 段 中 ， 我 们 在 磁盘 中 寻找 与 所 输入 
的 文件 名 相符 的 文件 。 如 果 成 功 找到 指定 文件 ， 则 
用 break 中 出 for 循 环 ; 如 果 找 不 到 ， 则 会 在 x 到 达 
224 或 者 finfo[X].name[0] 为 0x00 时 结束 循环 。 


因 些 ， 当 for 循 环 结束 后 ， 我 们 就 可 以 判断 出 到 底 是 
找到 文件 跳出 for 循 环 的 ， 还 是 没有 找到 文件 而 结束 
for 循 环 的 ， 从 而 决定 是 显示 指定 的 文件 内 容 ， 还 是 
显示 “File not found.” 的 错误 信息 。 


我 们 来 “make run”， 然 后 “type make.bat”。 


haribl6a 


type make.bat 


IE, ISAT MI, HWE. MANOR AY A Ae Ne E 
呢 ? ERAT Ay AH AN Sa $8 a tT makebat RK Hi A — 
Bs RAE REEE. 


如 果 我 们 输入 “type haribote.sys” 会 怎么 样 呢 ? 程序 
会 将 机 器 语言 的 文件 强行 用 文本 方式 显示 出 来 ， 于 
是 就 变 成 下 面 这 样 的 乱码 。 


SE | DAN 


Amr IDH 


type haribote.sys 的 话 ..….. 


玩 得 一 时 兴起 ， 我 们 再 来 试 试看 “type ipl10.nas”, 
笔者 认为 一 定 会 显示 出 ipl10 的 程序 源 代码 ， 但 结 
却 显示 出 下 面 这 样 乱七八糟 的 字符 。 


type ip110.nas 


为 ...... 为 喻 会 这 样 ? 不 过 我 们 仔细 看 看 的 话 ， 其 中 
还 是 有 “]oad error”、RESB、DB 之 类 正确 显示 的 部 
4Y WK o 


哦 ， 对 了 ! BRAT AS oh PH AT A ill 2S FF TIT Fa AS 


了 ， 怪 不 得 会 变 成 这 个 样子 呢 。 好 ， 接 下 来 我 们 就 


2 type 命令 改 民 (harib16b) 


下 面 我 们 惑 来 实现 对 换行 的 文 持 吧 。 这 次 需要 文 持 
的 特殊 字符 编码 如 下 。 


9Xx09...... 制 表 符 : 显示 空格 直到 x 被 4 整除 为 止 
9x6a...... 换行 符 : 换行 
@x@d...... 回 车 符 : 忽略 


针对 上 面 几 个 特殊 字符 ， 我 们 来 详细 讲解 一 下 。 


制 表 符 原 本 是 用 来 对 齐 字 符 显 示 位 置 的 ， 因 此 “ 通 
到 制 表 符 就 显示 4 个 空格 ”这 种 做 法 是 不 对 的 ， 制 表 
符 的 功能 应 该 是 在 当前 位 置 到 下 一 个 制 表 位 之 间 填 
充 空格 。 这 里 我 们 将 制 表 位 设 定 在 第 90、4、8、 
12...... 个 字符 这 样 4 的 倍数 的 位 置 ( 这 是 笔者 的 偏 
好 ) ， 而 在 Windows 等 环境 中 ， 制 表 位 则 是 8 的 倍 
数 。 


再 介绍 个 小 知识 ， 我 们 这 里 所 说 的 制 表 符 也 称 为 水 
平 制 表 符 Chorizonal tab) ， 因 为 对 齐 字 符 位 置 是 在 
水 平方 向 上 移动 。 相 对 的 ， 还 有 一 种 垂直 制 表 符 

(vertical tab) ， 不 过 因为 这 次 我 们 过 不 到 (其 实 


在 一 般 的 文本 文件 中 也 不 会 出 现 ) ， 所 以 大 家 可 以 
Fe APSE T 3 


换行 符 其 实 也 有 一 段 有 趣 的 身世 。 在 Windows 中 换 
行 的 字符 编码 为 “0x0d 0x0a” 两 个 字 节 ， 而 Linux 中 
只 有 “0x0a” 一 个 字 节 。 也 就 是 说 ， 同 样 一 篇 艾 章 ， 

在 Windows 中 保存 下 来 文件 尺寸 会 比 Linux 中 要 大 。 
那么 为 什么 Windows 要 用 两 个 字 节 的 换行 符 呢 ? 我 
们 来 退 本 渊源 一 下 吧 。 


字符 编码 0x0a 原 本 代表 折 行 Cline feed) WES, 
妈 只 是 移动 到 下 一 行 。 因 此 ， 如 采 只 用 0x0a 作 为 换 
行人 符 的 ， 以 前 有 些 打印 机 就 会 印 成 这 个 样子 : 


three 
four 


而 男 一 方面 ，0x0d， 也 就 是 回 车 符 的 文字 编码 ， 代 
表 “ 让 打印 头 《 或 者 打字 机 的 辊 简 ) 回 到 行 首 ” 的 意 
思 ， 因 此 才 被 称 为 “ 回 车 ”(carriage return) 。 回 车 
符 其 实 不 会 换行 ， 而 只 是 让 文字 显示 的 位 置 回 到 最 
Fc Sit o 

因 些 ， 如 果 使 用 “0x0d 0x0a” 两 个 字 节 作为 换行 符 的 


话 ， 即 便 是 最 古老 的 打印 机 ， 也 会 正确 打印 成 下 面 
这 样 。 


one 
two 
three 
four 


TE AA WH, Windowst MIRITA ats a 
定 为 “0x0d 0x0a” 吧 。 


另外 ， 如 果 反 过 来 利用 0x0d 的 这 一 性 质 ， 在 以 前 的 
打印 机 上 可 以 实现 文字 的 针 加 打印 ， 不 过 现在 的 打 
印 机 上 会 如 何 ， 那 束 不 得 而 知 了 。 


那么 我 们 的 “ 纸 娃 娃 系统 ”该 怎么 办 呢 ? 我 们 束 先 将 

0x0a 作 为 换行 加 回 车 ， 将 0x0d 忽 略 挥 吧 。 因 为 这 样 

一 来 ， 无 论 是 在 Windows 中 还 是 Linux 中 所 保存 的 文 
件 ， 都 可 以 正确 显示 出 来 。 


所 以 我 们 仅 将 type 命 令 的 字符 显示 部 分 进行 一 些 改 
写 。 


本 次 的 bootpack.c 节 选 


void console task(struct SHEET *sheet, unsigned int 
memtotal) 


中略) 


for (33) { 


io_cli(); 
if (fifo32_status(&task->fifo) == @) { 


CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /* 键 盘 数据 (通过 
任务 A) */ 
if (i == 8 + 256) { 
(中 上 略 ) 
} else if (i == 10 + 256) { 
/* 回 车 键 */ 
CHEK) 
/* 执 行 命令 */ 
if et E "mem") == @) { 
CREK) 
} else if (strcmp(cmdline, "cls") 
== 0) { 
CREK) 
} else if (strcmp(cmdline, "dir") 
== 0) { 
CREK) 
/* 这 里 ! */ } else if (strncmp(cmdline, "type ", 
5) == 86) { 
/* type 命 令 */ 
CREK) 
if (x < 224 && finfo[x].name[Q] 
l= 0x00) { 
/* 找 到 文件 的 情况 */ 
CREK) 
for (x = 03 x < y; x++) { 
/# 逐 字 输 出 */ 
s[@] = p[x]; 
s[1] = ð; 
/* 从 此 开始 */ if (s[6] == 0x09) { /* 制 


表 符 */ 


for (33) 1 


putfonts8_asc_sht(sheet, cursor_x, cursor- y, 
COL8_FFFFFF, COL8_000000, " ", 1); 
cursor_x += 8; 
if (cursor_x == 
8 + 240) { 


cursor_x 
8; 
cursor_y = 


cons_newline(cursor_y, sheet); 


if (((cursor_x 

- 8) & @x1f) == @) { 
break; /* 

被 32 整 除 则 break */ 

} 

} 
} else if (s[8] == 

6x6a) { /* 换 行 */ 


cursor x 
cursor_y 


8; 


cons_newline(cursor_y, sheet); 
} else if (s[6] == 
exed) { /* 回 车 */ 


操作 */ 


/* 这 里 暂且 不 进行 任何 
} else { /+* 一 般 字 符 */ 


putfonts8 asc_ sht(sheet, cursor x, cursor_y, 
COL8_FFFFFF, 
COL8 000000, s, 
1); 
cursor_X += 8; 
if (cursor_x == 8 + 
240) { 


cursor_x = 8; 
cursor_y = 
cons_newline(cursor_y, sheet); 
} 
/* 到 此 结束 */ } 

} else { 
/* 没 有 找到 文件 的 情况 */ 
(中 上 略 ) 

} 

cursor_y = 


cons_newline(cursor_y, sheet); 
} else if (cmdline[@] != ð) { 
) 


《中略 
} 
(中 上 略 ) 
} else { 
(中 上 略 ) 
} 


我 们 来 讲解 一 下 吧 。 首 先是 这 里 : 


y else if (strncmp(cmdline, "type ", 5) == 0) { 


这 个 部 分 我 们 前 面 因为 不 能 用 stremp， 而 只 好 写成 
了 很 难看 的 f 语 句 ， 这 次 我 们 使 用 strmmcmp 这 个 函 

数 ， 又 把 代码 给 改 整洁 了 。 最 后 的 5 这 个 参数 ， 代 
表 “ 只 比较 前 面 5 个 字符 ， 后 面 的 部 分 即便 不 一 致 ， 


也 要 判定 为 一 致 "的 意思 。 这 样 一 来 ， 这 里 的 代码 
MSS J! 


接 下 来 是 制 表 符 的 处 理 ， 这 个 貌似 有 点 难 懂 。 


if (((cursor_x - 8) & @x1f) == @) { 
break; /* 被 32 整 除 则 break */ 


首先 ， 为 什么 要 将 cursor x 减 8 呢 ?因为 命令 行 窗 口 
的 边框 有 8 个 像素 ， 所 以 要 把 那 部 分 给 去 掉 。 然 
后 ，1 个 字符 的 宽度 是 8 个 像素 ， 每 个 制 表 位 相隔 4 
个 字符 ， 也 就 是 说 ，cursor XxX 一 8 应 该 为 0、32、 
64、96、128、160、192、224 其 中 之 一 ， 即 被 32 除 
后 余数 为 0 即 可 。 


这 里 我 们 回想 一 下 笔者 在 10.1 节 中 所 讲 过 的 内 容 。 
32 这 个 数字 对 于 2 进 制 来 说 是 一 个 “很 整 的 数 ”， 
此 用 & 束 可 以 计算 余数 了 一 一 说 起 来 我 们 还 真 古 很 
走运 嘛 。 
换行 处 理 的 部 分 没有 什么 难度 ， 那 我 们 的 讲解 就 到 
这 里 吧 。 

Litt YT 


tf, “make run” 了 哦 ， 心 情 好 紧张 啊 。 按 Tab 键 切 
换 到 命令 行 窗口 ， 输 入 “type ipl10.nas” . 


这 次 显示 出 来 了 哦 ! 


里 然 里 面 的 日 文部 分 还 是 乱码 ， 不 过 剩 下 的 字符 者 
CAREER So Auth, MOAT! 


仔细 看 看 程序 ， 我 们 发 现 bootpack.c 越 来 越 长 ， 
console_task 也 很 长 了 ， 不 过 整理 起 来 太 麻 烦 ， 所 以 
我 们 就 暂时 让 它 再 乱 一 会 阵子 吧 ， 实 在 不 好 意思 。 


话说 ， 观 察 像 jpl10.nas 这 种 比较 长 的 文件 ， 会 发 现 
全 部 显示 出 来 需要 花 上 一 段 时 间 (尤其 在 模拟 右 环 
境 中 感觉 很 明显 ) ， 这 时 我 们 可 以 按 Tab 键 切换 到 
task_a 的 窗口 中 输入 字符 斌 试看。 也 就 是 说 ， 在 命 
令 执 行 的 过 程 中 ， 系 统 还 是 可 以 进行 其 他 的 工作 。 
看 上 去 这 应 该 是 理所当然 的 ， 因 为 我 们 已 经 实现 了 
多 任务 嘛 。 不 过 一 个 自制 的 操作 系统 能 达到 这 样 的 
程度 ， 大 家 不 觉得 很 开心 吗 ? 笔者 心里 已 经 乐 开花 
Sle). 


3 对 FATI 的 文 持 Charib16c) 


笔者 在 这 里 得 先 跟 大 家 道 个 歉 ， 其 实 这 个 type 命 令 
征 有 问题 的 ， 有 时 候 会 无 法 正确 显示 文件 内 容 。 现 
在 的 type 命 令 ， 肯 定 可 以 正确 显示 文件 开头 的 512 个 
字 市 的 内 容 ， 但 是 如 果 遇 到 大 于 512 个 字 节 的 文 
件 ， 中 间 可 能 就 会 突然 显示 出 其 他 文件 的 内 容 。 


因此 ， 我 们 需要 解决 这 个 问题 。 


按照 Windows 管 理 磁盘 的 方法 ， 保 存 大 于 512 字 节 
的 文件 时 ， 有 时 候 并 不 是 存 入 连续 的 鹿 区 中 ， 虽 然 
这 种 情况 并 不 算 多 。 怎 么 样 ， 吓 一 跳 吧 ? 如 果 中 了 
这 一 招 的 话 ，harib16b 可 就 应 付 不 了 了 。 


其 实 ， 对 于 文件 的 下 一 段 存放 在 哪里 ， 在 磁盘 中 是 
有 记录 的 ， 我 们 只 要 分 析 这 个 记录 ， 就 可 以 正确 读 
取 文 件 内 容 了 。 这 个 记录 在 哪里 呢 ? 它 位 于 从 0 柱 
面 、0 磁 头 、2 扇 区 开始 的 9 个 扇 区 中 ， 在 磁盘 映像 
中 相当 于 0x000200 一 0x0013ff。 这 个 记录 被 称 为 

FAT， 是 “file allocation table” 的 缩写 ， 翻 译 过 来 叫 
I ( 即 记录 文件 在 磁盘 中 存放 位 置 的 

ae 


补充 一 下 ， 文 件 在 磁盘 中 没有 存放 在 连续 的 局 


区 ， 这 种 情况 家 称 为 "磁盘 碎 万 ”。Windows 中 的 
倒 盘整 理工 具 ， 就 是 用 来 将 局 区 内 容重 新 排列 ， 
以 减少 磁盘 雁 亡 的 程序 。 


再 往 后 光 靠 文字 已 经 很 难 讲 明白 了 ， 我 们 还 是 先 看 
看 FAT 的 样子 吧 。 


这 就 是 FEAT 


+0 +1 +2 
0123456789ABCDEF 


C9 00 OD 


Re @.. 
01 17 80 


000240 CO 02 2D 
..-../..1 .305.` 
000250 ©3 37 80 
E E E 


000260 FF OF 00 


这 天 是 harib16b 人 磁盘 映 像 中 的 FAT， 不 过 这 个 FAT 
使 用 了 微软 公司 设计 的 算法 进行 压缩 ， 因 此 我 们 无 
法 直接 看 懂 里 面 的 内 容 ， 需 要 先 用 下 面 的 方法 进行 
解压 缩 〈 看 了 下 面 的 讲解 ， 可 能 有 人 会 想 ， 这 哪里 
算是 压缩 啊 ? 关 于 这 一 点 ， 我 们 会 在 后 面 的 专栏 中 
详细 讨论 ) 。 


首先 将 数据 以 3 个 字 节 分 为 一 组 ， 并 进行 换 位 ， 我 
们 用 开头 的 “*F0 FF FF”* 来 举例 。 


FO FF FF -， FFO FFF 
ab cd ef dab efc 


为 了 让 大 家 看 清楚 具体 是 如 何 换 位 的 ， 我 们 在 下 面 
标记 了 英文 字母 。 换 位 之 后 ， 原 来 的 3 个 字 节 变 成 
了 2 个 数字 。 同 样 地 ，“03 40 00” 换 位 后 结果 如 下 。 


03 40 00 — 003 004 
ab cd ef dab efc 


以 此 类 推 ， 我 们 对 整个 FAT 解 码 之 后 的 样子 如 下 。 


+0 +1 +2 +3 +4 +5 +6 #47 +8 +9 

© FFO FFF 003 004 005 006 007 008 009 BOA 
10 OOB OOC OOD OOE OOF O10 011 012 013 014 
20 015 016 017 018 019 01A 01B 61C 01D 01E 
30 01F 020 021 022 023 024 025 026 027 028 
40 029 02A 02B 02C 02D 02E 02F 030 031 032 


50 633 034 035 036 037 038 039 FFF 63B 635 
60 63D 03E 63F FFF FFF 000 000 800 000 000 


虽然 我 们 已 经 对 数据 进行 了 解压 缩 ， 不 过 这 样 还 是 
看 不 情 啊 。 我 们 先 来 看 看 文件 信息 的 部 分 。 


harib16b 的 磁盘 映像 节选 


+0 +1 +2 +3 +4 +5 +6 
0123456789ABCDEF 


002600 48 41 52 
HARIBOTESYS .... 
002610 060 00 00 

eN.. 
002620 49 50 4C 


IPL10 NAS .... 
002630 00 00 00 


002640 4D 41 4B 
MAKE BAT .... 
002650 60 00 00 


从 上 面 的 信息 我 们 可 以 得 到 : 


HARIBOTE.SYS 02 00 > clustno = 0x0002 
IPL10.NAS 3A 00 — clustno = 0x003a 


MAKE . BAT 40 00 — clustno = 0x0040 


我 们 以 haribote.sys 为 例 来 分 析 一 下 。 已 知 clustno = 
2， 因 此 我 们 读 取 0x004200 一 0x0043ff 这 512 个 字 
节 。 那 么 接 下 来 应 该 读 取 哪里 的 数据 呢 ? 我 们 来 看 
FAT 的 第 2 写 记 录 ， 其 值 为 003， 也 就 是 说 下 面 的 部 
分 存放 在 clustno = 3 这 个 位 置 ， 即 读 取 0x004400 一 
0x0045ff 这 512 个 字 节 。 再 接 下 来 参照 FAT 的 第 3 号 
记录 ， 即 可 得 到 下 一 个 地 址 clustno = 4. 


以 此 类 推 ， 我 们 一 直 读 取 到 clustno = 57 (0x39) 。 
57 号 而 区 后 面 应 该 读 哪 里 了 呢 ? 参照 对 应 的 FAT 记 
录 ， 居 然 是 FFF。 也 就 是 说 ，57 号 之 后 已 经 没有 数 
据 了 ， 即 这 里 束 是 文件 的 末尾 。 一 般 来 说 ， 如 果 遇 
到 FF8~FEFE 的 值 ， 束 代表 文件 数据 到 此 结束 。 


正如 上 面 所 讲 的 ， 文 件 读 取 就 是 一 个 接力 的 过 程 ， 
大 家 明白 了 吗 ? 不 明白 也 没关系 ， 看 了 程序 代码 相 
信 大 家 一 定 会 理解 的 。 


不 过 ， 这 种 接力 的 方式 下 ， 只 要 其 中 一 个 地 方 损 
坏 ， 之 后 的 部 分 就 会 全 部 混乱 。 因 此 ， 微 软 公 司 将 
FAT 看 作 是 最 重要 的 磁盘 信息 ， 为 此 在 磁盘 中 存放 
了 2 份 FAT。 和 第 1 份 FAT 位 于 0x000200 一 0x0013ff， 
第 2 份 位 于 0x001400 一 0x0025ff。 其 中 第 2 份 是 备份 
FAT， 内 容 和 第 1 份 完全 相同 。 


好 了 ， 我 们 来 写 程序 吧 ， 代 码 如 下 。 


本 次 的 bootpack.c 节 选 


void console task(struct SHEET *sheet, unsigned int 
memtotal) 


中略) 


int *fat = (int *) memman_alloc_4k(memman, 4 * 
2880); 


CHH) 
file_readfat(fat, (unsigned char *) (ADR_DISKIMG + 


0x000200)); /* 这 里 ! */ 


CRH) 
for (33) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
《中 略 ) 
} else { 
(中 上 略 ) 
if (256 <= i && i <= 511) { /#* 键 盘 数 据 OM 
任务 A) */ 
if (i == 8 + 256) { 
(中 上 略 ) 
} else if (i == 10 + 256) { 
CRH) 


if (strcmp(cmdline, "mem") == @) { 


(中 上 略 》 


} else if (strcmp(cmdline, "cls") 


== @) { 
CHH ) 
} else if (strcmp(cmdline, "dir") 
== @) { 
CHH ) 
} else if (strncmp(cmdline, "type 
» 5) == @) { 
/* type 命 令 */ 
CHH ) 
if (x < 224 && finfo[x].name[6] 
l= 0x00) { 
/* 找 到 文件 的 情况 */ 
PaL, p = (char *) 
memman_alloc_4k(memman, finfo[x].size); 
AZEN 


file_loadfile(finfo[x].clustno, finfo[x].size, p, fat, 
(char *) (ADR_DISKIMG + 0x003e00)); 
cursor_X = 8; 
/# 这 里 ! */ for (y = 0j y< 
finfo[x].size; y++) { 
/* 逐 字 输 出 */ 
/* 这 里 ! */ s[@] = ply]; 
s[1] = @; 
CHH) 


/# 这 里 ! */ memman_free_4k(memman, (int) 
p, finfo[x].size); 
} else { 
/* 没 有 找到 文件 的 情况 */ 
CHRE) 
} 
cursor_y = 
cons _newline(cursor_y, sheet); 
} else if (cmdline[Q@] != ð) { 
《中 上 略 》 


} 
(中 上 略 ) 
} else { 
/* 一 般 字符 */ 
CHEK) 


} 
(中 上 略 ) 
} 


void file readfat(int *fat, unsigned char *img) 


/*# 将 磁盘 映像 中 的 FAT 解 压缩 */ 


{ 
int i, j = ð; 
for (i = ð; i < 2880; i += 2) { 
fat[i + @] = (img[j + 8] | img[j + 1] << 
8) & Oxfff; 


fat[i + 1] = (img[j + 1] >> 4 | img[j + 2] << 
4) & Oxfff; 
j += 3; 
} 


return; 


} 


void file_loadfile(int clustno, int size, char *buf, 
int *fat, char *img) 
{ 
int i; 
for (33) { 
if (size <= 512) { 
for (i = ð; i < size; i++) { 
buf[i] = img[clustno * 512 + i]; 
} 


break; 


for (i = 0; i < 512; i++) { 
buf[i] = img[clustno * 512 + i]; 


Size -= 512; 

buf += 512; 

clustno = fat[clustno]; 
} 
return; 


} 


程序 的 结构 很 简单 。 首 先 ， 由 于 压缩 状态 的 FAT 很 
难 使 用 ， 因 此 我 们 先 用 file_readfat 将 其 展开 到 
fat[ ] 。 


然后 ， 在 type 命 令 中 ， 我 们 先 分 配 一 块 和 文件 大 小 
相同 的 内 存 空间 ， 用 fie_loadfile 将 文件 的 内 容 读 入 
内 存 。 这 样 一 来 内 存 中 的 文件 内 容 已 经 排列 为 正确 
的 顺序 ， 使 用 之 前 的 程序 来 显示 文件 内 容 即 可 。 显 
示 完 成 后 ， 释 放 用 于 临时 存放 文件 内 容 的 内 存 空 
间 。 


好 ， 我 们 来 “make run”, MIR, SHIZ T o 

其 实 我 们 最 好 是 特意 准备 一 个 不 连续 的 文件 ， 以 便 
确认 程序 是 否 能 够 正常 显示 它 ， 不 过 准备 不 连续 的 
文件 实在 比较 麻烦 ， 我 们 就 权 且 “相信 ” 它 可 以 正常 


显示 吧 CX) 。 
COLUMN-11 FAT 的 压缩 


软盘 中 的 FAT 是 经 过 压缩 的 ， 将 2 个 忆 区 的 信息 挤 
到 了 3 个 字 节 中 。 正 是 因此 ， 我 们 的 程序 必须 多 从 
FAT 的 解压 缩 开 始 。 


如 果 不 进行 压强 ， 到 的 会 浪费 多 少 空间 呢 ? 我 们 
来 简单 计算 一 下 。 破 盘 中 一 共有 2880 个 忆 区 ， 正 
常 使 用 WORD 保 存 扇 区 号 的 话 ，FAT 总 共 需 要 
2880x2=5760 个 字 节 ， 也 就 是 说 ， 一 个 FAT 要 占用 
12 个 而 区 。 


经 过 压缩 后 ，3 个 字 节 可 以 保存 2 个 扇 区 号 ， 也 就 
是 说 ， 存 放 1 个 扇 区 号 所 需要 的 空间 变 为 了 1.5 个 
字 节 。 因 此 ，FAT 总 共 需 要 2880x1.5=4320 个 字 
节 ， 这 样 的 话 ， 一 个 FAT 只 占用 9 个 扇 区 。 


一 张 软盘 中 一 共有 2 份 FAT， 因 此 经 过 压缩 后 ， 总 
共 可 以 节省 6 个 扇 区 的 空间 ， 但 对 于 磁盘 的 总 容量 
来 说 ， 也 只 相当 于 0.2% (6/ 2880x100) 。 唔 ， 仅 
仅 为 了 节省 这 0.2% 的 空间 ， 有 必要 搞 这 么 麻烦 的 
压缩 吗 ? 从 笔者 的 感觉 来 说 ， 这 实在 是 够 纠结 
的 。 


4 代码 整理 (Charib16d ) 


喇 ，bootpack.c 有 点 太 长 了 (已 经 达到 648 行 了 
哦 ! ) ， 虽 然 笔 者 一 回 懒 惰 ， 但 现在 也 和 觉得 该 整理 
整理 了 。 


口 相 关 图 数 > window.c 
。 命令 行 窗 口 相关 函数 > console.c 
。 文件 相关 函数 > file.c 


这 样 一 来 就 清爽 多 了 ，bootpack.c 也 缩减 为 282 行 
J ? E O 


不 过 ， 我 们 还 是 要 确认 一 下 整理 后 的 程序 是 否 可 以 
顺利 编译 ， 是 否 可 以 像 之 前 一 样 正常 运行 。“make 
run”， 哇 ， 运 行 成 功 ， 不 错 不 错 
ys 


5 第 一 个 应 用 程序 (harib16e ) 


好 ， 既 然 现 在 我 们 已 经 可 以 读 取 文 件 的 内 容 ， 那 么 
运行 应 用 程序 也 残 不 难 实现 了 。 


作为 头 一 次 答 试 ， 我 们 要 挑战 什么 样 的 应 用 程序 
Ne? 当然 还 是 从 简单 的 开始 啦 。 唔 ， 最 简单 的 应 用 
程序 是 ..…... 到 压 哪 个 比较 好 呢 ? 哦 ， 有 了 ， 束 选 那 
< 


因此 ， 请 大 家 把 书 一 口气 翻 回 到 3.5 节 ， 那 里 有 一 个 
非常 简单 的 操作 系统 程序 ， 只 有 3 个 字 节 。 可 能 有 

些 人 连 翻 书 都 懒得 翻 ， 好 吧 ， 我 们 就 再 次 来 个 那 3 

个 字 节 程序 的 大 公开 吧 ! (SE) 


3 个 学 市 的 应 用 程序 


[BITS 32] 
fin: 

HLT 

JMP fin 


将 上 面 这 段 代 人 码 保 存 为 hltnas， 然 后 用 nask 进 行 汇 
编 ， 生 成 hlt.hrb。 可 能 大 家 会 问 ， 这 个 扩展 名 .hrb 是 
E? 这 个 咏 ， 其 实 是 haribote 的 缩写 。 如 果 我 们 命 
为 .exe 文 件 的 话 ， 束 会 和 Windows 的 可 执行 文件 产 


生 混 消 ， 因 此 这 里 我 们 用 了 个 目 定 义 的 扩展 名 。 
CLLD 


那么 ， 要 怎样 才能 运行 文件 的 内 容 呢 ? 像 type 命 令 
一 样 ， 我 们 用 他 e_loadfile 将 文件 的 内 容 读 到 内 存 
中 ， 问 题 是 后 面 要 怎么 办 ? 


应 用 程序 不 知道 自己 被 读 到 哪个 内 存 地 址 ， 这 里 暂 
且 由 ORG 0 来 生成 。 因 此 ， 为 了 应 用 程序 能 够 顺利 
运行 ， 我 们 需要 为 其 创建 一 个 内 存 段 。 


段 创 建 好 之 后 ， 接 下 来 只 要 goto 到 该 段 中 的 程序 ， 
程序 应 该 束 会 开始 运行 了 。 要 goto 到 其 他 的 内 存 
段 ， 在 汇编 语言 中 用 farjmp 指 令 。 话 说 ， 这 个 指令 
我 们 在 任务 切换 的 时 候 已 经 用 过 了 嘛 。 因 此 ， 这 次 
我 们 不 需要 改动 naskfunc.nas 中 的 函数 就 可 以 运行 
hlthrb 了 ， 撒 花 。 


写 好 的 程序 如 下 。 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, unsigned int 
memtotal) 


{ 


中略) 
struct SEGMENT_DESCRIPTOR *gdt = (struct 
SEGMENT_DESCRIPTOR *) ADR_GDT; 


《中略 ) 
for (33) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
CHH ) 
} else { 
CHH ) 
if (256 <= i && i <= 511) { /* 键 盘 数据 (通过 
任务 A) */ 
if (i == 8 + 256) { 
CHH) 
} else if (i == 10 + 256) { 
CHH) 
if (strcmp(cmdline, "mem") == @) { 
CHH ) 
} else if (strcmp(cmdline, "cls") 
=p) 
CHH ) 
} else if (strcmp(cmdline, "dir") 
== 0) A 
CHH ) 
} else if (strncmp(cmdline, "type 
» 5) == @) { 
CHH ) 
} else if (strcmp(cmdline, "hlt") 
== @) { 


/* 从 此 开始 */ /* 启 动 应 用 程序 hlt.hrb */ 
for (y = ð; y < 11; y++) { 
Sty] = ' '; 
} 
s[6] = 'H'; 


s[1] = 'L'; 
s[2] = 'T'; 
s[8] = 'H'; 
s[9] = 'R'; 
s[10] = 'B'; 
for (x = ð; x < 224; ) { 

if (finfo[x]l.name[6] == 


6x66) { 
break; 
} 
if ((finfo[x].type & 0x18) 
== @) { 
for (y = ð; y < 11; 
y++) { 
if 
(finfo[x].name[y] != s[y]) { 
goto 
hlt_next_file; 
} 
} 
break; /* 找 到 文件 */ 
} 
hilt next file: 
X++; 
} 
if (x < 224 && finfo[x].name[Q] 
I= 6x66) { 
/* 找 到 文件 的 情况 */ 
p = (char *) 


memman_alloc 4k(memman, finfo[x].size); 


file loadfile(finfo[x].clustno, finfo[x].size, p, fat, 
(char *) 

(ADR_DISKIMG + 
0x003e00)); 


set_segmdesc(gdt + 1003, 
finfo[x].size - 1, (int) p, AR_CODE32_ER); 

farjmp(@, 1003 * 8); 

memman_free_4k(memman, 
(int) p, finfo[x].size); 


else { 
/* 没 有 找到 文件 的 情况 */ 
putfonts8 asc sht(sheet, 8, 
cursor_y, COL8 FFFFFF, COL8 06066660， "File not found.", 
15); 
cursor_y = 
cons_newline(cursor_y, sheet); 


} 
/* 到 此 结束 */ cursor_y = 
cons_newline(cursor_y, sheet); 
} else if (cmdline[6] != 6) { 


CREK) 
} 
(中 上 略 ) 
} else { 
(中 上 略 ) 
} 


这 次 添加 的 hlt 命 令 ， 是 用 来 启动 hlt.hrb 这 个 应 用 程 
序 的 ， 前 半 部 分 和 type 命 令 的 代码 非常 类 似 。 


hlt.hrb 成 功 读 入 内 存 之 后 ， 将 其 注册 为 GDT 的 1003 
号 。 为 什么 要 用 1003 号 呢 ? 100 号 或 者 12 号 不 行 


吗 ? 还 真 不 行 ， 因 为 1 一 2 号 由 dsctbl.c 使 用 ， 而 3 一 
10025 Hmtask.cf# H, AREAERTIAS £10035, Wit 
如 果 把 1003 号 换 成 1234 号 之 类 的 还 是 没 问 题 的 哦 。 


随后 ， 当 内 存 段 创建 完成 后 ， 用 farjmp 跳 转 并 运 
行 。 


我 们 来 试 试看 吧 ， “make run”, 然后 在 命令 行 窗 H 
中 运行 hlt 命 令 ， 这 是 “ 纸 娃娃 系统 ”历史 上 首次 运行 
应 用 程序 ， 我 们 的 心情 无 比 激动 。 哑 ? 程序 停止 
T 


运行 时 的 样子 


E MEL ebug? 转念 一 想 ， 这 个 程序 本 来 就 是 
执行 HIL， 这 样 才 是 正 帝 的 呆 。 因 为 程序 不 会 执行 
任何 操作 ， 因 此 看 上 去 好 像 是 集 止 了 一 样 。 对 了 ， 
其 实 (看 上 去 ) 集 止 了 的 只 有 命令 行 窗 口 而 已 ， 如 


果 按 下 Tab 键 的 话 ， 还 是 可 以 切换 回 task_a 的 哦 。 


了 喇 ， 不 过 这 样 一 来 ， 我 们 就 没 办 法 判断 命令 行 窗口 
的 停止 到 底 是 因为 运行 了 hithrb 呢 ， 还 是 由 于 另外 
一 些 原因 不 明 的 bug 导 致 的 。 我 们 还 是 要 再 确认 一 
FATT 


BEATE? 我 们 用 个 巧 办 法 吧 ， 


改造 版 的 第 一 个 应 用 程序 


[BITS 32] 


CLI 
fin: 

HLT 

JMP fin 


我 们 在 开头 加 上 了 一 个 CLI 指 令 ， 这 样 整个 程序 变 
成 了 4 个 字 节 。 如 果 应 用 程序 正常 运行 的 话 ， 中 断 
处 理会 被 禁止 ， 因 此 即便 按 下 Tab 键 也 无 法 切换 回 
task_a， 鼠 标 应 该 也 停止 不 动 了 。 


那么 我 们 来 试验 一 下 。 哇 ， 真 的 停止 了 耶 ! 太 棒 
了 ， 果 然 我 们 的 应 用 程序 成 功 运行 了 。 话 说 回来 ， 
冷静 下 来 一 想 ， 自 己 制作 的 操作 系统 明明 死机 了 却 
还 开心 得 不 得 了 ， 真 是 个 奇怪 的 家 伙 〈 笑 ) 。 总 
Z, WE. 


好 了 ， 今 天 的 内 容 就 到 这 里 。 明 天 我 们 继续 加 油 
哦 ! 


第 20 天 API 


。 程 序 整 理 Charib17a ) 

显示 单个 字符 的 API (1) Charib17b) 
显示 单个 字符 的 API (2) Charib17c) 
结束 应 用 程序 Charib17d ) 

o 不 随 操 作 系 统 版 本 而 改变 的 API Charib17e ) 
。 为 应 用 程序 自由 命名 (harib17f) 

。 当心 寄存 器 Charib17g ) 

。 用 API 显 示 字 符 串 Charib17h) 


1 程序 整理 (harib17a ) 


大 家 早上 好 ， 今 天 我 们 继续 努力 哦 。 昨 天 我 们 已 经 
实现 了 应 用 程序 的 运行 ， 今 天 我 们 来 实现 由 应 用 程 
序 对 操作 系统 功能 的 调用 《〈 即 API， 也 叫 系 统 调 
用 ) 。 


为 什么 这 样 的 功能 称 为 “系统 调用 ”(system call) 
We? 因为 它 是 由 应 用 程序 来 调用 (操作 〉 系统 中 
的 功能 来 完成 某 种 操作 ， 这 个 名 字 很 直 白 吧 。 


“API” 这 个 名 字 就 稍微 复杂 些 ， 是 “application 
program interface” 的 缩写 ， 即 “应 用 程序 〈 与 系统 
ZA) 接口 ”的 意思 。 


请 大 家 把 这 两 个 名 字 记 住 哦 ， 考 试题 目 中 会 有 的 
MR... FPR, REESE A NA AIR 
些 早 词 的 工夫 ， 还 不 如 多 至 受 一 下 制作 操作 系统 
的 乐趣 呢 。 


以 后 ， 在 本 书 中 会 更 多 地 使 用 “API” 这 个 名 字 ， 理 
由 很 简单 ， 因 为 它 比 较 短 嘛 (E) ! 
这 值得 纪念 的 第 一 次 ， 我 们 就 来 做 个 在 命令 行 窗 口 
中 显示 字符 的 API 吧 。BIOS 中 也 有 这 个 功能 哦 ， 如 


果 忘 了 的 话 请 重新 看 看 第 二 天 的 内 容 。 怎 么 样 ， 找 
到 了 吧 ? 无 论 什 么 样 的 操作 系统 ， 痢 会 有 蕊 能 关 似 
的 API， 这 可 以 说 是 必需 的 。 


下 面 来 改造 一 下 我 们 操作 系统 ， 让 它 可 以 使 用 API 
吧 ...... 等 等 ， 现 在 这 程序 是 怎么 回 事 ! 尤其 是 
console_task， 人 简直 太 不 像样 了 。 看 着 如 此 混乱 的 程 
序 代 码 ， 真 是 提 不 起 任何 干劲 来 进行 改造 ， 我 们 还 
是 先 把 程序 整理 一 下 吧 。 


由 于 只 是 改变 了 程序 的 写法 ， 并 没有 改变 程序 处 理 
的 内 容 ， 因 此 这 里 就 不 讲解 了 。 原 本 很 长 的 
console_task， 从 249 行 改 到 了 85 行 ， 哦 耶 ! 不 过 由 
于 创建 了 很 多 函数 ， 整 体 的 行 数 反而 比 原来 多 了 ， 
MN 。 


本 次 的 console.c 节 选 


struct CONSOLE { 
struct SHEET *sht; 
int cur_x, cur_y, cur. c; 


}; 


void console_task(struct SHEET *sheet, unsigned int 
memtotal) 


struct TIMER *timer; 


struct TASK *task = task_now(); 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

int i, fifobuf[128], *fat = (int *) 
memman_alloc_4k(memman, 4 * 2880); 

struct CONSOLE cons; 

char cmdline[ 30]; 

cons.sht = sheet; 


cons.cur_X = 8; 
cons.cur_y = 28; 
cons.cur_c = -1; 


fifo32 init(&task->fifo, 128, fifobuf, task); 

timer = timer_alloc(); 

timer_init(timer, &task->fifo, 1); 

timer_settime(timer, 50); 

file readfat(fat, (unsigned char *) (ADR_DISKIMG + 
0x000200) ) ; 


/* 显 示 提 示 符 */ 
cons_putchar(&cons, '>', 1); 


for (33) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
task_sleep(task) ; 


io_sti(); 
} else { 
i = fifo32_get(&task->fifo) ; 
io_sti(); 
if (i <= 1) { /* 光 标 用 定时 器 */ 
if (i != 6) { 


timer_init(timer, &task->fifo, 0); 
/*# 下 次 置 6 */ 
if (cons.cur_c >= @) { 
cons.cur_c = COL8_FFFFFF; 


} 


} else { 
timer init(timer, &task->fifo, 1); 


/* 下 次 置 1 */ 


if (cons.cur_c >= @) { 
cons.cur_c = COL8 0000080; 
} 
} 
timer_settime(timer, 50); 
} 
if (i == 2) {  /* 光 标 ON */ 
cons.cur_c = COL8 FFFFFF; 
} 
if (i == 3) {  /* 光 标 OFF */ 
boxfill8(sheet->buf, sheet->bxsize, 
COL8 900000, 
cons.cur_x, cons.cur_y, 
cons.cur_x + 7, cons.cur_y + 15); 
cons.cur_c = -1; 
} 
if (256 <= i && i <= 511) { /* 键 盘 数据 (通过 
任务 A) */ 
if (i == 8 + 256) { 
/* 退 格 键 */ 
if (cons.cur x > 16) { 
/* 用 空格 擦 除 光 标 后 将 光标 前 移 一 位 */ 
cons_putchar(&cons, ' ', 0); 
cons.cur x -= 8; 
} 
} else if (i == 10 + 256) { 
/* 回 车 键 */ 
/* 将 光标 用 空格 探 除 后 换行 */ 
cons_putchar(&cons, ' ', 0); 
cmdline[cons.cur_x / 8 - 2] = ð; 


cons_newline(&cons) ; 
cons_runcmd(cmdline, &cons, fat, 
memtotal); /* 运 行 命令 */ 
/* 显 示 提 示 符 */ 
cons_putchar(&cons, '>', 1); 
} else { 
/* 一 般 字 符 */ 
if (cons.cur_x < 240) { 
/* 显 示 一 个 字符 之 后 将 光标 后 移 一 位 */ 
cmdline[cons.cur_x / 8 - 2] =i 
- 256; 
cons_putchar(&cons, i - 256, 
1); 


} 
} 
/*# 重 新 显示 光标 */ 


if (cons.cur_c >= @) { 
boxfill8(sheet->buf, sheet->bxsize, 
cons.cur_c, cons.cur_x, cons.cur_y, 
cons.cur x + 7, cons.cur_y + 15); 

} 

sheet_refresh(sheet, cons.cur_x, 
cons.cur_y, cons.cur_x + 8, cons.cur_y + 16); 

} 
} 

} 


void cons_putchar(struct CONSOLE *cons, int chr, char 
move ) 


{ 
char s[2]; 
s[6] = chr; 
s[1] = ð; 


if (s[6] == 0x09) { /* 制 表 符 */ 
for (33) { 


putfonts8 asc_sht(cons->sht, cons->cur_x, 
cons->cur_y, COL8 _FFFFFF, COL8_000000, " ", 1); 

cons->cur_xX += 8; 

if (cons->cur_x == 8 + 240) { 
cons_newline(cons); 

} 

if (((cons->cur_x - 8) & @x1f) == @) { 
break; ”/* 被 32 整 除 则 break*/ 

} 


} 
} else if (s[@] == Ox@a) { /* 换 行 */ 
cons_newline(cons) ; 
} else if (s[@] == @x@d) { /* 回 车 */ 
/* 先 不 做 任何 操作 */ 
} else { /* 一 般 字 符 */ 
putfonts8_asc_sht(cons->sht, cons->cur x, cons- 
>cur_y, COL8_FFFFFF, COL8 900000, s, 1); 
if (move != 0) { 
/* move 为 8 时 光标 不 后 移 */ 
cons->cur_X += 8; 
if (cons->cur_x == 8 + 240) { 
cons_newline(cons) ; 
} 
} 
} 


return; 


} 


void cons newline(struct CONSOLE *cons) 
{ 
int x, y; 
struct SHEET *sheet = cons->sht; 
if (cons->cur_y < 28 + 112) { 
cons->cur_y += 16; /* 到 下 一 行 */ 
} else { 


/* 深 动 */ 
for (y = 28; y < 28 + 112; y++) { 
for (x = 83 x < 8 + 240; x++) { 
sheet->buf[x + y * sheet->bxsize] 
sheet->buf[x + (y + 16) * sheet->bxsize]; 
} 
} 
for (y = 28 + 112; y < 28 + 128; y++) { 
for (x = 8; x < 8 + 240; x++) { 
Sheet->buf[x + y * sheet->bxsize] 


COL8_ 9000880; 


} 
} 
sheet_refresh(sheet, 8, 28, 8 + 240, 28 + 128); 
} 
cons->cur_X = 8; 
return; 


} 


void cons_runcmd(char *cmdline, struct CONSOLE *cons, 
int *fat, unsigned int memtotal) 
{ 
if (strcmp(cmdline, "mem") == @) { 
cmd_mem(cons, memtotal); 
} else if (strcmp(cmdline, "cls") == @) { 
cmd_cls(cons) ; 
} else if (strcmp(cmdline, "dir") == @) { 
cmd_dir(cons) ; 
} else if (strncmp(cmdline, "type ", 5) == 0) { 
cmd_type(cons, fat, cmdline); 
} else if (strcmp(cmdline, "hlt") == @) { 
cmd_hlt(cons, fat); 
} else if (cmdline[Q@] != ð) { 
/* 不 是 命令 ， 也 不 是 空 行 */ 
putfonts8 asc sht(cons->sht, 8, cons->cur_y, 
COL8_FFFFFF, COL8 900000, "Bad command.", 12); 


cons_newline(cons) ; 
cons_newline(cons) ; 


} 


return; 


} 


void cmd_mem(struct CONSOLE *cons, unsigned int 
memtotal) 


{ 


struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

char s[30]; 

sprintf(s, “total %dMB", memtotal / (1024 * 
1024) ) ; 

putfonts8 asc sht(cons->sht, 8, cons->cur y， 
COL8_FFFFFF, COL8_000000, s, 30); 

cons_newline(cons); 

sprintf(s, "free %dKB", memman_total(memman) / 
1024); 

putfonts8_asc_sht(cons->sht, 8, cons->cur_y, 
COL8_FFFFFF, COL8_000000, s, 30); 

cons_newline(cons); 

cons_newline(cons); 

return; 


} 


void cmd_cls(struct CONSOLE *cons) 
{ 

int x, y; 

struct SHEET *sheet = cons->sht; 

for (y = 28; y < 28 + 128; y++) { 

for (x = 8; x < 8 + 240; x++) { 
sheet->buf[x + y * sheet->bxsize] = 

COL8_000000; 


} 


} 

sheet_refresh(sheet, 8, 28, 8 + 240, 28 + 128); 
cons->cur_y = 28; 

return; 


} 


void cmd_dir(struct CONSOLE *cons) 
{ 
struct FILEINFO *finfo = (struct FILEINFO *) 
(ADR_DISKIMG + 0x002600); 
int i, j; 
char s[30]; 
for (i = ð; i < 224; i++) { 
if (finfo[i].name[0] == 0x098) { 
break; 
} 
if (finfo[i].name[@] != @xe5) { 
if ((finfo[i].type & 0x18) == ð) { 
sprintf(s, "filename.ext %7d", 
finfo[i].size); 
for (j = 
s[j] 
} 


s[ 9] 


Ə; j < 8; j++) { 
= finfo[i].name[j]; 


finfo[i].ext[e]; 
s[10] = finfo[i].ext[1]; 
s[11] finfo[i].ext[2]; 
putfonts8_asc_sht(cons->sht, 8, cons- 
>cur_y, COL8_FFFFFF, COL8 900000, s, 30); 
cons_newline(cons); 


} 
} 
} 


cons_newline(cons); 
return; 


void cmd_type(struct CONSOLE *cons, int *fat, char 
*cmdline) 
{ 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

struct FILEINFO *finfo = file_search(cmdline + 5, 
(struct FILEINFO *) (ADR DISKIMG + 0x002600), 224); 


char *p; 
int i; 
if (finfo != 0) { 
/* 找 到 文件 的 情况 */ 


p = (char *) memman alloc 4k(memman, finfo- 
>size); 
file loadfile(finfo->clustno, finfo->size, p, 
fat, (char *) (ADR_DISKIMG + @x@@3e@@) ) ; 
for (i = ð; i < finfo->size; i++) { 
cons_putchar(cons, p[i], 1); 


} 
memman_free 4k(memman, (int) p, finfo->size); 
} else { 
/* 没 有 找到 文件 的 情况 */ 
putfonts8 asc sht(cons->sht, 8, cons->cur_y, 
COL8_FFFFFF, COL8_000000, "File not found.", 15); 
cons_newline(cons) ; 
} 
cons_newline(cons); 
return; 


} 


void cmd_hlt(struct CONSOLE *cons, int *fat) 
{ 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

struct FILEINFO *finfo = file_search("HLT.HRB", 
(struct FILEINFO *) (ADR DISKIMG + 0x002600), 224); 


struct SEGMENT_DESCRIPTOR *gdt = (struct 
SEGMENT_DESCRIPTOR *) ADR_GDT; 


char *p; 
if (finfo != 0) { 
/* 找 到 文件 的 情况 */ 


p = (char *) memman alloc 4k(memman, finfo- 
>size); 

file loadfile(finfo->clustno, finfo->size, p, 
fat, (char *) (ADR_DISKIMG + @x@@3e@@) ) ; 

set_segmdesc(gdt + 1003, finfo->size - 1, (int) 
p, AR_CODE32_ER); 

farjmp(@, 1003 * 8); 

memman_free_4k(memman, (int) p, finfo->size); 

} else { 

/* 没 有 找到 文件 的 情况 */ 

putfonts8 asc sht(cons->sht, 8, cons->cur_y, 
COL8_FFFFFF, COL8_000000, "File not found.", 15); 

cons_newline(cons) ; 


} 


cons_newline(cons); 
return; 


本 次 的 fle.c 节 选 


struct FILEINFO *file_search(char *name, struct 
FILEINFO *finfo, int max) 


{ 


int i, j; 

char s[12]; 

for (j = 0; j < 11; j++) { 
s[jl= ' '; 


for (i = 6; name[i] != 6; i++) { 


if (j >= 11) { return 0; /* 没 有 找到 */ } 


if (name[i] == '.' && j <= 8) { 
j = 8; 
} else { 


s[j] = name[i]; 

if ('a' <= s[j] && s[j] <= 'z') { 
/* 将 小 写字 母 转换 为 大 写字 母 */ 
s[j] -= 0x20; 

} 

J++; 


} 


for (i = ð; i < max; ) { 
if (finfo[i].name[Q] == @xee@) { 
break; 


} 
if ((finfo[i].type & 0x18) == ð) { 
for (j = 03 j < 11; j++) { 
if (finfo[i].name[j] != s[j]) { 
goto next; 


} 
} 
return finfo + i; /* 找 到 文件 */ 
} 


next: 
i++; 


} 
return 0; /* 没 有 找到 */ 


咽 咽 ， 比 之 前 的 代码 易 读 多 了 。 你 看 ， 只 要 想 把 代 


人 码 写 得 清 些 就 一 定 能 做 到 的 ， 连 笔者 都 做 到 了 啊 
CK) 。 这 个 例子 说 明 ， 如 果 持 续 增 加 新 的 功能 ， 
一 个 函数 的 代码 就 会 变 得 很 长 ， 像 这 样 定期 整理 一 
下 还 是 很 有 帮助 的 。 


好 了 ， 我 们 来 “make run”， 输 入 一 些 命令 试 试看 。 
和 之 前 运行 的 情况 一 样 ， 很 好 。 


2 显示 蛙 个 字 侍 的 API (1) 
(harib17b) 


现在 我 们 要 开始 做 显示 单个 字符 的 API 了 哦 。 说 起 
来 其 实 也 不 是 很 难 ， 只 要 应 用 程序 能 用 菏 种 方法 调 
用 cons_putchar 就 可 以 了 。 


首先 我 们 做 一 个 测试 用 的 应 用 程序 ， 将 要 显示 的 字 
从 编码 存 入 AL 寄 存 右 ， 然 后 调用 操作 系统 的 函 
数 ， 字 符 就 显示 出 来 了 。 


本 次 的 hltnas (HIFA ) 


[BITS 32] 
MOV AL,'A!' 
CALL (cons_putchar 的 地 址 )》 


fin: 
HLT 
JMP fin 


就 是 这 个 样子 。CALL 是 一 个 用 来 调用 函数 的 指 
令 。 在 C 语 言 中 ，goto 和 函数 调用 的 处 理 方 式 完全 
不 同 ， 不 过 在 汇编 语言 中 ，CALL 指 令 和 JMP 指 令 
其 实 差不多 是 一 码 事 ， 它 们 的 区 别 仅仅 在 于 ， 当 执 
行 CALL 指 令 时 ， 为 了 能 够 在 接 下 来 执行 RET 指 令 
时 正确 返回 ， 会 先 将 要 返回 的 目标 地 址 PUSH 到 栈 


中 。 


关于 CALL 指 令 这 里 想 再 讲 一 下 。 有 人 可 能 会 想 ， 
直接 写 CALL cons_putchar 丰 就 好 了 吗 ? 然而 ， 
hlt.nas 这 个 应 用 程序 在 汇编 时 并 不 包含 操作 系统 本 
号 的 代码 ， 因 此 汇编 器 无 法 得 知 要 调用 的 函数 地 
址 ， 汇 编 就 会 出 错 。 要 解决 这 个 问题 ， 必 须 人 工 查 
好 地 址 后 直接 写 到 代码 中 。 在 对 haribote.sys 进 行 
make 的 时 候 ， 通 过 一 定 的 方法 我 们 可 以 得 出 
cons_putchar 的 地 址 ， 没 有 问题 ， 那 么 我 们 就 来 查 
一 下 地 址 ...... 且 慢 ! 


这 样 做 有 个 问题 ， 因 为 cons_putchar 是 用 C 语 言 写 的 
函数 ， 即 便 我 们 将 字符 编码 存 入 寄存 器 ， 函 数 也 无 
法 接收 ， 因 此 我 们 必须 在 CALL 之 前 将 文字 编码 推 
MIRA ÍT, (EGER ARIS o 


没 办 法 ， 我 们 只 好 用 汇编 语言 写 一 个 用 来 将 寄存 器 
的 值 推 入 栈 的 函数 了 。 这 个 函数 不 是 应 用 程序 的 一 
部 分 ， 而 是 写 在 操作 系统 的 代码 中 ， 因 此 我 们 要 改 
写 的 是 naskfunc.nas。 画 一 方面 ， 在 应 用 程序 中 ， 我 
们 CALL 的 地 址 不 再 是 cons_putchar， 而 是 变 成 了 新 


写 的 _asm_cons_putchar。 


asm_cons_putchar 


成 为 面向 应 用 程序 的 窗口 


asm_cons_putchar 


调用 |! 


应 用 程序 


本 次 的 naskfunc.nas 节 选 〈 初 稿 ) 


_asm_cons_putchar: 

PUSH 1 

AND EAX, Oxff ; 将 AH 和 EAX 的 高 位 置 9， 将 EAX 置 
为 已 存 入 字符 编码 的 状态 

PUSH EAX 


PUSH (cons 的 地 址 ) 

CALL _cons_putchar 

ADD ESP,12 ; 将 栈 中 的 数据 丢弃 
RET 


PUSH 的 特点 是 后 进 先 出 ， 因 此 这 个 顺序 没 问题 。 


这 段 程序 的 问题 在 于 “cons 的 地 址 >? 到底 是 多 少 。 应 
用 程序 是 不 知道 这 个 地 址 的 ， 因 此 让 应 用 程序 来 指 
定 地 址 难以 实现 。 唔 ， 那 么 只 能 让 操作 系统 把 这 个 
地 址 事先 保存 在 内 存 中 的 某 个 地 方 了 。 哪 里 比较 好 
We? 对 了 ， 就 保存 在 BOOTINFO 之 前 的 0x0fec 这 个 
地 址 吧 。 


本 次 的 naskfunc.nas 节 选 〈 完 成 版 ) 


_asm_cons_putchar: 

PUSH 1 

AND EAX, Oxff ; 将 AH 和 EAX 的 高 位 置 9， 将 EAX 置 
为 已 存 入 字符 编码 的 状态 


PUSH EAX 


PUSH DWORD [@x@fec] ; 读 取 内 存 并 PUSH 该 值 
CALL _cons_putchar 

ADD ESP,12 ; 将 栈 中 的 数据 丢弃 

RET 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, unsigned int 
memtotal) 


CHH) 


cons.sht = 


cons. cur_x 


cons.cur_y 

cons.cur_c = -1; 

*((int *) pxetec): t (int) &cons; 
CHH) 


现在 操作 系统 这 这 的 工作 已 经 元 成 了 ， 因此 我 们 先 
来 “make” 一 下 ， 注 意 这 里 不 是 “make run”， 和 之 前 
A 因为 应 用 程序 还 ` 没 有 准备 好 呢 ， 所 以 我 
们 先 只 进行 “make。” 


make 完 成 后 ， 除 了 haribote.sys 之 外 ， 还 会 生成 一 个 
叫 bootpack.map 的 文件 。 之 前 我 们 一 直 忽 略 这 个 文 
件 的 ， 不 过 这 次 它 要 派 上 用 场 了 。 


这 是 一 个 文本 文件 ， 用 文本 编辑 融 打 开 即 可 ， 其 中 
应 该 可 以 找到 这 样 一 行 : 


这 束 是 _asm_cons_putchar 的 地 址 了 ， 因 此 ， 我 们 将 
地 址 填 在 应 用 程序 中 : 


本 次 的 hlt.nas (完成 版 ) 


[BITS 32] 


AL,'A' 
@xbe3 


然后 再 进行 汇编 就 可 以 了 ， 很 简单 吧 。 


说 起 来 ， 我 们 写 的 这 些 代 码 里 面 ， 哪 个 部 分 是 API 
We? “MOVE AL,‘A’” 和 “CALL 0xbe3” 就 是 API 了 ， 
因为 API 束 是 由 应 用 程序 来 使 用 操作 系统 所 提供 的 
服务 。 当 然 ， 我 们 这 个 是 否 达 到 “服务 ”的 程度 束 男 
当 别 论 了 。 


现在 我 们 的 应 用 程序 也 已 经 完成 了 ， 可 以 “make 
run” J. Mh! 然后 在 命令 行 窗口 里 面 运行 “hlt”。 
We | 


Tee, HEIL! qemu.exe 出 错 关 财 了 ! AKERE 
明 了 一 个 不 得 了 的 大 bug。 在 真 机 环境 下 无 法 预料 
会 造成 什么 后 果 ， 因 此 请 大 家 不 要 尝试 。 好 吧 ， 下 
面 我 们 来 解决 这 个 bug。 


3 显示 单个 字符 的 API (2) 
(harib17c) * 


RIX ie RD ae LE Fe A] bug, AZADA A fe 
Te ARERVE BRIN AE AML Bo WOR AS FA BI) i EET IP 
发 的 话 ， 不 经 意 间 产生 的 bug 有 时 可 能 会 造成 电脑 
损坏 、 便 盘 被 格式 化 等 严重 问题 ， 也 许 好 几 天 痢 无 
法 恢复 过 来 。 开 发 操作 系统 就 是 这 么 刺激 。 如 果 通 
过 这 次 的 bug， 大 家 能 够 萤 见 这 种 刺 沿 的 冰山 一 
角 ， 那 么 笔者 觉得 这 个 bug 也 算是 有 点 用 的 吧 〈 昔 
笑 ) 。 


不 过 ， 光 扯 刺 诉 啦 什么 的 也 无 讲 于 事 ， 我 们 还 得 仔 
细 了 寻找 原因 。 哦 ， 原 来 如 此 ， 找 到 了 ! 


原因 其 实 很 简单 。 应 用 程序 对 API 执 行 CALEL 的 时 
候 ， 千 万 不 能 忘记 加 上 段 号 。 应 用 程序 所 在 的 段 
为 “1003 * 8”， 而 操作 系统 所 在 的 段 为 “2 * 8”， 因 此 
我 们 不 能 使 用 普通 的 CALL， 而 应 该 使 用 far- 
CALL. 


far-CALL 实 际 上 和 far-JMP 一 样 ， 只 要 同时 指定 段 
和 偏 移 量 即 可 。 


本 次 的 hltnas 


[BITS 32] 
MOV AL,'A' 
CALL 2*8:O@xbe3 


fin: 
HLT 
JMP 


好 ， 完 工 了 了 人， 这样 bug 应 该 就 解决 了 ， 我 们 来 试 试 
看 。“make run”, A Zí ht. IE? WEM o 
这 次 虽然 没有 出 错 关 闭 ， 但 qgemu.exe 停 止 啊 应 了 。 


这 个 问题 是 由 于 _asm_cons_putchar 的 RET 指 令 所 造 
成 的 。 普 通 的 RET 指 令 是 用 于 普通 的 CALEL 的 返 
回 ， 而 不 能 用 于 far-CALEL 的 返回 ， 既 然 我 们 用 了 
far-CALL， 就 必须 相应 地 使 用 far-RET， 也 就 是 
RETF 指 令 。 因 此 我 们 将 程序 修改 一 下 。 
_asm_cons_putchar: 


He) 
RETF ee H] 


Te, IK MAL Ia et SWE. “make run”, “hlt”, 


成 功 了 ! fite! 


字符 显示 出 来 了 哦 ! ! ! 


4 结束 应 用 程序 Charib17d) 


照 现在 这 个 样子 ， 应 用 程序 结束 之 后 会 执行 HLT， 
我 们 就 无 法 在 命令 行 窗口 中 继续 输入 命令 了 ， 这 多 
无 聊 啊 。 如 条 应 用 程序 结束 后 不 执行 HLT， 而 是 能 
返回 操作 系统 就 好 了 。 


怎样 才能 实现 这 样 的 设想 呢 ? 没 错 ， 只 要 将 应 用 程 
序 中 的 HLT 改 成 RET， 束 可 以 返回 了 。 相 应 地 ， 操 
作 系 统 这 边 也 需要 用 CALL 来 代替 JMP 启 动 应 用 程 
序 才 对 。 虽 说 是 CALL， 不 过 因为 要 调用 的 程序 位 
于 不 同 的 段 ， 所 以 实际 上 应 该 使 用 far-CALL， 因 此 
应 用 程序 那 边 也 应 该 使 用 RETF。 好 ， 我 们 的 方针 
己 经 明确 了 。 


C 语 言 中 没有 用 来 执行 far-CALL 的 命令 ， 我 们 只 好 
来 创建 一 个 farcall 函 数 ， 这 个 水 数 和 farjmp 大 同 小 
Ey 

JF o 


本 次 的 naskfunc.nas 节 选 


_farcall: ; void farcall(int eip, int cs); 


CALL FAR [ESP+4] ; eip, cs 
RET 


然后 ， 我 们 还 要 把 hlt 命 令 的 处 理 改 为 调用 farcall。 


本 次 的 console.c 节 选 


void cmd_hlt(struct CONSOLE *cons, int *fat) 


CRH ) 
if (finfo != @) { 
/* 找 到 文件 的 情况 */ 
CRH ) 


farcall(@, 1003 * 8);  /* 这 里 ! */ 
CHH) 
} else { 
/* 没 有 找到 文件 的 情况 */ 
CHH) 


} 
CFHK) 


最 后 我 们 还 要 改写 一 下 应 用 程序 hltnas， 把 HLT 换 
成 RETF 残 可 以 了 。 
本 次 的 hlt.nas (第 1 部 分 ) 


[BITS 32] 
MOV AL, 'A' 


CALL 2*8: 0xbe3 
RETF 


好 ， 完 工 了 哦 。 我 们 来 “make run” 一 下 ， 然 后 运 


行 “hit” Í 


I? qemu.exe XfF1EM S, eA bug (SKR 
RAINE Y JILAT TO 。 


TABERE? 啊 ， 明 白 了 。 由 于 我 们 改写 了 操作 系 
统 的 代码 ， 导 致 asm_cons_putchar 的 地 址 发 生 了 变 
化 。 重 新 查看 bootpack.map， 我 们 发 现 地 址 变 成 了 
这 样 : 

因此 ， 我 们 把 应 用 程序 修改 一 下 。 


本 次 的 hlt.nas (第 2 部 分 ) 


[BITS 32] 
MOV AL,'A' 
CALL 2*8: 0xbe8 
RETF 


好 ， 改 完了 ， 再 试 试看 。“make ru”, “ht, A 
Re? GE! MINT! 


心情 激动 ， 于 是 运行 了 3 次 hlt 
趁 热 打铁 ， 我 们 再 来 个 新 的 尝试 : 显示 “hello”。 


本 次 的 hlt.nas (第 3 部 分 ) 


[BITS 32] 
MOV AL,'h' 
CALL 2*8: 0xbe8 
MOV AL, 'e' 
CALL 2*8: 0xbe8 
MOV AL,'1' 


CALL 2*8:0xbe8 
MOV AL,'1' 
CALL 2*8:O0xbe8s 
MOV AL,'o' 
CALL 2*8:Oxbe8 
RETF 


SWFA E> Ee? EY, KEKR CE) 
我 们 运行 一 下 试 试 看 ， 结 果 如 下 。 


你 好 ! 


话说 回来 ， 现 在 这 个 应 用 程序 已 经 和 当初 “hlt* 这 个 
名 字 完 全 对 不 上 写 了 ， 看 来 我 们 得 赶快 给 它 改 改名 
F SM. 


5 不 随 操作 系统 版 本 而 改变 的 
API (harib17e ) 


所 以 说 我 们 又 要 改写 console.c 了 。 等 等 ， 如 果 修 改 
了 操作 系统 的 代码 ， 电 不 是 _asm_cons_putchar 的 地 
址 也 会 像 上 次 那样 发 生变 化 ?难道 说 每 次 我 们 修改 
操作 系统 的 代码 ， 都 得 把 应 用 程序 的 代码 也 改 一 
Wa? XA PRIS o 


里 说 确实 有 的 操作 系统 版 本 一 改变 ， 应 用 程序 也 得 
重新 编译 ， 不 过 还 有 些 系统 即便 版 本 改变 ， 应 用 程 
序 也 照样 可 以 运行 ， 大 家 觉得 哪 种 更 好 呢 ? 


我 们 的 “ 纸 娃娃 系统 ”也 需要 解决 这 个 问题 ， 把 这 个 
搞定 之 后 ， 我 们 再 考虑 命名 的 事 。 


解决 这 个 问题 的 方法 其 实 有 很 多 ， 这 里 先 为 大 家 介 


ZH AN 


CPU 中 有 个 专门 用 来 注册 函数 的 地 方 ， 也 许 大 家 一 
下 子 想 不 起 来 ， 笔 者 说 的 其 实 是 中 断 处 理 程序 。 在 
前 面 我 们 曾经 做 过 “ 当 发 生 IRQ-1 的 时 候 调 用 这 个 函 
数 ” 这 样 的 设置 ， 大 家 还 记得 吗 ? 这 是 在 IDT 中 设置 


的 。 


反正 IRQ 只 有 0 一 15， 而 CPU 用 于 通知 异常 状态 的 中 
盯 最 多 也 只 有 32 种 ， 这 些 都 在 CPU 规格 说 明 书 中 有 
明确 记载 。 不 过 ，IDT 中 却 最 多 可 以 设置 256 个 函 
数 ， 因 此 还 剩 下 很 多 没有 使 用 的 项 。 


我 们 的 操作 系统 从 这 些 项 里 面 借 用 一 个 的 话 ，CPU 
应 该 也 不 会 有 什么 意见 的 吧 。 上 所 以 我 们 束 从 IDT 中 
找 一 个 空 用 的 项 来 用 一 下 。 好 ， 我 们 就 选 0x40 号 

(其实 0x30 一 0xff 都 是 空 亲 的， 只 要 在 这 个 范围 内 
任意 一 个 都 可 以 ) ， 并 将 _asm_cons_putchar 注 册 在 
iH. 


本 次 的 dsctbl.c 节 选 


void init_gdtidt(void) 


CHS ) 

/* IDT 的 设置 */ 

set_gatedesc(idt + 0x20, (int) asm_inthandler20, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x21, (int) asm_inthandler21, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + @x2c, (int) asm_inthandler2c, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x40, (int) asm_cons_putchar, 2 
* 8, AR_INTGATE32); ”/* 这 里 ! */ 


return; 


这 样 一 来 ， 我 们 只 要 用 INT 0x40 来 代替 原来 的 
CALL 2*8:0xbd14t P] LA ii] HY_asm_cons_putchar J , 
很 方便 吧 ? 我 们 来 修改 一 下 应 用 程序 吧 。 


本 次 的 hltnas 


[BITS 32] 


于 是 程序 变 成 了 这 个 样子 。 看 到 这 里 ， 直 觉 敏锐 的 
读者 也 许 已 经 发 现 了 “ 跟 调 用 BIOS 的 时 候 差 不 多 
嘛 ......”。 没 错 ， 虽 然 INT 号 不 同 ， 但 通过 INT 方 式 
调用 这 一 点 的 确 是 非常 类 似 。 说 起 来 ，MS-DOS 的 
API 采 用 的 也 是 这 种 INT 方 式 。 


另外 ， 使 用 INT 指 令 来 调用 的 时 候 会 被 视 作 中 上 灯 来 
处 理 ， 用 RETF 古 无 法 返回 的 ， 需 要 使 用 IRETD 指 
令 。 因 此 ， 我 们 还 要 改写 _asm_cons_putchar。 


本 次 的 naskfunc.nas 节 选 


_asm_cons_putchar: 

STI pie! 

PUSH 1 

AND EAX, Oxf Ff ; 将 AH 和 EAX 的 高 位 置 6， 将 EAX 置 
为 已 存 入 字符 编码 的 状态 


PUSH EAX 
PUSH DWORD [@x@fec] ; 读 取 内 存 并 PUSH 该 值 
CALL _cons_putchar 

ADD ESP,12 ; 丢弃 栈 中 的 数据 

IRETD ; 这 里 ! 


用 INT 调 用 时 ， 对 于 CPU 来 说 相当 于 执行 了 中 断 处 
理 程 序 ， 因 此 在 调用 的 同时 CPU 会 自动 执行 CLI 指 
令 来 禁止 中 断 请 求 。 但 我 们 只 是 用 它 来 代 蔡 CALL 
使 用 ， 这 种 做 法 束 显 得 国 蛇 添 足 了 。 我 们 可 不 想 看 
到 “API 处 理 时 键盘 无 法 输入 ”这 样 的 情况 ， 因 此 需 
要 在 开头 添加 一 条 STI 指 令 。 


其 实 ， 对 于 这 种 问题 ， 一 般 来 说 可 以 通过 在 注册 到 
IDT 时 修改 设置 来 禁 song ugly eo 
ASO, WALES ( 笑 ) 。 话 说 ,今天 笔者 貌 
似 懒 到 家 了， 得 反省 一 下 。 


好 了 ， 修 改 完 成 ， 我 们 来 “make run” 一 下 ， 结 果 如 


fe) 


fharibi7e 


正常 显示 “你 好 ” 
咖 ， 很 顺利 呢 。 而 且 应 用 程序 还 比 之 前 小 了 。 


harib17d 的 hlt.hrb: 46543 


harib17e 的 hlt.hrb: 215477 


你 看 ， 用 这 种 方法 能 把 应 用 程序 缩小 ， 历 害 吧 ?这 
是 因为 far-CALL 指 令 需 要 7 个 字 节 而 INT 指 令 只 需要 
2 个 字 节 的 缘故 。 这 次 修改 还 真是 一 箭 双 让 呢 。 


6 为 应 用 程序 自由 命名 (harib17f) 


现在 我 们 的 应 用 程序 只 能 用 hlt 这 个 名 字 ， 下 面 我 们 
来 让 系统 支持 其 他 应 用 程序 名 ， 这 次 我 们 束 用 hello 
吧 。 将 console.c 中 的 “hlt 改 成 *hello”， 好 啦 ， 这 样 
我 们 就 可 以 用 hello 这 个 应 用 程序 了 ..……… IE! 别 生气 
别 生 气 ， 开 个 玩笑 而 已 ( 笑 ) 。 


好 吧 ， 我 们 先 来 改写 cons_runcmd。 


本 次 的 console.c 节 选 


void cons_runcmd(char *cmdline, struct CONSOLE *cons, 
int *fat, unsigned int memtotal) 


{ 


if (strcmp(cmdline, "mem") == @) { 
cmd_mem(cons, memtotal); 
} else if (strcmp(cmdline, "cls") == @) { 
cmd_cls(cons) ; 
} else if (strcmp(cmdline, "dir") == @) { 
cmd_dir(cons) ; 
} else if (strncmp(cmdline, "type ", 5) == 0) { 
cmd_type(cons, fat, cmdline); 
} else if (cmdline[@] != 0) {  /* 从 此 开始 */ 
if (cmd_app(cons, fat, cmdline) == @) { 
/*# 不 是 命令 ， 不 是 应 用 程序 ， 也 不 是 空 行 */ 
putfonts8_asc_sht(cons->sht, 8, cons- 
>cur_y, COL8 FFFFFF, COL8 9@@000, "Bad command.", 12); 
cons_newline(cons); 
cons_newline(cons); 


} 
} /* 到 此 结束 */ 


return; 


总 结 一 下 修改 的 地 方 ， 首 先是 去 抒 了 cmd_hlt， 并 创 
建 了 新 的 cmd_app。 这 个 函数 用 来 根据 命令 行 的 内 

容 判 断 文 件 名 ， 并 运行 相应 的 应 用 程序 ， 如 果 找 到 
文件 则 返回 1， 没 有 找到 文件 则 返回 0。 


现在 程序 的 工作 过 程 是 : 当 输 入 的 命令 不 是 mem、 
cls、dir、type 其 中 之 一 时 ， 则 调用 cmd_app， 如 果 
返回 0 则 作为 错误 处 理 。 这 样 应 该 能 行 。 


我 们 在 cmd_hlt 的 基础 上 稍 作 修改 后 得 到 cmd_app 函 
数 ， 具 体内 容 如 下 。 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


{ 


struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

struct FILEINFO *finfo; 

struct SEGMENT _DESCRIPTOR *gdt = (struct 
SEGMENT_DESCRIPTOR *) ADR_GDT; 

char name[18], *p; 

int i; 


/* 根 据 命 令 行 生成 文件 名 */ 


for (i = ð; i < 13; i++) { 
if (cmdline[i] <= ' ') { 
break; 
} 
name[i] = cmdline[i]; 
} 
name[i] = 0; /* 和 暂且 将 文件 名 的 后 面 置 为 6*/ 


人 
finfo = file_search(name, (struct FILEINFO *) 
(ADR_DISKIMG + 0x002600), 224); 
if (finfo == © && name[i -1]!= '.') { 
/*# 由 于 找 不 到 文件 ， 故 在 文件 名 后 面 加 上 “.hrb” 后 重新 寻 


ca 
name[i SS ray 
name[i + 1] = 'H'; 
name[i + 2] = 'R'; 
name[i + 3] = 'B'; 


name[i + 4] = ð; 
finfo = file_search(name, (struct FILEINFO *) 
(ADR_DISKIMG + 0x002600), 224); 


} 


if (finfo != 0) { 

/* 找 到 文件 的 情况 */ 

p = (char *) memman alloc 4k(memman, finfo- 
>size); 

file loadfile(finfo->clustno, finfo->size, p, 
fat, (char *) (ADR_DISKIMG + @x@@3e@@) ) ; 

set_segmdesc(gdt + 1003, finfo->size - 1, (int) 
p, AR_CODE32_ER); 

farcall(@, 1003 * 8); 

memman_free_4k(memman, (int) p, finfo->size) ; 

cons_newline(cons) ; 

return 1; 


} 
/* 没 有 找到 文件 的 情况 */ 


return ð; 


我 们 在 程序 上 动 了 一 点 脑筋 ， 使 得 无 论 输 入 “hle 还 
是 “hlt.hrb” 都 可 以 启动 “hlt.hrb”。 因 为 在 Windows 命 
令 行 窗 口中 ， 不 管 加 不 加 后 面 的 “.exe” 都 可 以 运行 
程序 ， 所 以 我 们 就 借鉴 了 这 个 设计 。 


ERB TELS, FANT Shalt. nas 改 名 为 hello. nas， 做 后 
汇编 生成 hello.hrb。 接 下 来 “make run”， 用 dir 命 令 
确认 一 下 磁盘 中 的 内 容 ， 再 输入 “hello”。 莪 ! 出 来 
J! RJJ! 


harib17f 


H= 你 好 ! 


HTML, ANSE! 我 们 再 来 输入 “hlt”* 试 一 下 ， 这 个 文件 
现在 已 经 没有 了 ， 会 不 会 报错 昵 ? 另外 ， 如 果 输 


入 “hello.hrb” 能 人 否 正 常 运行 呢 ? 我 们 来 试 试看 。 


E > 


fharibi7t 


the SX 


出 现 错误 信息 了 ， 加 上 扩展 名 的 情况 也 OK， 太 完 
KS o 


7 当心 寄存 器 (harib17g) 


hello.hrb 的 大 小 现在 是 21 个 字 节 ， 能 不 能 再 让 它 变 
小 点 昵 ? 我 们 做 了 如 下 修改 ， 用 了 一 个 循环 。 


本 次 的 hello.nas 


[INSTRSET "i486p"] 
[BITS 32] 


ECX,msg 
putloop: 

AL, [CS:ECX] 

AL,@ 

fin 

0x40 

ECX, 1 

putloop 


"hello" ,@ 


改 成 这 样 后 make 一 下 ，hello.hrb 变 成 了 26 个 字 节 ， 
居然 还 大 了 5 个 字 节 ， 哎 ， 好 失望 。 不 过 ， 这 样 改 
也 有 好 处 ， 即 便 以 后 要 显示 很 长 的 字符 串 ， 程 序 也 
不 会 变 得 太 大 。 


马上 运行 一 下 看 看 。 


REIS? 


We? 为 喻 只 显示 出 一 个 h 呢 ?再 把 hello.nas 仔 细 检 查 
一 裔 ， 也 没 发 现 什么 不 对 劲 的 地 方 啊 ..…...…. 


既然 应 用 程序 没 问 题 ， 那 问题 肯定 出 在 操作 系统 号 
上 。 不 过 ， 到 底 是 哪里 有 问题 呢 ? 刚刚 找到 了 点 届 
目 ， 我 们 给 _asm_cons_putchar 和 添上 2 行 代 码 ， 束 是 
PUSHAD 和 POPAD。 


本 次 的 naskfunc.nas 世 选 


_asm_cons_putchar: 


STI 

PUSHAD ; 这 里 ! 

PUSH 1 

AND EAX, Oxff ; 将 AH 和 EAX 的 高 位 置 9， 将 EAX 置 
为 已 存 入 字符 编码 的 状态 

PUSH EAX 


PUSH DWORD [@x@fec] ; 读 取 内 存 并 PUSH 该 值 
CALL _cons_putchar 


ADD ESP ,12 ; 将 栈 中 的 数据 丢弃 
POPAD ; 这 里 ! 
IRETD 


为 什么 要 这 么 改 我 们 待 会 儿 再 讲 ， 先 来 试验 一 下 
R 


haribl?g 


R, AI! 


果然 是 这 个 问题 呀 。 那 为 什么 会 想到 加 上 PUSHAD 
和 POPAD 了 呢 ? 因为 笔者 推测 这 有 可 能 是 INT 0x40 之 
后 ECX 寄 存 右 的 值 发 生 了 变化 所 导致 的 ， 应 该 是 
_cons_putchar 改 动 了 ECX 的 值 。 因 此 ， 我 们 加 上 了 
PUSHAD 和 POPAD 确 保 可 以 将 全 部 寄存 器 的 值 还 
原 ， 这 样 程序 就 能 正常 运行 了 。 


8 用 API 显 示 字 符 串 (harib17h) 


从 实际 的 应 用 程序 开发 角度 来 说 ， 能 显示 字符 串 的 
APH Lk} 只 能 显示 单个 字符 的 API 要 来 的 方 便 ， 因 为 

-次 显示 一 串 字 符 的 情况 比 一 次 只 显示 一 个 字符 的 
情况 多 得 多 


从 其 他 操作 系统 的 显示 字符 串 的 API 来 看 ， 一 般 有 
两 种 方式 : TARE ANE EAE HE BSE FE SO 
则 结束 ; 为 一 种 是 完 指 定好 要 显示 的 字符 串 的 长 度 
FEL Se ZN o 我 们 到 底 要 用 哪 一 种 呢 ? 再 三 考虑 之 后 ， 
贫 心 的 笔者 决定 在 “ 纸 娃娃 系统 ”上 同时 实现 两 种 方 
TCR) 


本 次 的 console.c 节 选 


void cons_putstr@(struct CONSOLE *cons, char *s) 


for (; *s != ð; s++) { 
cons_putchar(cons, *s, 1); 

} 

return; 


} 


void cons_putstr1(struct CONSOLE *cons, char *s, int 1) 
{ 
int i; 
for (i = ð; i < 1; i++) { 
cons_putchar(cons, s[i], 1); 


} 


return; 


哦 ， aS 有 了 这 个 函数 ， 束 可 以 简化 mem、dir、 


type 这 
=p 


ILS WRH, CELS, EKAR 


本 次 的 console.c 节 选 


void cons_runcmd(char *cmdline, struct CONSOLE *cons, 
int *fat, unsigned int memtotal) 


{ 


/* 这 


if (strcmp(cmdline, "mem") == 0) { 
cmd_mem(cons, memtotal); 

} else if (strcmp(cmdline, "cls") == @) { 
cmd_cls(cons); 

} else if (strcmp(cmdline, "dir") == 0) { 
cmd_dir(cons); 

} else if (strncmp(cmdline, "type ", 5) == 0) { 
cmd_type(cons, fat, cmdline); 

} else if (cmdline[6] != ð) { 
if (cmd_app(cons, fat, cmdline) == @) { 

/*# 不 是 命令 ， 不 是 应 用 程序 ， 也 不 是 空 行 */ 


cons_putstr@(cons, "Bad command.\n\n"); 


ty 
} 

} 

return; 


void cmd_mem(struct CONSOLE *cons, unsigned int 
memtotal) 


{ 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

char s[6Q]; /* 从 此 开始 */ 

sprintf(s, "total %dMB\nfree %dKB\n\n", memtotal 
/ (1024 * 1024), memman_total(memman) / 1024); 


cons_putstr@(cons, s); /* 到 此 结束 */ 
return; 

} 

void cmd dir(struct CONSOLE *cons) 

{ 


struct FILEINFO *finfo = (struct FILEINFO *) 
(ADR_DISKIMG + @x0026@@) ; 

int i, j; 

char s[30]; 


for (i = ð; i < 224; i++) { 
if (finfo[i].name[8] == @xee@) { 
break; 
} 
if (finfo[i].name[Q] != @xe5) { 
if ((finfo[i].type & 0x18) == ð) { 
sprintf(s, "filename.ext %7d\n", 
finfo[i].size); 
for (j= 
s[j] 
} 


s[ 9] = finfo[i].ext[0]; 
s[10] = finfo[i].ext[1]; 
s[11] = finfo[i].ext[2]; 
cons_putstr@(cons, s); /# 这 里 ! */ 


Ə; j < 8; j++) { 
= finfo[i].name[j]; 


} 


cons_newline(cons) ; 
return; 


} 


void cmd_type(struct CONSOLE *cons, int *fat, char 
*cmdline) 


{ 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

struct FILEINFO *finfo = file_search(cmdline + 5, 
(struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); 


char *p; 
if (finfo != 0) { 
/* 找 到 文件 的 情况 */ 


p = (char *) memman alloc 4k(memman, finfo- 
>size); 

file loadfile(finfo->clustno, finfo->size, p, 
fat, (char *) (ADR_DISKIMG + @x@@3e@@) ) ; 

cons _putstri(cons, p, finfo->size); /* 这 里 ! */ 

memman_free_4k(memman, (int) p, finfo->size) ; 

} else { 

/* 没 有 找到 文件 的 情况 */ 

cons_putstrð(cons, "File not found.\n"); /* 这 
时 


cons_newline(cons) ; 
return; 


(SAV T1247, FP ARE FPR ROE Sy AN 
TB? 不 过 不 管 怎 么 说 也 算是 个 值得 高 兴 的 事 吧 。 


a} 


在 上 面 字 符 串 中 我 们 使 用 了 nm* 这 个 新 的 符 写 ， 这 


里 来 讲解 一 下 。 在 C 语 言 中 ，“\* 这 个 字 和 从 有 特殊 的 
含义 ， 用 来 表示 一 些 特殊 字符 。 这 里 出 现 的 pn” 代 
表 换 行人 符 ， 即 0x0a， 也 就 是 说 用 2 个 字符 来 表示 1 个 
字 节 的 信息 ， 有 点 怪 吧 。 此 外 还 有 “^\t*， 它 代表 制 
表 和 从 ， 即 0x09。 顺 便 说 一 下 ， 换 行 从 9* 之 所 以 
用 “n”， 是 因为 它 是 “new line” 的 缩写 。 


好 ， 我 们 已 经 有 了 cons_putstr0 和 cons_putstr1， 那 么 
怎样 把 它们 变 成 API 呢 ? 最 简单 的 方法 就 是 像 显 示 
单个 字符 的 API 那 样 ， 分 配 INT 0x41 和 INT 0x42 来 
调用 这 两 个 函数 。 不 过 这 样 一 来 ， 只 能 设置 256 个 
项 目的 IDT 很 快 就 会 被 用 光 。 


既然 如 此 ， 我 们 就 借鉴 BIOS 的 调用 方式 ， 在 寄存 器 
中 存 入 功能 号 ， 使 得 只 用 1 个 INT 就 可 以 选择 调用 不 
同 的 函数 。 在 BIOS 中 ， 用 来 存放 功能 号 的 寄存 器 一 
般 是 AH， 我 们 也 可 以 照搬 ， 但 这 样 最 多 只 能 设置 
256 个 API 函 数 。 而 如 果 我 们 改 用 EDX 来 存放 功能 
号 ， 就 可 以 设置 多 达 42 亿 个 API 函 数 ， 这 样 总 不 会 
不 够 用 了 吧 。 


功能 写 暂 时 按 下 和 面 那 样 划 分 ， 寄 存 强 的 用 法 也 是 随 
意 设 定 的 ， 如 果 不 襄 欢 的 话 尽 省 修 改 就 好 哦 。 


功能 号 1..…. 显 示 单 个 字符 CAL = 字符 编码 ) 


VIRE S20 显示 字符 串 0 (EBX = 字符 串 地 址 ) 
U 8 seca 显示 字符 串 1 (EBX = 字符 串 地 址 ， 


ECX = FRKE) 

接 下 来 我 们 将 _asm_cons_putchar 改 写成 一 个 新 的 函 
本 次 的 naskfunc.nas 节 选 

_asm_hrb_api: 


STI 
PUSHAD ; 用 于 保存 寄存 器 值 的 PUSH 


PUSHAD ; 用 于 疝 hrb_api 传 值 的 PUSH 


CALL _hrb_api 
ADD ESP, 32 
POPAD 

IRETD 


这 个 函数 非常 短 ， 因 为 我 们 想 尽 量 用 C 语 言 来 编写 
API 处 理 程序 ， 而 且 这 样 各 位 读者 也 更 容易 理解 。 


用 C 语 言 编 写 的 API 处 理 程序 如 下 。 


本 次 的 console.c 节 选 


void hrb_api(int edi, int esi, int ebp, int esp, int 


ebx, int edx, int ecx, int eax) 


{ 
struct CONSOLE *cons = (struct CONSOLE *) *((int *) 
OxOFfec) ; 
if (edx == 1) { 
cons _putchar(cons, eax & Oxff, 1); 
} else if (edx == 2) { 
cons_putstr@(cons, (char *) ebx); 
} else if (edx == 3) { 
cons_putstri(cons, (char *) ebx, ecx); 


} 


return; 


HA, WBE PE PEL. FARI T AST E E 

PUSHAD 的 ) 顺序 写 的 ， 如 果 在 _asm_hrb_api 中 不 用 

I 而 是 一 个 一 个 分 别 去 PUSH 的 话 ， 那 当 
然 可 以 按照 自己 喜欢 的 顺序 来 。 


啊 ， 对 了 对 了 ， 我 们 还 得 改 一 下 IDT 的 设置 ， 将 
INT 0x40 改 为 调用 _asm_hrb_api。 


void init_gdtidt(void) 


CHH) 


/* IDT 设 定 */ 

set_gatedesc(idt + @x2@, (int) asm_inthandler2@, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x21, (int) asm_inthandler21, 2 
* 8, AR_INTGATE32); 


set_gatedesc(idt + @x2c, (int) asm_inthandler2c, 2 
* 8, AR_INTGATE32); 


set_gatedesc(idt + 0x40, (int) asm_hrb_api, 2 
* 8, AR_INTGATE32); /* 这 里 ! */ 


return; 


这 样 改写 之 后 ， 现 在 的 hello.nas 束 无 法 正常 运行 
了 ， 因 为 我 们 需要 往 EDX 里 面 存 入 1 才能 调用 相应 
的 API。 虽 说 我 们 加 上 一 条 加 EDX 中 存 入 1 的 指令 就 
可 以 ， 不 过 既然 已 经 号 好 了 cons_putstr0， 那 融和 干脆 
用 这 个 新 的 API 写 一 个 hello2.nas 吧 。 


本 次 的 hello2.nas 


[INSTRSET "i486p" |] 
[BITS 32] 
MOV EDX, 2 
MOV EBX,msg 
INT 0x40 
RETF 


DB "“hello",@ 


IE, IPE SMS J, make 了 一 下 ， 只 有 19 个 字 
市 ， 创 造 了 最 小 文件 纪录 哦 。 


好 ， 完 工 了 了， 赶紧 “make run”， 运 行 “hello2” 试 试 


IR? 什么 都 没 显 示 出 来 ? 


WE... BURT, BABERE... ? 今天 已 经 很 
累 了 ， 脑 子 都 不 转 了 ， 我 们 还 是 明天 再 来 找 原 因 
吧 。 总 之 ， 我 们 先 将 这 个 放 在 一 边 ， 在 以 前 的 
hello.nas 中 加 一 条 EDX = 1; 试 试看 吧 。 


本 次 的 hello.nas 


[INSTRSET "i486p"] 
[BITS 32] 
MOV ECX, msg 

EDX,1 Eo 

putloop: 
AL, [CS:ECX] 
AL ,9 
fin 
0x40 
ECX,1 
putloop 


"hello" ,@ 


看 看 这 次 怎么 样 。“make run” 试 验 一 下 。 


WE, RAHURI T 
成 功 了 ， 总 算 稍 稍 松 了 口气 。 
今天 我 们 在 最 后 的 最 后 碰 了 个 大 钉子 〈 就 是 


hello2) ， 心 情 有 点 不 严 ， 不 过 已 经 困 得 不 行 了 ， 
就 先 到 这 吧 ! 大 家 明天 见 。 


第 21 天 你 护 操 作 系 统 


。 攻 元 难题 一 一 字符 串 显示 API (harib18a) 
。 用 C 语 言 编 写 应 用 程序 (harib18b) 

。 保 护 操 作 系 统 (1) Charib18c) 

。 保护 操作 系统 (2) (harib18d) 

。 对 异常 的 支持 Charib18e ) 

。 保 护 操 作 系 统 (3) (harib18f) 

。 保 护 操 作 系 统 (4) Charib18¢g) 


1 攻克 难题 一 字符 串 显 示 
API (harib18a ) 


早 安 ， 大 家 精神 还 好 吗 ? 笔者 有 点 没 睡 够 ， 不 过 今 
天 我 们 要 继续 加 油 哦 。 


先 总 结 一 下 昨天 最 后 过 到 的 情况 : hello.hrb 运 行 正 
毅 ， 但 hello2.hrb 却 出 现 异 第 。 为 什么 会 这 样 呢 ? 想 
了 一 下 ， 应 该 是 内 存 段 邦 的 祸 。 


显示 单个 字符 时 ， 我 们 用 [CS:ECXI] 的 方式 特意 指定 
JCS (MSR ar feat) ， 因 此 可 以 成 功 读 取 msg 的 
内 容 。 但 在 显示 字符 串 时 ， 由 于 无 法 指定 段 地 址 ， 
程序 误 以 为 是 DS 而 从 完全 错误 的 内 存 地 址 中 读 取 了 
M KHARE TERTA mie w 
示 出 来 。 


因此 ， 我 们 需要 在 API 中 做 个 改动 ， 使 其 能 够 将 应 
用 程序 传递 的 地 址 解释 为 代码 段 内 的 地 址 。 


hrb_api 并 不 知道 代码 段 的 起 始 位 置 位 于 内 存 的 哪个 
地 址 ， 但 cmd_app 应 该 知道 ， 因 为 当初 设置 这 个 代 
但 段 的 正 是 cmd_app。 


由 于 我 们 没有 办 法 从 cmd_app 向 hrb_api 直 接 传递 数 
据 ， 因 此 只 好 又 在 内 存 里 找 个 地 方 存放 一 下 了 。 
0xfec 这 个 位 置 之 前 已 经 用 过 了 ， 这 次 我 们 放 在 它 前 
面 的 0xfe8 好 了 了。 


int cmd app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


CHH) 


if (finfo != 0) { 

/* 找 到 文件 的 情况 */ 

p = (char *) memman alloc 4k(memman, finfo- 
>size); 

*((int *) @xfe8) = (int) p; /* 这 里 ! */ 

file loadfile(finfo->clustno, finfo->size, p, 
fat, (char *) (ADR_DISKIMG + @x@Q@3e@@) ) ; 

set_segmdesc(gdt + 1003, finfo->size - 1, (int) 
p, AR_CODE32_ER); 

farcall(@, 1003 * 8); 

memman_free_4k(memman, (int) p, finfo->size) ; 

cons_newline(cons) ; 

return 1; 


} 
/* 没 有 找到 文件 的 情况 */ 
return ð; 


void hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 
{ 
int cs base = *((int *) Oxfe8); /* 这 里 ! */ 
struct CONSOLE *cons = (struct CONSOLE *) *((int *) 
exefec); 


if (edx == 1) { 
cons_putchar(cons, eax & Oxff, 1); 
} else if (edx == 2) { 
cons_putstr@(cons, (char *) ebx + cs_base); 
(oR Ay 
} else if (edx == 3) { 
cons_putstri(cons, (char *) ebx + cs_base, 
ecx); PELET y 
} 


return; 


= 这 个 样子 ， 应 该 没有 什么 难点 ， 所 以 融 不 讲解 


T, ERAM P AA RAIF Hhello2 
能 不 能 成 功 显示 出 字符 串 。 


| taska E 
[harib18a 


显示 出 来 了 ! 
成 功 了 ， 看 来 果然 是 内 存 段 搞 的 欣 ， 问 题解 决 ! 


2 用 C 语 言 编 与 应 用 程序 
Charib18b ) 


在 此 之 前 ， 我 们 的 应 用 程序 都 是 用 汇编 语言 编写 
的 ， 因 为 用 汇编 语言 没有 使 用 不 了 的 指令 ， 而 且 还 
可 以 在 寄存 强 层 面 上 实现 精确 的 操作 。 不 过 一 二 用 
汇编 语言 写 应 用 程序 实在 太 累 ， 要 是 能 用 C 语 言 就 
省 事 多 了 ， 比 如 像 下 面 这 样 : 


本 次 的 a.c 


void api_putchar(int c); 


void HariMain(void) 


api_putchar('A'); 
return; 


} 


CGE: 这 里 的 函数 名 HariMain 可 能 会 让 大 家 联想 到 
bootpack.c， 但 其 实 两 者 并 没有 任何 关系 。 用 Ci 语言 
编写 程序 时 ， 开 始 执 行 的 入 口 函 数 束 叫 HariMain。 
这 里 的 a.c 和 bootpack.c 是 完全 独立 编译 的 应 用 程 
pe 


好 ， 让 我 们 开始 吧 。 要 实现 C 语 言 编 写 应 用 程序 ， 
需要 在 应 用 程序 方面 创建 一 个 api_putchar 疯 数 。 注 
意 ， 这 个 函数 不 是 创建 在 操作 系统 中 。api_putchar 
国 数 需要 用 C 语 言 来 调用 ， 功 能 是 同 EDX 和 AL 赋 
值 ， 并 调用 INT 0x40。 也 许 这 样 说 大 家 还 不 太 明 
日 ， 看 看 下 面 的 程序 应 该 马上 就 能 理解 了 。 


本 次 的 a_nask.nas 


[FORMAT "WCOFF"] ; 生成 对 象 文件 的 模式 
[INSTRSET "i486p"] ; 表示 使 用 486 兼 容 指 令 集 
[BITS 32] ; 生成 32 位 模式 机 器 语言 
[FILE "a_nask.nas"] ; 源 文件 名 信息 


GLOBAL _api putchar 
[SECTION .text] 


_api_putchar: 3 void api_putchar(int c); 
MOV EDX,1 
MOV AL, [ESP+4] ; c 
INT 0x40 
RET 


这 里 的 api_putchar 需 要 与 ac 的 编译 结果 进行 连接 ， 
因此 我 们 使 用 对 象 文 件 模式 。 


然后 ，Makefile 也 需要 修改 一 下 。 


本 次 的 Makefile 节 选 


a.bim : a.obj a_nask.obj Makefile 
$(OBJ2BIM) @$(RULEFILE) out:a.bim map:a.map a.obj 
a_nask.obj 


a.hrb : a.bim Makefile 
$(BIM2HRB) a.bim a.hrb @ 


这 里 我 们 借鉴 了 生成 bootpack.hrb 时 的 方法 。 话 说 回 
来 ， 当 时 我 们 并 没有 详细 讲解 为 什么 要 用 这 样 的 方 
式 生 成 bootpack.hrb， 关 于 这 一 点 和 后 我 们 会 讲 到 。 


我 们 来 “make run”， 生 成 了 一 个 72 个 字 节 的 a.hrb。 
明明 只 显示 1 个 字符 ， 却 比 显示 5 个 字符 的 hello.hrm 
还 要 大 ， 真 郁 间 ， 不 过 因为 是 用 Ci 语言 编写 的 ， 这 
也 很 正常 。 接 着 我 们 在 命令 行 中 输入 “a” 来 运行 一 
下 ， 结 果 QEMU 没 反应 了， 貌似 程序 有 bug。 看 来 
用 C 语 言 编 写 应 用 程序 还 是 困难 重重 啊 。 


我 们 当然 不 能 就 这 样 放 莽 ， 在 这 里 我 们 来 变 个 神奇 
的 小 戏法 。 这 个 小 戏法 可 是 很 有 内 涵 的 哎 ， 不 过 和 暂 
WY SESE TK F 


修改 前 的 a.hrb 


+0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F 
0123456789ABCDEF 


mend D$..@.U..] 
000040 E9 DF FF FF FF @@ 60 66 


我 们 将 开头 的 6 个 字 节 蔡 换 成 *E8 16 00 00 00 CB”, 
检 换 后 束 变 成 了 这 样 : 
修改 后 的 a.hrb 
+0 +1 +2 +9 +A +B 
0123456789ABCDEF 
000000 E8 16 00 00 00 00 
00 00 E9 
E8 02 00 


CD 40 C3 


. 
000040 E9 DF FF 


KRG CFS 16 we iil Bs BS as HE IAMS 2 如果 用 只 


读 模 式 无 法 修改 内 容 ， 隔 的 时 间 太 久 已 经 全 忘 了 的 
同学 ， 请 好 好 回忆 一 下 。 


我 们 再 来 “make run” 一 下 ，a.hrb 居 然 可 以 正常 运行 
了 。 仪 仅 6 个 字 节 束 解 决 了 问题 ， 二 进 制 编辑 器 大 
厉害 了 ! 


fharib18b 


看 ， 运 行 成 功 了 
COLI 


现在 a.hrb 已 经 可 以 正常 运行 了 了， 那么 我 们 吏 来 讲 讲 
这 6 个 字 贡 小 戏法 的 原理 吧 。 其 实说 起 来 也 简单， 
这 6 个 字 节 其 实 就 相当 于 下 面 3 行 代码 用 nask 汇 编 之 
后 的 结果 。 

[BITS 32] 


CALL Q@x1b 
RETF 


也 就 是 先 调 用 0x1b 这 个 地 址 的 函数 ， 从 函数 返回 后 


再 执行 far-RET， 仅 此 而 已 。 


这 里 的 0xlb， 其 实 就 是 .hrb 文 件 中 HariMain 的 地 址 
(其 实 还 是 有 点 差别 的 ， 不 过 这 里 我 们 先 照 这 样 来 
讲 ) 。 如 果 我 们 回想 一 下 很 久之 前 的 内 容 ， 在 
asmhead.nas 中 ， 最 后 调用 bootpack.hrb 的 时 候 有 这 
样 一 句 : 


JMP DWORD 2*8:0x0000001b 


你 看 ， 这 里 也 是 0xlb， 一 样 的 。 

至 于 为 什么 还 需要 一 个 far-RET， 大 家 知道 吗 ? Al 
为 如 果 没 有 它 的 话 ， 程 序 结束 之 后 就 无 法 返回 到 命 
令 行 了 。 


现在 我 们 已 经 可 以 用 C 语 言 编写 应 用 程序 了 ， 为 了 
纪念 这 一 进步 ， 我 们 再 来 写 一 个 。 


本 次 的 hello3.c 


void api_putchar(int c); 


void HariMain(void) 


api_putchar(‘'h'); 
api_putchar(‘e'); 


api_putchar('1'); 
api_putchar('1'); 
api_putchar('o'); 
return; 


这 个 程序 也 使 用 了 api_putchar， 也 需要 a_nask.obj， 
因此 Makefile 要 这 样 写 。 


hello3.bim : hello3.obj a_nask.obj Makefile 
$(OBJ2BIM) @$(RULEFILE) out:hello3.bim 


map:hello3.map hello3.obj a_nask.obj 


hello3.hrb : hello3.bim Makefile 
$(BIM2HRB) hello3.bim hello3.hrb 6 


“make” 一 下 ， 生 成 了 一 个 正好 100 个 字 节 的 
hello3.hrb。 但 光 这 样 还 不 行 ， 我 们 得 把 那 6 个 字 节 
的 小 戏法 写 进 去 才能 正常 运行 。 


不 过 每 次 都 蔡 换 那 6 个 字 节 实在 是 太 麻 烦 了 ， 笔 者 
还 是 希望 “make run” 一 下 束 能 一 步 到 位 ， 所 以 我 们 
在 操作 系统 上 面 做 点 手脚 。 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


中略) 


if (finfo != 0) { 

/* 找 到 文件 的 情况 */ 

p = (char *) memman_alloc_4k(memman, finfo- 
>size); 

*((int *) Oxfe8) = (int) p; 

file loadfile(finfo->clustno, finfo->size, p, 
fat, (char *) (ADR_DISKIMG + @x@@3e@@) ) ; 

set_segmdesc(gdt + 1003, finfo->size - 1, (int) 
p, AR_CODE32_ER); 

if (finfo->size >= 8 && strncmp(p + 4, "Hari", 


4) == 6) {  /#* 从 此 开始 */ 


p[6] = 8xe8; 
p[1] = 0x16; 
p[2] = 0x00; 
p[3] = 0x00; 
p[4] = 0x00; 
p[5] = xcb; 
} /* 到 此 结 


束 */ 
farcall(@, 1003 * 8); 
memman_free_4k(memman, (int) p, finfo->size) ; 
cons_newline(cons) ; 
return 1; 


} 
/* 没 有 找到 文件 的 情况 */ 


return ð; 


凡是 通过 bim2hrb 生 成 的 hrb 文 件 ， 其 第 4 一 7 字 节 一 
定 为 “Hari”， 因 此 程序 通过 判断 第 4 一 7 字 节 的 内 
容 ， 将 读 取 的 数据 先进 行 修改 之 后 再 运行 。 这 样 一 


来 ， 不 需要 用 二 进 制 编辑 器 手工 修改 ， 程 序 应 该 也 
可 以 正常 运行 了 。 


我 们 来 试 试看 ， a 的 hello3.hrb 删 除 ， 然 
后 重新 “make run2” 一 下 。 哇 ， 成 功 啦 ! 


fharib18b 


不 用 二 进 制 编辑 占 也 能 运行 


3 保护 操作 系统 (1) Charib18c) 


接 下 来 我 们 匈 稍 微 侦 离 一 下 主线 ， 谈 一 谈 关 于 操作 
系统 你 护 的 话题 。 


操作 系统 需要 运行 各 种 应 用 程序 ， 而 这 些 应 用 程序 
有 可 能 是 操作 系统 开 及 者 编写 的 ， 也 有 可 能 是 
户 、 别 的 软件 开发 商 或 者 是 东 个 目 由 软件 作者 出 于 
善意 编写 的 。 然 而 ， 也 有 些 人 会 出 于 恶意 编写 一 些 
捣乱 的 应 用 程序 出 来 。 


最 近 大 家 都 下 载 并 安 半 了 很 多 目 由 软件 吧 ， 那 些 软 
件 的 作者 是 否 值得 信赖 呢 ? 大 多 数 人 往往 并 不 关心 
这 一 把， 但 某 些 情况 下 ， 下 载 的 软件 中 可 能 包含 痢 
电脑 病毒 (当然 ， 大 多 数 情 况 下 作者 并 非 有 意 为 
之 ， 而 是 作者 的 电脑 不 小 必 感 染 了 病毒 ， 导 致 及 布 
出 来 的 软件 也 感染 了 病毒 ) 。 


即便 没有 恶意 ， 应 用 程序 中 也 可 能 存在 pug， 而 且 
某 些 bug 可 能 会 对 操作 系统 造成 破坏 。 所 谓 对 操作 
系统 的 破坏 ， 严 重 程度 也 不 同 ， 比 如 擅 目 删除 重要 
文件 、 使 其 他 任务 的 运行 产生 寞 常 ， 或 者 造成 操作 
系统 死机 而 不 得 不 重新 局 动 等 等 。 无 论 如 何 ， 这 些 
祁 给 用 户 造 成 了 麻烦 。 


既然 操作 系统 需要 为 应 用 程序 的 运行 捉 供 文 持 ， 也 
束 必 须 考 虑 如 何 应 对 这 样 的 问题 。 如 末 应 用 程序 出 
了 问题 融会 破坏 操作 系统 的 话 ， 那 大 家 都 不 敢 用 下 
载 下 来 的 软件 了 《当然 ， 这 样 说 伟 张 了 些 ) 。 即 便 
是 目 己 编写 的 程序 ， 一 旦 有 了 bug 也 可 能 会 使 操作 
ABE AIBA, RSE AAAS. Ale, SRA 
微 伦 点 工夫 就 可 以 让 操作 系统 变 得 更 加 安全 ， 那 我 
们 没有 理由 不 这 样 做 。 


值得 庆幸 的 是 ， 我 们 所 使 用 的 x86 架 构 CPU 为 我 们 
提供 了 保护 操作 系统 的 功能 ， 只 要 我 们 学 会 运用 这 
些 功能 完 普 操作 系统 的 安全 性 ， 束 可 以 最 大 限度 地 
保护 操作 系统 。 我 们 的 目标 是 : 没有 漏洞 ! 


CLLD 
Ew RRK TR LY) BE FF -o 


本 次 的 crackl.c 


void HariMain(void) 


*((char *) @x@@102600) = ð; 


return; 


} 


程序 的 功能 很 简单 ， 同 内 存 的 0x102600 地 址 写 入 一 
个 0， 虽 说 仅 此 而 已 ， 但 破坏 力 却 十 分 强大 。 这 人 么 


说 可 能 大 家 还 不 明日 ， 我 们 来 实际 操作 一 下 。 


首先 来 “make ran”， 然 后 输入 “crack1”...... 大 家 做 好 
心理 准备 没 ? ...... 按 下 回 车 。 


haribl8e 


破坏 后 的 状态 ? 


哎呀 ? SMT A eI EW OSA OAL UES 
坏 挥 了 ， 不 信和 的 话 输入 dir 试 试看 。 


重新 局 动 一 下 系统 束 恢 复 了 。 真 要 不 小 心 运行 了 这 
MIE, BRIAR Tao, BUT A RBA SF 
了 ， 这 种 程序 我 们 必须 在 它 产 生 和 破坏 作 用 之 前 强行 
终止 才 行 。 


4 保护 操作 系统 (2) (harib18d) 


到 底 怎 样 才 能 阻止 crack1.hrb 呢 ? 它 所 干 的 坏事 ， 其 
实 就 是 擅 目 访问 了 本 该 由 操作 系统 来 管理 的 内 存 空 
旧 。 我 们 需要 为 应 用 程序 提供 专用 的 内 存 空 age 并 

告诉 它们 “ 别 的 地 方 不 许 碰 哦 ?。 要 做 到 这 一 点 ， 
我 们 可 以 创建 应 用 程序 专用 的 数据 段 ， 并 在 应 用 程 
序 运 行 期 间 ， 将 DS 和 SS 指向 该 段 地 址 。 


BRE A 20 FA TASB... * 8 

操作 系统 用 数据 段 .…..1* 8 

应 用 程序 用 代码 段 ..……1003* 8 

应 用 程序 用 数据 段 ..……1004* 8 

(3 * 8 一 1002* 8 为 TSS 所 使 用 的 段 》 


至 于 应 用 程序 专用 的 内 存 空间 ， 好 吧 ， 残 先 分配 
64KB 吧 《上 反正 我 们 还 可 以 根据 需要 进行 调节 ) o 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


{ 


中略) 


char name[18], *p, *q; /* 这 里 ! */ 
CHH) 


if (finfo != 0) { 

/* 找 到 文件 的 情况 */ 

p = (char *) memman alloc 4k(memman, finfo- 
>size); 

q = (char *) memman_alloc_4k(memman, 64 * 
1024); frees] 

*((int *) Oxfe8) = (int) p; 

file loadfile(finfo->clustno, finfo->size, p, 
fat, (char *) (ADR_DISKIMG + @x@@3e@@) ) ; 

set_segmdesc(gdt + 1003, finfo->size - 1, (int) 
p, AR_CODE32_ER); 

set_segmdesc(gdt + 1004, 64 * 1024 - 1, (int) 
q, AR_DATA32_RW);  /* 这 里 ! */ 

CHH) 

start_app(@, 1003 * 8, 64 * 1024, 1004 * 8); 
A E7 

memman_free_4k(memman, (int) p, finfo->size); 

memman_free_4k(memman, (int) q, 64 * 1024); 
A HLL */ 

cons_newline(cons) ; 

return 1; 


} 
/* 没 有 找到 文件 的 情况 */ 


return ð; 


这 里 出 现 的 start_app 是 用 来 局 动 应 用 程序 的 函数 。 
之 前 我 们 只 是 执行 一 个 far-CALL， 现 在 我 们 还 要 设 
置 ESP 和 DS.SS。 


本 次 的 naskfunc.nas 节 选 


_start_app: 
esp, int ds); 


PUSHAD 
MOV 
MOV 
MOV 
MOV 
MOV 
CLI 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
STI 
PUSH 
PUSH 


PUSH(eip) 


3 


CALL 


; void start_app(int eip, int cs, int 


; F32 ay eas AE EB RF ER 


应 用 程序 结束 后 返回 此 处 


MOV 
CLI 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
STI 
POPAD 


EAX, [ESP+36] ; 应 用 程序 用 EIP 
ECX, [ESP+40] ; 应 用 程序 用 CS 
EDX, [ESP+44] ; 应 用 程序 用 ESP 
EBX, [ESP+48] ; 应 用 程序 用 DS/SS 
[exfe4] ,ESP ; 操作 系统 用 ESP 
; 在 切换 过 程 中 禁止 中 断 请 求 
ES , BX 
SS,BX 
DS, BX 
FS,BX 
GS , BX 
ESP, EDX 
; 切换 完成 后 恢复 中 断 请 求 
ECX ; 用 于 far-CALL 的 PUSH(cs) 
EAX ; 用 于 far-CALL 的 
FAR [ESP] ; 调用 应 用 程序 
EAX, 1*8 ; 操作 系统 用 DS/SS 
> 再 次 进行 切换 ， 茜 止 中 断 请 求 
ES , AX 
SS,AX 
DS, AX 
FS,AX 
GS, AX 


ESP, [Oxfe4 ] 
; 切换 完成 后 恢复 中 断 请 求 
; 恢复 之 前 保存 的 寄存 器 值 


RET 


MGA ABR, KA Te OS? 在 同 SS$ 和 DS 赋 值 

的 时 候 ， 我 们 也 同时 向 ES、FS 和 GS 赋 了 值 ， 这 样 

做 是 为 了 以 防 万 一 。 我 们 将 操作 系统 栈 的 ESP 保 存 
在 0xfe4 这 个 地 址 ， 以 便 从 应 用 程序 返回 操作 系统 时 
使 用 。 


不 过 ， 光 这 样 改 还 不 够 ， 当 使 用 API 时 应 用 程序 需 
要 调用 hrb_api， 但 hrb_api 这 个 函数 是 用 C 语 言 编写 
的 操作 系统 程序 ， 因 此 如 果 不 将 段 地 址 设 回 操作 系 
统 用 的 段 束 无 法 正常 工作 。 于 是 我 们 还 得 修改 


_asm_hrb_api. 


本 次 的 naskfunc.nas 节 选 


_asm_hrb_api: 


;为 方便 起 见 从 开头 就 禁止 中 断 请 求 


PUSH DS 

PUSH ES 

PUSHAD ; 用 于 保存 的 PUSH 

MOV EAX,1*8 

MOV DS, AX ; 先 仅 将 DS 设 定 为 操作 系统 
用 

MOV ECX, [6xfe4] ; 操作 系统 的 ESP 

ADD ECX, -46 

MOV [ECX+32], ESP ; 保存 应 用 程序 的 ESP 


MOV [ ECX+36],SS ; 保存 应 用 程序 的 SS 


; 将 PUSHAD 后 的 值 复 制 到 系统 栈 


MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 


MOV 
操作 系统 用 
MOV 
MOV 
STI 


CALL 


MOV 
MOV 
CLI 
MOV 
MOV 
POPAD 
POP 
POP 


EDX, [ESP] 
EBX, [ESP+ 4] 
[ECX _  ],EDX 
[ECX+ 4], EBX 
EDX, [ESP+ 8] 
EBX, [ESP+12] 
[ECX+ 8], EDX 
[ECX+12], EBX 
EDX, [ESP+16] 
EBX, [ESP+20] 
[ ECX+16 ] , EDX 
[ ECX+20], EBX 
EDX, [ESP+24] 
EBX, [ESP+28] 
[ECX+24] , EDX 
[ ECX+28 ] , EBX 


ES, AX 


SS, AX 
ESP, ECX 


; 恢复 中 断 请 求 


_hrb_api 


ECX, [ESP+32] 
EAX, [ESP+36] 


SS, AX 
ESP, ECX 


ES 
DS 


; 复制 传递 给 hrb_api 
; 复制 传递 给 hrb_api 


; 复制 传递 给 hrb_api 
; 复制 传递 给 hrb_api 


; 复制 传递 给 hrb_api 
; 复制 传递 给 hrb_api 


; 复制 传递 给 hrb_api 
; 复制 传递 给 hrb_api 


; 将 剩余 的 段 寄存 器 也 设 为 


; 取出 应 用 程序 的 ESP 
; 取出 应 用 程序 的 Ss 


IRETD ; 这 个 命令 会 自动 执行 STI 


这 次 估计 大 家 是 真 的 看 不 懂 了 吧 。 不 过 只 要 仔细 读 
一 所 ， 还 是 能 看 懂 个 大 概 的 。 开 头 的 PUSHAD 是 将 
值 存 到 应 用 程序 的 栈 中 ， 因 此 使 用 操作 系统 栈 的 
hrb_api 无 法 读 取 这 些 值 ， 我 们 需要 特地 把 它们 复制 
过 来 。 因 为 怕 厂 烦 ， 这 次 我 们 把 ES 和 GS 的 设置 给 
省 略 了 。 


这 回 总 该 改 好 了 吧 ? 列 急 ， 还 差 一 点 。 大 家 已 经 不 
耐烦 了 吧 ? 下 面 我 们 来 修改 中 断 的 部 分 。 在 应 用 程 
序 运行 中 也 会 产生 中 断 请 求 ， 中 断 产生 后 会 调用 
_inthandler20 等 操作 系统 内 部 的 C 语 言 函 数 ， 因 此 ， 
我 们 还 得 对 DS 和 SS 进行 切换 才 行 。 


本 次 的 naskfunc.nas 节 选 


_asm_inthandler26 : 


PUSH ES 
PUSH DS 
PUSHAD 
MOV AX,SS 
CMP AX,1*8 
JNE .from app 
; 当 操作 系统 活动 时 产生 中 断 的 情况 和 之 前 差不多 
MOV EAX, ESP 
PUSH SS ; 保存 中 断 时 的 SSs 
PUSH EAX ; 保存 中 断 时 的 ESP 
MOV AX,SS 


MOV DS , AX 


MOV ES,AX 


CALL _inthandler20 
ADD ESP,8 
POPAD 
POP DS 
POP ES 
IRETD 
.from app: 
; ” 当 应 用 程序 活动 时 发 生 中 断 
MOV EAX,1*8 
MOV DS, AX ; 先 仅 将 DS 设 定 为 操作 系统 
用 
MOV ECX, [6xfe4] ; 操作 系统 的 ESP 
ADD ECX, -8 
MOV [ECX+4] ,SS ; 保存 中 断 时 的 SS 
MOV [ECX ],ESP ; 保存 中 断 时 的 ESP 
MOV SS,AX 
MOV ES, AX 
MOV ESP, ECX 
CALL _inthandler20 
POP ECX 
POP EAX 
MOV SS,AX ; 将 ss 设 回应 用 程序 用 
MOV ESP, ECX ; 将 ESP 设 回应 用 程序 用 
POPAD 
POP DS 
POP ES 
IRETD 


这 样 总 算 可 以 运行 了 ，asm_inthandler21 和 


asm_inthandler2c 也 和 上 面 大 同 小 异 。 
如 果 你 看 不 惜 本 节 中 这 些 汇 编 语 言 的 程序 也 不 要 


K, BRENDES. MERZI RATSEL E 
的 ， 但 其 实 这 个 程序 在 今天 之 内 网 会 消失 不 见 的 。 
为 什么 会 这 样 呢 ? 因为 CPU 实际 上 本 身 就 有 自动 进 
行 这 种 复杂 上 段 切 换 的 功能 ， 最 终 我 们 还 是 要 用 CPU 
本 里 的 功能 来 实现 。 


有 人 可 能 会 说 ， 有 那么 方便 的 功能 ， 为 什么 不 一 开 
Amt AWE? 笔者 是 想 让 大 家 先 体 验 一 下 ， 如 果 不 用 
CPUNJ RES KA SARI, FOE aa. tA 
WERK, CES WRI FEE FI TSSOR K 
的 ， 其 实 不 用 TSS 也 可 以 ， 差 不 多 就 像 现 在 这 样 麻 
烦 。 由 此 看 来 ，x86 考 虑 到 操作 系统 开发 者 的 需 
求 ， 提 供 了 各 种 方便 的 功能 ， 还 真得 感谢 它 呢 。 


TUR BATE EA S AEA CO 开头 的 标签 名 ， 这 和 是 
一 种 被 称 为 本 地 标签 的 特殊 标签 。 它 基本 上 和 普通 
的 标签 功能 一 样 ， 区 列 在 于 即使 标签 名 和 其 他 函数 
中 的 标签 重复 ， 系 统 也 能 将 它们 区 分 开 来 。 


好 ， 现 在 我 们 应 该 可 以 运行 hello.hrb 这 些 应 用 程序 
了 。 虽 说 运行 应 用 程序 这 种 功能 我 们 早 就 实现 了 ， 
不 过 之 前 应 用 程序 栈 和 系统 栈 是 混在 一 起 的 ， 而 现 
在 我 们 将 它们 清晰 地 区 分 开 了 ， 虽 然 这 种 改变 表面 
上 看 不 出 来 ， 但 却 是 相当 了 不 起 的 。 之 所 以 这 么 说 


是 因为 只 有 写 这 么 深奥 的 汇编 语言 代码 才能 把 它们 
区 分 开 ， 束 冲 这 一 上 也 相当 了 不 起 .…... 你 说 是 不 是 
W? (R) 


总 之 ， 我 们 先 来 “make run”* 试 试 。 看 ， 运 行 成 功 
Tx 


fharib18d 


RISITI, AEREAS GTA KS 


那么 ， 我 们 在 这 里 运行 crack1.hrb 会 怎么 样 呢 ? 大 概 
电脑 会 出 问题 吧 。 因 为 我 们 虽然 可 以 阻止 这 些 有 问 
题 的 程序 ， 但 还 没有 实现 强制 其 终止 的 功能 。 不 
过 “make run” 试 验 一 下 ， 却 发 现 电 脑 运行 正常 ， 输 
入 dir 也 能 正常 列 出 文件 ， 看 起 来 防御 是 成 功 了 。 其 
实 QEMU 没 有 出 错 应 该 是 QEMU 本 里 的 bug， 因 此 
大 家 和 干 万 别 在 真 机 上 每 试 哦 。 


console 


hariblgd 


bug 导 致 crack1.hrb 正 党 结 


5 对 异 第 的 文 持 Charib18e ) 


接 下 来 我 们 要 实现 强制 结束 程序 的 功能 ， 完 成 这 个 
功能 之 后 ， 我 们 就 可 以 在 真 机 环境 下 测试 crack1.hrb 
Je 


要 想 强 制 结 束 程 序 ， 只 要 在 中 断 号 0x0d 中 注册 一 个 
图 数 即 可 ， 这 征 因为 在 x86 架 构 规 范 中 ， 当 应 用 程 
序 试 图 破坏 操作 系统 ， 或 者 试图 违背 操作 系统 的 设 
置 时 ， 就 会 自动 产生 0x0d 中 断 ， 因 此 该 中 断 也 被 称 


、 P 
为 < 异常”。 


我 们 赶紧 来 写 一 个 asm _inthandlerod KUE, ARAE 
和 asm inthandler20 大 同 小 异 。 


本 次 的 naskfunc.nas 节 选 


_asm_inthandleré@d: 


STI 
PUSH ES 
PUSH DS 
PUSHAD 
MOV AX,SS 
CMP AX, 1*8 
JNE .from app 
; ” 当 操 作 系 统 活动 时 产生 中 断 的 情况 和 之 前 差不多 
MOV EAX, ESP 
PUSH SS > 保存 中 断 时 的 SS 


PUSH EAX ; 保存 中 断 时 的 ESP 


MOV 
MOV 
MOV 


CALL 


ADD 


POPAD 


POP 
POP 
ADD 


IRETD 


. from_app: 


AX,SS 
DS, AX 
ES, AX 
_inthandler@d 
ESP,8 


DS 
ES 


ESP,4 ; 在 INT 6x6d 中 需要 这 人 句 


; ” 当 应 用 程序 活动 时 产生 中 断 


CLI 
MOV 
MOV 


MOV 
ADD 
MOV 
MOV 
MOV 
MOV 
MOV 
STI 
CALL 
CLI 
CMP 
JNE 
POP 
POP 
MOV 
MOV 


POPAD 


POP 
POP 
ADD 


EAX,1*8 

DS, AX ; 先 仅 将 DS 设 定 为 操作 系统 
ECX, [@xfe4] ;操作 系统 的 ESP 

ECX, -8 


[ECX+4] ,SS ; 保存 产生 中 断 时 的 Ss 
[ECX ],ESP ; 保存 产生 中 断 时 的 ESP 
SS,AX 

ES,AX 

ESP, ECX 


_inthandler@d 


EAX,@ 
.kill 
ECX 

EAX 
SS,AX 
ESP, ECX 


; 将 ss 恢复 为 应 用 程序 用 
; 将 ESP 恢 复 为 应 用 程序 用 


DS 
ES 


ESP,4 ; INT 6x6d 需 要 这 人 名 


IRETD 


.kill: 
; ”将 应 用 程序 强制 结束 
MOV EAX, 1*8 ; 操作 系统 用 的 DS/SS 
MOV ES,AX 
MOV SS, AX 
MOV DS , AX 
MOV FS,AX 
MOV GS , AX 
MOV ESP, [@xfe4] ; 强制 返回 到 start_app 时 的 
ESP 
STI ; 切换 完成 后 恢复 中 断 请 求 
POPAD ; 恢复 事先 保存 的 寄存 器 值 
RET 


这 个 函数 与 asm_inthandler20 的 主要 区 别 在 于 增加 


了 STILCLI 这 样 控制 中 断 请 求 禁止 、 恢 复 的 指令 和 
根据 inthandler0d 的 结果 来 执行 强制 结束 应 用 程序 的 
操作 。 在 强制 结束 时 ， 斥 管 中 断 处 理 完成 了 但 却 没 
有 使 用 IRETD 指 令 ， 而 且 还 把 栈 强制 恢复 到 
start_app 时 的 状态 ， 使 程序 返回 到 cmd_app。 可 能 
大 家 会 问 ， 这 种 奇怪 的 做 法 真 的 没 问题 吗 ? 是 的 ， 
完全 没 问 题 。 


然后 我 们 义 写 了 inthandler0d 这 样 一 个 函数 。 


本 次 的 console.c 节 选 


int inthandler@d(int *esp) 


{ 
struct CONSOLE *cons = (struct CONSOLE *) *((int *) 


exefec); 
cons_putstr@(cons, "\nINT @D :\n General Protected 
Exception. \n") ; 


return 1; /* 强 制 结束 程 序 */ 


} 


这 里 显示 的 信息 “General Protection Exception”， 翻 
译 成 中 文 束 是 “一 般 保护 异常 "”， 这 其 实 是 INT 0x0d 
的 名 称 。“ 一 般 ” 束 是 一 般 性 的 意思 , “保护 ” 束 是 指 
对 操作 系统 进行 保护 。 除 了 一 般 性 的 异 间 ， 还 有 一 
些 特殊 的 寞 常 ， 这 些 寞 常 并 不 是 由 应 用 程序 的 bug 
和 破坏 行为 所 引发 的 ， 而 是 其 他 种 类 的 异常 情况 ， 
特殊 的 的 异常 会 由 INT 0x0d 以 外 的 中 断 来 处 理 。 


接 下 来 ， 我 们 将 _asm_inthandler0d 注 册 到 IDT 中 。 


本 次 的 dsctbl.c 节 选 


void init_gdtidt(void) 


中略) 


/* IDT 的 设置 */ 

set_gatedesc(idt + @x@d, (int) asm_inthandleréd, 
* 8, AR_INTGATE32); /* 这 里 ! */ 

set_gatedesc(idt + @x2@, (int) asm_inthandler2@, 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x21, (int) asm_inthandler21, 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x27, (int) asm_inthandler27, 
* 8, AR_INTGATE32); 


N 


N 


N 


N 


set_gatedesc(idt + @x2c, (int) asm_inthandler2c, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x40, (int) asm_hrb_api, 2 
* 8, AR_INTGATE32); 


return; 


好 了 ， 大 功 告 成 。 
COLI 


我 们 来 “make run”， 并 运行 crack1.hrb 。 


FE RAR! .……- IR? 
KE ay PEM, PRIA REF DIAM RAT 
WR... MEE ce Ee PS E ep? 咽 ...... 看 上 去 也 


呵 ， 出 来 了 ! 
看 来 ， 是 QEMU 对 异常 的 模拟 有 点 bug， 而 并 不 


是 “ 纸 娃 娃 系 统 ?” 的 bug， 大 家 可 以 放心 了 。 


6 保护 操作 系统 (3) Charib18f) 


我 们 的 “ 纸 娃 娃 系 统 ” 终 于 可 以 成 功 防御 crack1.hrb 的 
攻击 了 ， 不 过 坏人 们 可 不 会 束 此 善 云 甘 休 哦 ， 正 所 
TAGE Tai BRT SOR 


站 在 坏人 的 角度 ， 我 们 来 想 想 有 没有 什么 漏 筒 可 以 
钻 。 操 作 系 统 会 指定 应 用 程序 用 的 DS， 因 此 破坏 行 
ARR ERR, MARAKE A Sta xe DS, 
而 是 用 汇编 语言 直接 将 操作 系统 用 的 段 地 址 存 入 DS 
的 话 ， 就 又 可 以 干 坏事 了 。 嘿 嘿嘿 。 

本 次 的 crack2.nas 

[INSTRSET "i486p"] 


[BITS 32] 
MOV EAX, 1*8 ; 0Ss 用 的 段 号 


MOV DS,AX ; 将 其 存 入 DS 
MOV BYTE [0x102600],e 
RETF 


WA: VERA IRE! 


我 们 来 “make run”， 运 行 crack2.hrb 试 试看 。PK 开 始 
J, ZR... 


[harib18i 


没有 出 现 异 党 ! 


没有 出 现 异 常 ..…….. NAKA, Thi XE QEMUBY 
bug， 只 要 没有 出 现 异 常 ， 就 应 该 是 成 功 防 御 了 攻 
二 .天 是 oa 


fharib18t 


dir 也 不 显示 了 ! PHS! 
dir 也 不 显示 了 ， 看 来 我 们 的 “ 纸 娃 娃 系 统 ” 这 次 中 招 


7 保护 操作 系统 (4) Charib18g) 


这 次 之 所 以 会 中 招 ， 是 因为 应 用 程序 擅自 同 DS 存 入 
了 操作 系统 用 的 段 地 址 。 那 么 我 们 只 要 想 个 办 法 ， 
让 应 用 程序 无 法 使 用 操作 系统 的 段 地 址 不 就 好 了 
中 ? 


KAA HEAR: GERRA, TEAR IAEA ti 
呢 ? ”其 实 我 们 的 x86 架 构 正 好 有 这 样 的 功能 。 


在 段 定 义 的 地 方 ， 如 果 将 访问 权限 加 上 0x60 的 话 ， 
就 可 以 将 段 设置 为 应 用 程序 用 。 当 CS 中 的 段 地 址 为 
应 用 程序 用 段 地 址 时 ，CPU 会 认为 “当前 正在 运行 
应 用 程序 ”， 这 时 如 果 存 入 操作 系统 用 的 段 地 址 就 
Su pele Ge ee S 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


{ 
CHH) 
char name[13], *p, *q; 
struct TASK *task = task_now(); print) */ 
CHH) 


if (finfo != 6) { 


/* FRB SCTE AY i 
CHAM ) 


set_segmdesc(gdt + 1003, finfo->size - 1, (int) 
p, AR _CODE32_ER + 0x60); /* 从 此 开始 */ 

set_segmdesc(gdt + 1004, 64 * 1024 - 1, (int) 
q, AR _DATA32_RW + 0x60); 

(中 上 略 ) 

start_app(@, 1003 + 8, 64 * 1024, 1004 * 8, & 
(task->tss.espQ)); /* 到 此 结束 */ 

CHEK) 


} 
/* 没 有 找到 文件 的 情况 */ 


return ð; 


如 果 使 用 这 次 的 方法 ， 束 必须 在 TSS 中 注册 操作 系 
统 用 的 段 地 址 和 ESP， 因 此 ， 我 们 在 start_app 中 增 
加 了 用 于 传递 注册 地 址 的 代码 。 


用 上 面 的 方法 的 话 ， 在 局 动 应 用 程序 的 时 候 我 们 需 
要 让 “操作 系统 回应 用 程序 用 的 段 执行 far-CALL”， 
但 根据 x86 的 规则 ， 是 不 允许 操作 系统 CALL 应 用 程 
序 的 《如 果 强 行 CALL 的 话 会 产生 异常 )。 可 能 

人 会 想 如 果 CALL 不 行 的 话 JMP 总 可 以 吧 ， 但 在 x86 
程序 用 的 段 进 行 far-JMP” 也 是 被 


那 我 们 该 怎么 办 呢 ? 可 以 使 用 RETE。 就 像 是 被 应 


用 程序 CALL 过 之 后 那样 ， 事 先 将 地 址 PUSH 到 栈 
中 ， 然 后 执行 RETF， 这 样 就 可 以 成 功 启动 应 用 程 
序 了 。 


可 能 有 人 会 问 :“ 为 什么 不 可 以 从 操作 系统 
CALL/JMP 应 用 程序 呢 ! ”笔者 也 搞 丰 明白， 还 是 
打 电 话 问 瑞 特 尔 公司 的 大 叔 吧 一 一 难道 说 这 样 设 
计 可 以 减轻 CPU 的 负担 吗 ? 


不 过 ， 从 应 用 程序 CALL 操 作 系 统 是 可 以 的 (只 
是 需要 通过 一 些 设置 才能 实现 ) ， 这 应 该 是 为 
API 而 设计 的 。 


之 前 我 们 一 直 讲 RETF 是 当 far-CALL 调 用 后 进行 返 
回 的 指令 ， 其 实 即便 没有 被 CALL 调 用 ， 也 可 以 
进行 RETF。 说 穿 了 ，RETE 的 本 质 就 是 从 栈 中 将 
地 址 POP 出 来 ， 然 后 JMP 到 该 地 址 而 已 。 因 此 正 
如 这 次 我 们 所 做 的 一 样 ， 可 以 用 RETF 来 代 蔡 far- 
JMP 的 功能 。 


XI 


本 次 的 naskfunc.nas 节 选 


_start_app: ; void start_app(int eip, int cs, int 
esp, int ds, int *tss espQ); 

PUSHAD ; 将 32 位 寄存 器 的 值 全 部 保存 下 来 

MOV EAX, [ESP+36] ; 应 用 程序 用 EIP 

MOV ECX, [ESP+40] ; 应 用 程序 用 CS 

MOV EDX, [ESP+44] ; 应 用 程序 用 ESP 


MOV EBX, [ESP+48] 
MOV EBP, [ESP+52] 
MOV [EBP ],ESP 
MOV [EBP+4],SS 
MOV ES,BX 
MOV DS, BX 
MOV FS,BX 
MOV GS, BX 
; ”下面 调 整 栈 ， 以 免 用 RETF 跳 转 到 应 用 
OR ECX, 3 
OR 运算 
OR EBX,3 
OR 运算 
PUSH EBX 
PUSH EDX 
PUSH ECX 
PUSH EAX 
RETF 


; ”应 用 程序 结束 后 不 会 回 到 这 里 


Wwe Le Le Wwe 


v 


ve 


Wwe Le Le Wwe 


应 用 程序 用 DS/SS 
tss.esp6 的 地 址 
保存 操作 系统 用 ESP 
保存 操作 系统 用 SS 


程序 
将 应 用 程序 用 段 写 和 3 进行 


将 应 用 程序 用 段 写 和 3 进行 


应 用 程序 的 SS 
应 用 程序 的 ESP 
应 用 程序 的 CS 
应 用 程序 的 EIP 


关于 将 应 用 程序 的 段 号 和 3 进行 OR 运算 的 部 分 ， 是 
为 用 RETF 调 用 应 用 程序 而 使 用 的 一 个 小 技巧 ， 这 
里 惑 先 不 详细 讲解 了 。 


这 次 由 于 我 们 并 不 是 通过 far-CALL 来 调用 应 用 程 
序 ， 因 此 应 用 程序 也 无 法 用 RETF 的 方式 结束 并 返 
， 后 面 我 们 得 想 别 的 办 法 来 蔡 代 。 


接受 API 调 用 的 _asm_hrb_api 也 需要 进行 修改 ， 改 完 


之 后 比 之 前 的 版 本 还 短 。 


本 次 的 naskfunc.nas 节 选 


_asm_hrb_api: 
STI 
PUSH 
PUSH 
PUSHAD ; 用 于 保存 的 PUSH 
PUSHAD ; 用 于 向 hrb_api 传 值 的 PUSH 
MOV 
MOV ; 将 操作 系统 用 段 地 址 存 入 DS 和 


MOV 
CALL _hrb _ api 
CMP ; 当 EAX 不 为 8 时 程序 结束 


JNE 
ADD 
POPAD 
POP 
POP 
IRETD 
end_app: 
; ”EAX 为 tss.esp6 的 地 址 
MOV ESP, [EAX] 
POPAD 
RET ; 返回 cmd_app 


怎么 样 ， 短 了 不 少 吧 ? 现在 的 代码 长 度 已 经 和 我 们 
尚未 准备 应 用 程序 用 的 段 之 前 差不多 了 ， 这 多 亏 了 
CPU 来 帮 我 们 目 动 执行 那些 及 烦 的 栈 切 换 操作 。 


当 hrb_api 返 回 0 时 继续 运行 应 用 程序 ， 当 返回 非 0 的 


值 时 则 当 作 tss.esp0 的 地 址 来 处 理 ， 强 制 结束 应 用 程 
序 。 之 所 以 需要 这 样 的 设计 ， 是 因为 我 们 打算 做 一 
个 结束 程序 用 的 API。 这 次 我 们 不 是 用 far-CALL 来 
局 动 应 用 程序 ， 目 然 也 无 法 用 RETF 来 结束 ， 因 此 
作为 替代 方案 ， 我 们 需要 做 一 个 用 于 结束 程序 的 
API. 


程序 结束 API 分 配 到 EDX = 4， 修 改 后 的 hrb_api 如 
as 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 
{ 
int cs_base = *((int *) @xfe8); 
struct TASK *task = task_now(); /* 这 里 ! */ 
struct CONSOLE *cons = (struct CONSOLE *) *((int *) 
exefec); 
if (edx == 1) { 
cons_putchar(cons, eax & Oxff, 1); 
} else if (edx == 2) { 


cons_putstr@(cons, (char *) ebx + cs_base); 
} else if (edx == 3) { 
cons_putstri(cons, (char *) ebx + cs_base, 


ecx); 
} else if (edx == 4) { Are eg 
return &(task->tss.espQ) ; PAZE TE, 

} 


return @; /# 这 里 ! */ 


没有 什么 特别 的 难点 ， 接 下 来 我 们 照 这 样 把 
inthandler0d 也 修改 一 下 。 


本 次 的 console.c 节 选 
int *inthandler@d(int *esp) 


{ 
struct CONSOLE *cons = (struct CONSOLE *) *((int *) 


QxOfec) ; 
struct TASK *task = task_now(); PARET y 


cons_putstr@(cons, "\nINT @D :\n General Protected 
Exception. \n"); 

return &(task->tss.esp0@); ”/* 让 程序 强制 结束 */ 
FUARI 
} 


中 靳 处 理 的 部 分 又 要 修改 了 ， 说 是 修改 ， 其 实 也 只 
不 过 是 改 回 之 前 的 版 本 而 已 。 


本 次 的 naskfunc.nas 节 选 


_asm_inthandler26 : 


PUSH ES 

PUSH DS 
PUSHAD 

MOV EAX, ESP 
PUSH EAX 
MOV AX,SS 
MOV DS , AX 


MOV ES , AX 


CALL _inthandler20 


POP EAX 
POPAD 

POP DS 
POP ES 
IRETD 


FF BATFE oR IO Be I) PRE BC 25 CPU AE SE, 


此 程序 又 完全 恢复 到 之 前 的 样子 了 上。 我 们 把 
“asm inthandler21 和 asm inthandler2c 也 改 回 去 了 。 


中 断 处 理 的 部 分 中 ， 只 有 负责 处 理 异 稼 中 断 的 
_asm_inthandler0d 没 有 完全 改 | 回 之 前 的 样子 。 


本 次 的 naskfunc.nas 节 选 


_asm_inthandlerðd: 


STI 

PUSH ES 

PUSH DS 

PUSHAD 

MOV EAX, ESP 

PUSH EAX 

MOV AX,SS 

MOV DS, AX 

MOV ES,AX 

CALL _inthandler@d 

CMP EAX, @ ; 只 有 这 里 不 同 
JNE end_app ; 只 有 这 里 不 同 
POP EAX 

POPAD 

POP DS 


POP ES 


ADD ESP ,4 ; 在 INT 6xed 中 需要 这 人 句 
IRETD 


不 同 的 地 方 只 有 两 处 ， 像 API 一 样 ， 我 们 添加 了 用 
于 强制 结束 的 代码 。 


接 下 来 ， 还 要 修改 一 下 IDT 的 设置 。 在 我 们 已 经 清 
晰 地 区 分 操作 系统 段 和 应 用 程序 段 的 情况 下 ， 当 应 
用 程序 试图 调用 未 经 操作 系统 授权 的 中 断 时 ，CPU 
会 认为 “这 家 伙 乱 用 奇怪 的 中 断 与 ， 想 把 操作 系统 
搞 坏 ， 是 坏人 ”， 并 产生 异常 。 因 此 ， 我 们 需要 在 
IDT 中 将 INT 0x40 设 置 为 “可 供应 用 程序 作为 API 来 
调用 的 中 断 ”。 


本 次 的 dsctbl.c 节 选 


void init_gdtidt(void) 


CHH) 


/* IDT 设 置 */ 

set_gatedesc(idt + @x@d, (int) asm inthandlered, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + @x2@, (int) asm_inthandler2@, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x21, (int) asm_inthandler21, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x27, (int) asm_inthandler27, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + @x2c, (int) asm_inthandler2c, 2 
* 8, AR_INTGATE32); 


set_gatedesc(idt + 0x40, (int) asm_hrb_api, 2 
* 8, AR_INTGATE32 + 0x60); /*iX/A! */ 


return; 


我 们 所 谓 的 设置 ， 束 是 将 访问 权 编 码 加 上 0x60 而 
己 。 全 于 其 他 的 中 断 ， 并 不 是 用 于 应 用 程序 对 操作 
系统 的 调用 ， 而 是 用 于 键盘 、 鼠 标 等 外 部 设备 的 控 
制 ， 以 及 异常 处 理 用 的 中 断 ， 因 此 蔡 止 应 用 程序 调 
用 。 


对 了 ， 应 用 程序 也 需要 修改 一 下 ， 因 为 已 经 不 能 通 
过 RETF 来 结束 程序 了 。 


本 次 的 hello.nas 


[INSTRSET "i486p"] 
[BITS 32] 
MOV ECX, msg 
MOV EDX,1 
putloop: 
MOV AL, [CS:ECX] 
CMP AL,@ 
JE fin 
INT 0x40 
ADD ECX,1 
JMP putloop 
fin 
MOV EDX,4 ; 这 里 ! 
INT 0x40 7 aE 


msg: 


本 次 的 hello2.nas 


[INSTRSET "i486p" ] 


[BITS 32] 
MOV 
MOV 


INT 


MOV 
INT 


DB 


本 次 的 a.c 


EDX, 2 
EBX,msg 
0x40 
EDX, 4 
0x40 


"hello" ,@ 


void api_putchar(int c); 
void api_end(void); 


void HariMain(void) 


{ 


api_putchar('A'); 


api_end(); 


本 次 的 a_nask.nas 


[FORMAT "WCOFF" | 

[INSTRSET "i486p"] 
[BITS 32] 
[FILE "a_nask.nas" ] 


GLOBAL 


_api_putchar 


GLOBAL _api end 时 :| 
[SECTION .text ] 
_api_putchar: ; void api_putchar(int c); 
MOV EDX, 1 
MOV AL, [ESP+4] ; c 
INT 0x40 
RET 


_api_end:  ; void api end(void);  ; 从 此 开始 
MOV EDX,4 
INT 0x40 ; 到 此 结束 


本 次 的 hello3.c 


void api_putchar(int c); 
void api_end(void) ; 


void HariMain(void) 

{ 
api_putchar(‘'h'); 
api_putchar(‘e'); 
api_putchar('1'); 
api_putchar('1'); 
api_putchar('o'); 
api_end(); 


本 次 的 crack1l.c 


void api_end(void); pA e 


void HariMain(void) 


*((char *) 0x00102600) = 
api_end(); /* 这 里 ! */ 


本 次 的 crack2.nas 


[INSTRSET "i486p"] 

[BITS 32] 
MOV EAX,1*8 ; 操作 系统 用 有 段 号 
MOV DS, AX ; 将 其 存 入 DS 
MOV BYTE [6x162666],6 
MOV EDX,4 ;这 里 ! 
INT 0x40 这 里: 


好 ， 这 梓 融 大功 生成 了 ! 


我 们 来 “make run”, KRAI - A 前 能 运行 的 程序 现 
在 还 能 不 能 正 党 运行。 不错 不 错 ， 朋 似 很 顺利 ， 太 
a 


D taka 
haribl8g 


SiT AOLE 


下 和 面 运 行 一 下 做 坏事 的 程序 看 看 怎么 样 。 哦 哦 ， 
crack2.hrb 貌 似 被 强制 结束 了， 我 们 的 系统 好 历 害 ! 


\ | 
] Protected Exception. 
> K 


破坏 行为 被 阻止 了 
话说 ， 这 次 QEMU 对 异 冲 的 处 理 误 似 又 正常 了 ， 不 


Tae 


啊 ， 不 过 crack1.hrb 还 是 会 正常 结束 ， 这 是 QEMU 的 
bug， 不 过 dir 命 令 可 以 正 弟 运行 说 明 系 统 成 功 防 御 
了 了 攻击。 那么 我 们 用 “make install” 在 真 机 环境 下 试 
很 好 很 好 ， 在 真 机 环境 下 两 个 crack 程 
序 都 产生 了 一 般 保护 异常 。 


今天 就 到 这 里 吧 ， 大 家 晚上 做 个 好 梦 ， 明 天 还 要 继 
续 加 油 哦 。 


第 22 天 用 C 语 言 编 写 应 用 程序 


。 保 护 操 作 系 统 (5) (harib19a) 

。 帮 助 发 现 bug (harib19b) 

。 强制 结束 应 用 程序 Charib19c ) 

。 用 C 语 言 显 示 字 符 串 (1) (harib19d) 
。 用 C 语 言 显 示 字 符 串 (2) (haribl9e) 
© GAN HO (harib19f ) 

。 在 窗口 中 描绘 字符 和 方块 (harib19g) 


1 保护 操作 系统 (5) Charib19a) 


大 家 早上 好 。 


在 昨天 的 最 后 我 们 成 功 干掉 了 crack2.hrb， 今 天 我 们 
要 尝试 一 下 更 历 害 的 攻击 手段 。 所 以 说 ， 从 现在 开 
台 又 要 打开 坏人 模式 了 哟 ， 嘿 嘿嘿 。 


虽然 把 操作 系统 的 段 地 址 存 入 DS 这 一 招 现在 已 经 不 
HEA YS, BURSA. RAS 
TRAZO JEE H AEE FR St” ASA ERER ER 


M AIRIA ! 

在 操作 系统 管理 的 内 存 空 间 里 搞 破 坏 是 行 不 通 了 ， 

这 次 算 你 厉害 ， 不 过 我 还 可 以 在 定时 器 上 动 动手 

脚 。 这 样 一 来 ， 光 标 闪烁 就 会 变 得 异常 缓慢 ， 任 务 


TI FRAT tL eZee, EUR ARIEL HA, J677 
Le BA Me], EE MER TER 
本 次 的 crack3.nas 
[INSTRSET "i486p"] 
[BITS 32] 
MOV AL ,9x34 


OUT 0x43 ,AL 


MOV AL ,6xff 


OUT @x40, AL 
MOV AL, @xff 
OUT @x40, AL 


上 述 代码 的 功能 与 下 面 代码 相当 
io_out8(PIT_CTRL，6x34) ; 
io out8(PIT CNTO, @xff); 
io out8(PIT CNTO, @xff); 


Wwe Wwe Wwe we 


MOV EDX, 4 
INT 0x40 


好 ， 完 成 了 ! 赶紧 “make run”， 然 后 输入 “crack3”， 
口中 念 念 有 词 道 : “可 恶 的 ' 纸 娃娃 系统 :， 吃 我 这 
fa! ”然后 按 下 回 车 键 。 


FY EAM ee 
Mt, APY R PUR! 可 恶 ! 


当 以 应 用 程序 模式 运行 时 ， 执 行 IN 指 令 和 OUT 指 
令 痢 会 产生 一 般 你 护 卉 种 。 当 然 ， 通 过 修改 CPU 


设置 ， 可 以 允许 应 用 程序 使 用 IN 指令 和 OUT 指 
令 ， 不 过 这 样 大 家 会 担心 留 下 bug 而 遭 到 悉 意 攻 
击 。 


我 还 没 输 昵 ， 这 点 挫折 我 可 不 会 善 喷 甘 休 ! 既然 如 
此 ， 我 就 给 你 执行 CLI 然 后 再 HLT， 这 样 一 来 电脑 
就 死机 了 。 由 于 不 再 产生 定时 磺 中 断 ， 任 务 切 换 也 
会 停止 ， 键 租 和 鼠标 中 断 也 停止 啊 应 ， 除 了 按 下 机 
箱 上 的 Reset 按 钮 以 外 没有 别 的 办 法 了 。 我 真是 个 天 


才 ， 哈 哈哈 哈 ! 


本 次 的 crack4.nas 


[INSTRSET "i486p"] 
[BITS 32] 
CLI 


fin: 


HLT 
JMP fin 


这 次 一 定 要 成 功 ，“make run”! 


WT OD 
General Protected Exception. 


KIU Ta 
又 产生 了 寞 第 ， 为 什么 啊 ! 


当 以 应 用 程序 模式 运行 时 ， 执 行 CLI、STI 和 HLT 
这 些 指令 都 会 产生 异常 。 因 为 中 断 应 该 是 由 操作 
系统 来 管理 的 ， 应 用 程序 不 可 以 随便 进行 控制 。 
不 能 执行 HLT 的 话 ， 应 用 程序 就 没 办 法 省 电 了 ， 
不 过 一 般 情 况 下 ， 这 应 该 通过 调用 任务 休眠 API1 
来 实现 ， 而 不 能 由 应 用 程序 自己 来 执行 HLT。 此 
外 ， 在 多 任务 下 ， 调 用 休眠 API 还 可 以 让 系统 将 
CPU 时 间 分 配给 其 他 任务 。 


连 CLI 也 不 让 我 执行 吗 ? 怎么 会 有 这 种 事 ! 这 样 的 
话 不 就 干 不 成 坏事 了 吗 ? 难道 只 能 缴械 投降 了 ? 


哦 哦 ， 想 起 来 了 ! 操作 系统 里 面 不 是 有 一 个 用 来 
CLI 的 函数 嘛 ，far-CALL 这 个 函数 不 就 行 了 吗 ? 这 
样 一 来 “ 纸 娃 娃 系 统 ” 应 该 就 会 死机 了 。 应 该 CALL 
哪个 地 址 昵 ? 只 要 有 map 文 件 就 可 以 轻松 找到 了 。 


IIR, map XIF HAIXE íT 
我 就 来 far-CALEL 这 个 地 址 吧 ， 哈 哈 ! 


本 次 的 crack5.nas 


[INSTRSET "i486p" | 
[BITS 32] 
CALL 2*8:@xacl 


MOV EDX, 4 
INT 0x40 


嘿嘿 ， 人 准备 接 招 吧 ，“make run”! 


AER T riisi 


又 产 生 寞 党 了 ! BECAME! 能 不 能 让 我 局 一 次 
呵 ! 可 恶 ! 


如 果 应 用 程序 可 以 CALL 任 意 地 址 的 话 ， 像 这 样 


的 恶作剧 束 可 以 成 功 了 ， 因 此 CPU 规定 除了 设置 
好 的 地 址 以 外 ， 禁 止 应 用 程序 CALL 其 他 的 地 
址 。 因 此 ,，“ 纸 娃娃 系统 ”中 应 用 程序 要 调用 操作 
系统 只 能 采用 INT 0x40 的 方法 。 


CLLD 
于 是 坏人 只 好 失望 地 洗 洗 睡 了 《〈《 笑 ) 。3 天 后 .……… 


有 了 ! 这 次 应 该 能 行 ， 我 怎么 早 没 想 到 这 个 办 法 
Ne? 了 哈哈， 这 次 绝对 可 以 成 功 ! 


既然 应 用 程序 只 能 调用 API， 那 么 把 API 修 改 一 下 不 
束 行 了 吗 ? 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


{ 


int cs _ base = *((int *) @xfe8); 
struct TASK *task = task_now(); 
struct CONSOLE *cons = (struct CONSOLE *) *((int *) 
exefec); 
if (edx == 1) { 
cons_putchar(cons, eax & Oxff, 1); 
} else if (edx == 2) { 
cons_putstr@(cons, (char *) ebx + cs_base); 
} else if (edx == 3) { 
cons_putstri(cons, (char *) ebx + cs_base, 
ecx); 


} else if (edx == 4) { 
return &(task->tss.esp@) ; 


} else if (edx == 123456789) { /*iX HL! */ 
*( (char *) 0x00102600) = 90; /# 这 里 ! */ 
return ð; 


TR, DUES, Ala RRS AM HENT t 
ae ie 


本 次 的 crack6.nas 


[INSTRSET "i486p"] 
[BITS 32] 
MOV EDX, 123456789 
INT 0x40 
MOV EDX, 4 
INT 0x40 


好 啦 ! 准备 接 招 吧 ,，“make run”! 


BeAr eS! PIIRI RA? dir 一 下 看 
Bo MAS, HRS UG! 这 次 我 恬 了 ， 哈 哈 ! 


如 果 操 作 系 统 内 部 存在 这 种 泰 到 作 昔 自 缚 的 

API， 那 么 再 优秀 的 CPU 也 对 此 无 能 为 力 ， 操 作 系 
统 只 能 束 手 束 拾 。 即 使 操作 系统 原本 没有 这 样 的 
API， 如 果 像 这 次 一 样 被 算 改 的 话 ， 也 有 可 能 被 

植 入 后 门 。 


要 防止 这 种 问题 的 发 生 ， 我 们 只 能 “不 安装 不 可 
徘 的 操作 系统 ”了 。 如 末 大 家 痢 能 遵守 这 条 原则 ， 
就 不 会 因为 随意 下 载 应 用 程序 而 弄 坏 电脑 了 一 一 
SR, URPRTE RAAF USE A AY at a 


Ave I o 


这 次 的 crack6.hrb 其 实 只 能 在 使 用 “改版 纸 娃 娃 系 

统 ” 的 人 里 上 发 挥 效 果 。 如 果 对 方 不 安装 “改版 纸 

娃娃 系统 ”的 话 ， 即 便 运行 了 这 个 应 用 程序 也 不 会 
发 生 任 何 问题 。 因 此 ， 束 目前 而 言 ， 这 个 应 用 程 

序 的 受害 者 就 只 有 这 个 坏人 自己 而 已 ， 从 这 个 角 

度 来 襄 ， 他 “万” 得 还 真是 空虚 啊 。 


现在 坏人 已 经 走 了 了， 接 下 来 我 们 继续 做 系统 吧 。 


2 帮助 发 现 bug (harib19b) 


CPU 的 异常 处 理 功能 ， 除 了 可 以 保护 操作 系统 免 遭 
应 用 程序 的 破坏 ， 还 可 以 帮助 我 们 在 编写 应 用 程序 
时 及 早 友 现 bug。 


我 们 来 举 个 例子 。 


本 次 的 bugl.c 


void api_putchar(int c); 
void api_end(void); 


void HariMain(void) 


{ 


char a[100]; 
a[10] = 'A'; /# 这 人 句 当然 没有 问题 */ 


api_putchar(a[10]); 

a[102] = 'B'; /# 这 人 句 就 有 问题 了 *#/ 
api_putchar(a[102]); 

a[123] = 'C'; /* 这 人 句 也 有 问题 了 */ 
api_putchar(a[123]); 

api_end(); 


这 明显 是 个 有 bug 的 程序 ， 因为 a 是 一 个 100 字 节 的 
数组 ， “A” RIME E% 估 没 有 问题 ， 肯定 会 显示 
出 “A” 这 个 字符 ， 但 “B” 的 赋值 就 不 行 ， 因为 它 已 经 
超出 数组 范围 了 ; “C2” 的 赋值 当然 也 是 不 行 的 。 


把 这 个 程序 “make run” 一 下 ， 结 果 如 下 ...... E? 


运行 成 功 了 


本 来 我 们 以 为 会 产生 寞 常 ， 结 果 却 没有 出 现 。 我 们 
在 真 机 环境 下 试 试看 。 


在 真 机 环境 下 运行 了 一 下 ， 结 果 电 脑 上 自动 重 局 了 。 
咽 ， 这 可 不 妙 啊 ， 电 脑 自动 重启 应 该 是 产生 了 没有 
设置 过 的 异常 所 导致 的 。 


哦 对 了 ， 坏 人 刚刚 擅自 加 上 去 的 API 已 经 删 掉 了 
哦 ，crack 应 用 程序 也 已 经 玩 腻 了， 上 所 以 一 起 都 删除 
Ta 


EERE 
由 于 a 这 个 数组 是 保存 在 栈 中 的 ， 因 此 这 次 可 能 产 
生 了 栈 异 常 。 我 们 需要 一 个 函数 来 处 理 栈 异 常 ， 覆 
异常 的 中 断 号 为 0x0ct。 


1 栈 异 常 的 中 断 号 为 0x0c: 可 能 大 家 会 问 ， 除 此 之 
外 还 有 什么 异常 呢 ? 我 们 在 这 里 补充 讲解 一 下 
吧 。 根 据 CPU 说 明 书 ， 从 0x00 到 0x1f 都 是 异常 所 
使 用 的 中 断 ， 因 此 ，IRQ 的 中 断 号 都 是 从 0x20 之 
后 开始 的 。 其 他 一 些 比 较 有 用 的 异常 有 0x00 号 除 
SR 〈 当 试图 除 以 0 时 产生 ) 和 0x06 号 非法 指令 
异常 〈 当 试图 执行 CPU 无 法 理解 的 机 器 语言 指 

令 ， 例 如 当 试 图 执行 一 段 数 据 时 ， 有 可 能 会 产 
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本 次 的 naskfunc.nas 节 选 


_asm_inthandlerec : 


EAX, ESP 
EAX 
AX,SS 
DS, AX 
ES, AX 


_inthandler@c 
EAX,@ 

end_app 

EAX 


DS 
ES 
ESP,4 ; 在 INT 6xec 中 也 需要 这 名 


然后 ， 我 们 编写 es 函数 ， 只 是 将 
inthandler0d 中 的 出 错 信 息 改 了 一 下 而 已 。 


本 次 的 console.c 节 选 


int *inthandler@c(int *esp) 


{ 
struct CONSOLE *cons = (struct CONSOLE *) *((int *) 


QxOfec) ; 


struct TASK *task = task_now(); 

cons_putstr@(cons, "\nINT @C :\n Stack 
Exception. \n"); 

return &(task->tss.espQ); ”/* 强 制 结 束 程序 */ 


} 
当然 ， 在 IDT 中 也 需要 登记 一 下 。 


本 次 的 dsctbl.c 节 选 


void init_gdtidt(void) 


CHH) 


/* IDT 的 设置 */ 

set_gatedesc(idt + @x@c, (int) asm_inthandler@c, 2 
* 8, AR_INTGATE32); ”/* 这 里 ! */ 

set_gatedesc(idt + @x@d, (int) asm_inthandleré@d, 2 
* 8, AR_INTGATE32); 


set_gatedesc(idt + @x2@, (int) asm_inthandler2@, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x21, (int) asm_inthandler21, 2 
* 8, AR_INTGATE32); 


set_gatedesc(idt + 6x27，(int) asm_inthandler27, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + @x2c, (int) asm_inthandler2c, 2 
* 8, AR_INTGATE32); 

set_gatedesc(idt + 0x40, (int) asm_hrb_api, 2 
* 8, AR_INTGATE32 + 0x60); 


return; 


} 


我 们 来 “make run” 一 下 试 试 看 。 啊 ， 果 然 QEMU 对 
异常 的 模拟 有 问题 ， 因 此 程序 还 是 可 以 顺利 运行 
的 ， 看 来 只 能 在 真 机 环境 下 测试 了 。 真 机 环境 下 成 
HE TEH 


在 真 机 环境 下 ， 显 示 出 “AB” 之 后 才 产 生 异 常 ， 也 残 
是 说 ， 写 入 的 “C” 被 判定 为 异常 ， 而 “B” 却 被 放 过 去 
了 。 从 这 个 例子 可 以 看 出 ， 异 常 并 不 能 发 现 所 有 的 
bug。 不 过 ， 比 起 一 个 bug 都 发 现 不 了 来 说 ， 哪 怕 能 
发 现 一 个 bug 也 是 非常 有 帮助 的 ， 请 大 家 一 定 要 好 

好 利用 哦 。 


可 能 有 人 会 问 ， 为 什么 “C” 会 被 判定 为 开明 

而 “B” 束 可 以 被 放 过 去 呢 ? 下 面 我 们 就 来 简单 讲 一 
讲 。 

a[102] 虽 然 超 出 了 数组 的 边界 ， 但 却 没 有 超出 为 


应 用 程序 分 配 的 数据 段 的 边界 ， 因 此 虽然 这 是 个 
bug，CPU 也 不 会 产生 异 第 。 为 一 方面 ，a[123] 所 


在 的 地 址 已经 超出 了 数据 段 的 边界 ， 因 此 CPU 马 
EMERE TAE o 


其 实 ，CPU 产 生 异 第 的 目的 并 不 是 去 友 现 bug， 而 
是 为 了 保护 操作 系统 ， 它 的 思路 是 :“ 这 个 程序 试 
图 访问 目 映 所 在 数据 段 以 外 的 内 存 地 址 ， 一 定 是 
想 擅 目 改 与 操作 系统 或 者 其 他 应 用 程序 所 管理 的 
内 存 空 间 ， 这 种 行为 总 能 放任 不 管 ? ”因此 ， 即 便 
也 不 可 以 贡 怪 它 
哦 。 


要 想 让 它 帮忙 发 现 bug 的 话 ， 最 好 是 能 知道 引发 异 
常 的 指令 的 地 址 。 这 个 功能 很 简单 ， 我 们 来 加 上 
E. 


本 次 的 console.c 节 选 


int *inthandler@c(int *esp) 


{ 


struct CONSOLE *cons = (struct CONSOLE *) *((int *) 
OxOFfec) ; 
struct TASK *task = task_now(); 
char s[30]; 7* 这 里 1 */ 
cons_putstr@(cons, "\nINT 6C :\n Stack 
Exception. \n"); 
sprintf(s, "EIP = %@8X\n", esp[11]); /* 这 里 ! */ 
cons_putstr@(cons, s); ERT 
return &(task->tss.espð®); ”/* 强 制 结 束 程序 */ 


} 


int *inthandlerðd(int *esp) 


{ 

struct CONSOLE *cons = (struct CONSOLE *) *((int *) 
exefec); 

struct TASK *task = task_now(); 

char s[30]; /* 这 里 ! */ 


cons_putstr@(cons, "\nINT 6D :\n General Protected 
Exception. \n"); 

sprintf(s, "EIP = %@8X\n", esp[11]); /* 这 里 ! */ 

cons_putstr@(cons, s); JKB 

return &(task->tss.espð®); ”/* 强 制 结 束 程序 */ 


上 面 代 码 的 功能 是 ， 将 esp( 即 栈 ) 的 11 号 元 素 
( 即 EIP) 显示 出 来 。 


另外 ， 如 采 想 要 得 到 产生 异 间 时 其 他 寄存 井 的 值 ， 
只 要 按照 下 表 显 示 相 应 的 元 系 即 可 。 


esp[ 9]: EDI 


esp[ 1]: ESI esp[@~7] 
为 _asm_inthandler 中 PUSHAD 的 结果 


esp[ 2] :EBP 


esp[ 4] : EBX 


esp[ 5]: EDX 
esp[ 6]: ECX 
esp[ 7]: EAX 


esp[ 8]:DS esp[8~9] 
为 _asm_inthandler 中 PUSH 的 结果 


esp[ 9]:ES 


esp[16] : 错误 编号 〈 基 本 上 是 6， 显示 出 来 也 没 
什么 意思 ) 


esp[11] : EIP 


esp[12] : CS esp[16 一 15] 为 异常 产生 时 
CPU 自动 PUSH 的 结果 


esp[13] : EFLAGS 


esp[14] :ESP 《应 用 程序 用 ESP) 


esp[15]:SS 〈 应 用 程序 用 SS ) 


赶紧 在 真 机 环境 下 测试 一 下 ， 运 行 bug1.hrb 品 
示 “EIP = 00000042”， 我 们 来 看 看 bugl.map 的 内 


合 : 


Q@x@0000024 : _HariMain 
0x00000052 : _api_putchar 


看 起 来 0x42 这 个 地 址 是 位 于 HariMain 中 。 要 查看 得 
更 详细 的 话 ， 可 以 看 一 下 bugl.lst 文 件 : 


11 00000000 _HariMain: 


从 这 一 行 可 以 看 出 ， 在 bugl.lst 中 ， HariMain 的 地 址 
暂且 被 当 作 是 0《〈 临 时 地 址 ) ， 而 实际 的 地 址 要 

到 连接 之 后 才能 决定 ， 因此 nask 古 个 知道 的 ， 
先 用 .obj 文 件 中 的 临时 地 址 来 生成 .Ist 文件 。 连 接 后 
的 HariMain 实 际 地 址 记载 于 .map 文 件 中 ， 为 0x24。 


那么 ，0x42 地 址 到 底 位 于 .lst 文 件 的 哪里 呢 ? 通 过 对 
比 .map 文 件 ， 我 们 发 现 .lst 文 件 中 的 0xle， 就 相当 于 
EIP=0x42 所 指向 的 地 址 (因为 0x24+0xle=0x42) 。 


22 6666661E C6 45 ØB 43 MOV 
BYTE [11+EBP],67 


应 该 束 是 这 里 了 ， 这 正好 束 是 将 a[123] 赋 值 为 “<C” 的 
指令 (“C”A0x43, B67) 。 


因此 ， 我 们 可 以 确定 ，CPU 真 的 是 对 这 个 bug 做 出 
了 响应 。 


3 强制 结束 应 用 程序 (harib19c) 


现在 我 们 的 系统 已 经 可 以 对 付 大 部 分 恶意 破坏 和 
bug， 变 得 越 来 越 优秀 了， 不 过 ， 我 们 还 需要 一 些 
别 的 功能 ， 比 如 强制 结束 应 用 程序 。 


本 次 的 bug2.c 


void HariMain(void) 
{ 

for (;;) {9} 
} 


MRZITE PEPE RG AKA FS MAC a 
束 。 中 断 并 没有 人 被 蔡 用 ， 因 此 其 他 的 任务 还 可 以 照 
常 工 作 ， 不 过 这 个 任务 总 归 要 消耗 一 定 的 CPU 运 行 
时 间 ， 系 统 整 体 的 速度 残 会 变 慢 ， 还 会 日 日 浪费 
电 。 如 果 操 作 系 统 没 有 强制 结束 应 用 程序 的 功能 ， 
那么 bug2.hrb 也 可 以 算是 一 个 不 错 的 恶意 破坏 程 厅 
To 


怎样 实现 强制 结束 功能 呢 ? 将 某 一 个 按键 设 定 为 强 
制 结 束 键 ， 按 一 下 就 可 以 结束 程序 ， 这 样 看 起 来 不 
错 。 笔 者 本 来 想 在 console.c 的 console_task 中 编写 当 


按 下 强制 结束 键 时 结束 应 用 程序 的 处 理 ， 但 是 命令 
行 窗口 任务 在 应 用 程序 运行 的 时 候 不 会 去 读 取 FIFO 
RIP, lA RE a Al Bae 
换个 方式 吧 。 


于 是 ， 我 们 只 好 把 强制 结束 处 理 写 在 其 他 的 任务 
中 ， 而 bootpack.c 看 起 来 很 适合 。 


强制 结束 键 我 们 就 定义 为 “Shift+F1” 吧 ， 当 然 ， 用 
其 他 的 组 合 键 也 完全 没 问 题 ， 大 家 请 按照 目 己 的 可 
好 修改 吧 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


(中略 》 
struct CONSOLE *cons; 
《中略 》 


for (;;) { 
(中 上 略 ) 
if (fifo32 status(&fifo) == 0) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /* 键 盘 数 据 */ 
CREK) 
if (i == 256 + @x3b && key_shift != 6 
&& task cons->tss.ss@ != ©) { /* Shift+F1 */ 
cons = (struct CONSOLE *) *((int *) 


OxOFfec) ) ; 
cons_putstr@(cons, 
"\nBreak(key):\n"); 


换 到 其 他 任务 */ 


io_cli();  /* 不 能 在 改变 寄存 器 值 时 切 


task cons->tss.eax = (int) & 
(task_cons->tss.esp@) ; 

task_cons->tss.eip = (int) 
asm_end_app; 

io_sti(); 


} 
CHAR ) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
(中 上 略 》 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
《中略 》 


} 


asm_app_end 是 将 naskfunc.nas 中 的 end_app 改 名 之 后 
得 来 的 函数 。 


上 上述 程序 的 工作 原理 是 ， 当 按 下 强制 结束 键 时 ， 改 
写 命令 行 窗口 任务 的 的 寄存 器 值 ， 并 goto 到 
asm_end_app， 仪 此 而 已 。 


这 样 一 来 程序 会 被 强制 结束 ， 但 也 有 个 问题 ， 那 就 
是 当 应 用 程序 没有 在 运行 的 时 候 ， 按 下 强制 结束 键 
会 发 生 误 操作 。 这 样 可 不 行 ， 必 须要 确认 task_cons 


一 > tss.ss0 不 为 0 时 才能 继续 进行 处 理 。 为 此 ， 我 们 
还 得 进行 一 些 修改 ， 使 得 当 应 用 程序 运行 时 ， 该 但 
一 定 不 为 0; 而 当 应 用 程序 没有 运行 时 ， 该 值 一 定 
为 0。 


本 次 的 naskfunc.nas 节 选 


_asm_end_app: 


EAX 为 tss .esp8 的 地 址 


MOV ESP, [EAX] 

MOV DWORD [EAX+4],6 ; 这 里 ! 

POPAD 

RET ; 返回 cmd_app 
本 次 的 mtask.c 节 选 
struct TASK *task_alloc(void) 
{ 

int i; 


struct TASK *task; 
for (i = ð; i < MAX_TASKS; i++) { 
if (taskctl->tasks@[i].flags == 0) { 
task = &taskctl->tasks0[i]; 
task->flags = 1; /* 正 在 使 用 的 标志 */ 
task->tss.eflags = 0x0Q@000202; /* IF = 1; 


task->tss.eax = 0; /* 将 其 置 为 6*/ 
(中略 》 
task->tss.iomap 
task->tss.ss@ = 
return task; 


= 0x40000000; 
Q@; /* 这 里 ! */ 


return 0; /* 已 经 全 部 正在 使 用 */ 
} 


我 们 来 “make run”, 结果 如 下 按 下 “Shift+F1” 就 可 
以 轻松 结束 应 用 程序 了 。 


顺利 结束 了 
我 们 再 来 创建 一 个 bug3.hrb， 该 程序 负责 不 断 显 示 
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IY ao 
本 次 的 bug3.c 


void api_putchar(int c); 
void api_end(void) ; 


void HariMain(void) 


for (33) { 
api_putchar('a'); 


} 


“make run” 的 结果 如 下 。 按 下 强制 结束 键 束 可 以 顺 
利 停止 了 。 


停止 了 的 样子 


也 许 在 这 个 阶段 束 准 备 强 制 结束 和 和 腊 第 处 理 还 有 所 
为 时 过 早 ， 因 为 我 们 还 有 很 多 功能 想 尽 快 实现 。 不 
过 早操 做 好 这 些 基础 工作 ， 笔 者 在 后 面 制作 示例 程 
序 时 束 会 轻松 很 多 (更 容易 友 现 bug〉， 所 以 我 们 
就 把 这 部 分 内 容 放 在 今天 做 了 。 


4 用 C 语 言 显 示 字 符 串 (1) 
(harib19d) 


我 们 已 经 做 好 了 用 来 显示 字符 串 的 API， 却 没 做 可 
供 C 语 言 调 用 该 API 的 函数 。 不 过 这 个 很 容易 ， 我 们 
现在 就 来 做 做 看 。 


AS YR AJa_nask.nas “i 


_api_putstré@: ; void api_putstr@(char *s); 
PUSH EBX 
MOV EDX, 2 
MOV EBX, [ESP+8] 


INT 0x40 
POP EBX 
RET 


利用 上 面 的 函数 我 们 来 写 一 个 hello4.hrb。 


本 次 的 hello4.c 


void api_putstr@(char *s); 
void api_end(void); 


void HariMain(void) 


{ 


api_putstr@("hello, world\n"); 
api_end(); 


好 ， 我 们 来 “make run”...... E? 什么 都 没 显示 出 
来 ， 太 奇怪 了 。 


BUGS HRB 
04 .HE 


什么 都 没 出 来 ! 


运行 没 成 功 感觉 很 不 殉 ， 不 过 在 读 程 序 排查 原因 思 
考 对 策 的 时 候 ， 想 到 了 一 件 与 此 无 关 的 事 : 既然 已 
经 不 能 用 RETF 指 令 来 结束 程序 了 ， 那 么 “Hari” 那 时 
候 对 开头 6 个 字 节 的 改写 也 用 不 到 了 吧 。 


去 掉 6 个 字 节 的 改写 之 后 ， 程 序 就 不 再 JMP 到 0x1lb 
了 ， 因 此 start_app 的 地 址 也 需要 修改 一 下 。 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


中略) 


if (finfo != @) { 
/* 找 到 文件 的 情况 */ 


CHH) 
if (finfo->size >= 8 && strncmp(p + 4, "Hari", 


start_app(@xlb, 1003 * 8, 64 * 1024, 1004 * 
8, &(task->tss.esp@) ); 


} else { 


start_app(®, 1003 * 8, 64 * 1024, 1004 * 8, 
&(task->tss.esp@) ); 


} 
(中 上 略 )》 
} 
(中 上 略 )》 


这 样 改过 以 后 ，hello3.hrb 还 能 不 能 正常 运行 呢 ? 我 
们 来 “make run” 试 验 一 T. RR, 不 错 不 错 ， 运 行 
Tere Am asics 不 过 hello4.hrb 还 是 不 行 呢 。 


5 用 C 语 言 显示 字符 串 (2) 
(harib19e ) 


为 什么 字符 串 显 示 API 会 失败 呢 ? 怎么 想 都 不 应 该 
是 a_nask.nas 的 问题 ， 难 道 这 次 又 是 内 存 段 的 问题 
四 ? 于 是 我 们 对 操作 系统 进行 一 点 修改 ， 使 其 在 字 
符 串 显 示 API 被 调用 的 时 候 ， 显 示 EBX 寄 存 器 的 
值 。 


临时 修改 过 的 console.c 节 选 


int *hrb api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CHEK) 
char s[12]; /* 这 里 ! */ 
if (edx == 1) { 
cons_putchar(cons, eax & Oxff, 1); 
} else if (edx == 2) { 
/* cons_putstr@(cons, (char *) ebx + cs base); */ 
/* 从 此 开始 */ 
sprintf(s, "%@8X\n", ebx); 
cons_putstr@(cons, s); 
/* 到 此 结束 */ 
} else if (edx == 3) { 
cons_putstri(cons, (char *) ebx + cs_base, 
ecx); 
} else if (edx == 4) { 
return &(task->tss.esp@) ; 
} 


return ð; 
} 


将 这 个 版 本 “make run” 一 下 ， 然 后 运行 hello4.hrb， 
屏幕 上 显示 出 00000400。 这 到 底 是 怎么 回 事 呢 ? 
hello4.hrb 的 文件 大 小 只 有 114 个 字 节 ， 这 样 根本 不 
可 能 显示 出 “hello, world’ WK . 


为 什么 EBX 里 面 会 被 写 入 这 样 一 个 匪夷所思 的 值 

呢 ? 其 实 是 因为 连接 了 .obj 文 件 的 bim2hrb 认 

为 “hello, world” 这 个 字符 串 束 应 该 存放 在 0x400 这 个 
地 址 中 。 


由 bim2hrb 生 成 的 .hrb 文 件 其 实 是 由 两 个 部 分 构成 
的 。 


。 代 人 码 部 分 

。 数据 部 分 

虽然 有 两 个 部 分 ， 不 过 之 前 我 们 一 直 都 是 不 考虑 数 
据 部 分 的 。 当 程序 中 没有 使 用 字符 串 和 外 部 变量 
( 即 在 函数 外 面 所 定义 的 变量 ) 时 ， 就 会 生成 不 包 
舍 数 据 部 分 的 .hrb 文 件 ， 因 此 之 前 的 程序 都 没有 任 


何 问 题 。 


.hrb 文 件 的 数据 部 分 会 在 应 用 程序 局 动 时 被 传送 到 
应 用 程序 用 的 数据 段 中 ， 而 .hrb 文 件 中 数据 部 分 的 
位 置 则 存放 在 代码 部 分 的 开关 一块 区 域 中 。 现 在 是 
时 候 了 ， 我 们 来 详细 讲解 一 下 .hrb 文 件 的 结构 吧 。 


由 bim2hrb 生 成 的 .hrb 文 件 ， 开 头 的 36 个 字 节 不 是 程 
序 ， 而 是 存放 了 下 列 这 些 信 息 《〈 话 说 ，bim2hrb 就 
是 笔者 做 出 来 的 ， 如 果 对 这 个 内 容 有 意见 的 话 ， 不 


9x6666 (DWORD) ...... 请 求 操作 系统 为 应 用 程序 准 
备 的 数据 段 的 大 小 


@x6664 (DWORD) ...... “Hari”( .hrb 文 件 的 标 
1) 


9x6668 (DWORD) ...... 数据 段 内 预备 空间 的 大 小 


9x666c (DWORD) ...... ESP 礼 始 值 & 数据 部 分 传送 
目的 地 址 


0x0010 (DWORD) ...... hrb 文 件 内 数据 部 分 的 大 小 
0x0014 (DWORD) ...... hrb 文 件 内 数据 部 分 从 哪里 


口 


@x@0@18 (DWORD) ...... 0xe9000000 


9x661c (DWORD) ...... 应 用 程序 运行 入 口 地 址 - 
0x20 


0x0020 (DWORD) ...... malloc 空 间 的 起 始 地 址 
我 们 来 从 上 到 下 逐一 讲解 吧 。 
it tf Yt 


0x0000 中 存放 的 是 数据 段 的 大 小 。 现 在 在 “ 纸 娃娃 

系统 ”中 ， 应 用 程序 用 的 数据 段 大 小 固定 为 64KB， 

但 根据 应 用 程序 的 内 容 ， 可 能 会 需要 更 多 的 内 存 空 

间 。 那 么 把 数据 段 都 改 成 1MB 不 就 好 了 吗 ? 但 这 样 

明明 不 需要 那么 多 内 存 束 可 以 运行 的 程序 ， 
会 被 分 配 很 大 的 内 存 空间 ， 内 存 很 快 就 会 不 够 用 

了 因此 我 们 就 在 应 用 程序 中 先 写 好 需要 多 大 的 

子 空间 


0x0004 中 存放 的 是 “Hari” 这 4 个 字 节 。 这 几 个 字符 本 
来 没什么 用 ， 只 是 操作 系统 用 来 判断 这 是 不 是 一 个 
应 用 程序 文件 的 标记 ， 在 文件 中 写 入 这 样 的 标记 ， 

说 不 定 在 某 些 情况 下 就 会 派 上 有 用场。 也许 在 这 个 世 
界 上 ， 除 了 我 们 的 “ 纸 娃娃 系统 以外， 还 会 有 其 他 
的 软件 也 使 用 .hrb 这 个 扩展 名 ， 那 样 的 话 ， 光 和 赁 扩 

展 名 来 判断 文件 的 格式 就 有 点 危险 了 。 因 此 ， 我 们 


在 文件 中 加 上 一 个 标记 ， 并 在 操作 系统 中 添加 相应 
的 判断 功能 ， 如 果 没 有 找到 这 个 标记 ， 则 停止 运行 
该 文件 。 


如 果 我 们 不 去 确认 “Hari* 这 个 标记 ， 而 错误 地 运行 
了 一 个 数据 文件 的 话 ， 这 就 和 去 运行 一 个 JPEG 文 件 
差不多 ， 会 造成 很 严重 的 后 果 。 不 过 现在 我 们 使 用 
了 异常 处 理 功 能 来 保护 操作 系统 ， 像 磁盘 数据 被 清 
除 以 及 损坏 电脑 这 种 情况 ， 已 经 完全 可 以 避免 了 ， 
而 且 操作 系统 也 不 会 发 生 宕 机 。 能 做 到 这 些 ， 都 是 
异常 处 理 的 功劳 。 


0x0008 中 存放 的 内 容 为 “数据 段 内 预备 空间 的 大 
小 ”， 不 过 这 个 值 目前 还 没什么 用 《说 不 定 以 后 也 
不 会 有 什么 用 ) » KRSNA EME Jo Æ 
hello4.hrb 中 ， 这 个 值 并 没有 被 设置 ， 所 以 为 0。 


0x000c 中 存放 的 是 应 用 程序 启动 时 ESP 寄 存 右 的 初 
始 值 ， 也 就 是 说 在 这 个 地 址 之 前 的 部 分 会 被 作为 栈 
来 使 用 ， 而 这 个 地 址 将 被 用 于 存放 字符 串 等 数据 。 
在 hello4.hrb 中 ， 这 个 值 为 0x400...... 也 就 是 说 ESP 
寄存 器 的 初始 值 为 0x400， 并 且 分 配 了 1KB 的 栈 空 
间 。1KB 这 个 数 是 从 哪里 来 的 呢 ? 其 实 是 在 生成 

hello4.bim 的 时 候 ， 在 Makefile 中 设置 的 〈 注 意 

看 “stack:1k” 这 里 ! ) 。 


hello4.bim : hello4.obj a_nask.obj Makefile 


$(OBJ2BIM) @$(RULEFILE) out:hello4.bim stack:1k 
map:hello4.map \ 
hello4.obj a_nask.obj 


0x0010 中 存放 的 是 需要 问 数 据 段 传送 的 部 分 的 字 市 
数 。 


0x0014 中 存放 的 是 需要 问 数 据 段 传送 的 部 分 在 .hrb 
文件 中 的 起 始 地 址 。 


0x0018 中 存放 的 是 0xe9000000 这 个 数值 ， 这 个 数 在 
内 存 中 存放 的 时 候 形 式 为 “00 00 00 E9”。 前 面 几 个 
00 的 部 分 没什么 用 ， 后 面 的 E9 才 是 关键 。 其 实 E9 是 
JMP 指 令 的 机 器 语言 编码 ， 和 后 面 4 个 字 节 合 起 来 
的 话 ， 束 表示 JMP 到 应 用 程序 运行 的 入 口 地 址 。 


0x001c 中 存放 的 是 应 用 程序 运行 入 口 地 址 减 去 0x20 
后 的 值 。 为 什么 不 直接 写 上 上 入口 地 址 而 是 要 减 掉 一 
个 数 昵 ”因为 我 们 在 0x0018 (其 实 是 0x001b) 写 了 
一 个 JMP 指 令 ， 这 样 可 以 通过 JMP 指 令 跳 转 到 应 用 
程序 的 运行 入 口 地 址 。 通 过 这 样 的 处 理 ， 只 要 先 
JMP 到 0x001b 这 个 地 址 ， 程 序 就 可 以 开始 运行 了 。 


0x0020 中 存放 的 是 将 来 编写 应 用 程序 用 malloc 函 数 
时 要 使 用 的 地 址 ， 因 此 现在 先 不 用 党 它 。malloc 这 


个 函数 和 memman_alloc 函 数 十 分 相似 。 


根据 上 面 的 讲解 ， 我 们 来 修改 console.c。 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


{ 


int segsiz, datsiz, esp, dathrb; 


CHH) 


if (finfo != 6) { 
/*# 找 到 文件 的 情况 */ 
p = (char *) memman_alloc_4k(memman, finfo- 
>size); 


file loadfile(finfo->clustno, finfo->size, p, 
fat, (char *) (ADR_DISKIMG + @x@@3e@@) ); 
if (finfo->size >= 36 && strncmp(p + 4, "Hari", 
A) == O && *p == 0x00) { 
segsiz = *((int *) (p + 0x0000)); 
esp = *((int *) (p + @x@@@c)); 
datsiz = *((int *) (p + 0x@Q@10)); 
dathrb = *((int *) (p + 0x0014)); 
q = (char *) memman_alloc_4k(memman, 
segsiz); 
*((int *) Oxfe8) = (int) q; 
set_segmdesc(gdt + 1003, finfo->size - 1, 
(int) p, AR_CODE32_ER + @x60); 
set_segmdesc(gdt + 1004, segsiz - 1, 
(int) q, AR_DATA32_RW + 0x60); 


for (i = 6j i < datsiz; i++) { 
qlesp + i] = p[dathrb + i]; 


start_app(@x1b, 1003 * 8, esp, 1004 * 8, & 
(task->tss.esp@) ); 
memman_free_4k(memman, (int) q, segsiz); 
} else { 
cons_putstr@(cons, ".hrb file format 
error.\n"); 
} 
memman_free 4k(memman, (int) p, finfo->size); 
cons_newline(cons) ; 
return 1; 


} 
/* 没 有 找到 文件 的 情况 */ 


return ð; 


本 次 修改 的 要 点 如 下 : 
。 文 件 中 找 不 到 “Hari” 标 志 则 报错 。 


。 数 据 段 的 大 小 根据 .hrb 文 件 中 指定 的 值 进行 分 
配 。 


。 将 .hrb 文 件 中 的 数据 部 分 先 复 制 到 数据 段 后 再 局 
动 程序 。 


我 们 来 “make run” 一 下 。hello4.hrb 运 行 成 功 了 ， 但 
不 是 由 bim2hrb 生 成 的 hello.hrb 等 程序 就 会 出 错 。 在 
以 后 的 内 容 中 ， 即 便 使 用 汇编 语言 编写 应 用 程序 ， 


我 们 也 需要 先生 成 .obj 文 件 ， 然 后 再 生成 .bim 并 转 
换 成 .hrb。 这 样 一 来 即便 将 文件 扩展 名 i Fa hrb, 
也 不 会 发 生 运 行 不 该 运行 的 文件 的 风险 了 


终于 运行 了 

下 面 我 们 用 一 个 例子 来 看 看 只 用 汇编 语言 编写 应 用 
程序 的 情形 ， 我 们 写 一 段 和 hello4.c 功 能 相同 的 程 
序 。 


本 次 的 hello5.nas 


[FORMAT "WCOFF" | 
[INSTRSET "i486p"] 
[BITS 32] 

[FILE "hello5.nas" | 


GLOBAL _HariMain 
[SECTION .text] 


_HariMain: 
MOV EDX, 2 


MOV EBX,msg 


INT 0x40 
MOV EDX, 4 
INT 0x40 


[SECTION .data] 


msg: 


DB "hello, world", Ox@a, 0 


将 上 和 面 的 程序 make 一 下 ， 得 到 78 个 字 节 的 
hello5.hrb， 而 同样 内 容 的 hello4.hrb 却 需要 114 个 字 
节 ， 果 然 还 是 汇编 语言 比较 节省 呢 〈 笑 ) 。 


在 WCOFF 模 式 下 的 nask 中 必须 要 使 用 SECTION 命 
令 ， 这 个 命令 是 用 来 下 达 “ 将 程序 的 这 个 部 分 放 在 
代码 段 ， 将 那个 部 分 放 在 数据 段 " 之 类 的 指示 (不 
过 在 .obj 文 件 中 不 用 “ 段 *[segment] 这 个 词 ， 而 是 

用 “区 ”[section]， 比 如 代码 段 在 这 里 要 被 称 为 文本 
X [text section]. HITA? 笔者 也 不 知道 ， 从 一 开 
台 就 是 这 样 叫 的 ， 如 果 你 有 意见 的 话 ..….. 笔 者 也 不 
知道 该 去 找 谁 投诉 了 ， 不 好 意思 啦 ) 。 


如 果 大 家 明白 了 .hrb 文 件 中 所 包含 的 信息 ， 那 么 对 
于 asmhead.nas 启 动 bootpack.hrb 的 部 分 ， 应 该 也 会 
理解 得 更 透彻 了 。 


说 段 题 外 话 。 在 一 般 操 作 系 统 的 可 执行 文件 中 都 
会 加 入 像 “Hari” 这 样 的 标记 ， 不 过 通常 情况 下 这 
个 标记 会 放 在 文件 的 开头 。 例 如 ，Windows 的 .exe 
文件 开 涉 两 个 字 节 内 容 束 是 “MZ”。 那 么 .hrb 文 件 
中 的 标记 为 什么 不 放 在 开头 ， 而 是 从 第 4 个 字 节 开 
GANG? 下 面 来 讲解 一 下 。 


笔者 的 考虑 是 ， 如 果 将 标记 存放 在 文件 开头 ， 有 
些 普通 的 文本 文件 在 侦 然 的 情况 下 也 有 可 能 带 有 
与 标记 相同 的 人 字符， 从 而 被 误 认 为 是 可 执行 文 
件 。 当 然 ， 我 们 还 会 通过 扩展 名 来 进行 区 分 ， 所 
Lilet REA Asset, (HOARY JR 4 ASE 
的 话 ， 束 没 必 要 加 什么 标记 了 。 正 是 因为 通过 扩 
展 名 判断 有 时 候 会 出 错 ， 我 们 才 特 地 加 了 4 个 字 节 
的 标记 ， 而 如 宋 不 将 标记 放 在 文件 开头 可 以 进 一 
步 减 少 和 普通 文本 文件 混 消 的 可 能 性 的 话 ， 那 为 
什么 不 这 样 做 呢 ? 


开头 的 4 个 字 市 我 们 用 来 存放 数据 段 的 大 小 ， 而 

bim2hrb 会 自动 将 数据 段 大 小 调整 为 4KB 的 倍数 ， 

因此 低位 的 8 个 比特 总 是 0x00， 也 就 是 说 ， 文 件 开 
头 的 第 1 个 字 节 肯定 是 “00”。 普 通 的 文本 文件 不 可 
能 一 上 来 束 以 “00? 开 头 ， 因 此 束 不 大 可 能 将 文本 
文件 误 认 为 成 可 执行 文件 了 。 


将 存放 “Hari” 的 位 置 推 后 4 个 字 节 就 可 以 如 此 显著 


iter Zee, RMA re MW SI, 2 
Ay a) 
么 从 为 的 《 


少 笔者 目 己 是 这 么 认为 的 〈 突 ) 


6 显示 窗口 (harib19f) 


用 应 用 程序 显示 字符 已 经 玩 必 了 ， 这 次 我 们 来 挑 成 
让 应 用 程序 显示 窗口 吧 。 这 要 如 何 实现 呢 ? 我 们 只 
要 编写 一 个 用 来 显示 窗口 的 API 就 可 以 了 ， 上 听 起 来 
很 简单 吧 。 


这 个 API 应 该 写成 什么 样 呢 ? 考虑 了 一 番 之 后 ， 我 
们 决定 这 样 设 计 。 


EDX=5 


EBX = 窗口 缓冲 区 


ESI = 窗口 在 x 轴 方向 上 的 大 小 《〈 即 窗口 宽度 ) 
EDI = 窗口 在 y 轴 方向 上 的 大 小 《〈 即 窗口 高 度 ) 


EAX = 透明 色 


ECX = 窗口 名 称 

调用 后 ， 返 回 值 如 下 : 

EAX = 用 于 操作 窗口 的 句柄 《〈 用 于 刷新 窗口 等 操 
VE ) 


确定 思路 之 后 ， 新 的 问题 又 来 了 : 我 们 没有 考虑 如 
何在 调用 API 之 后 将 值 存 入 寄存 器 并 返回 给 应 用 程 
FF 


不 过 说 起 来 ， 在 asm_hrb_api 中 我 们 执行 了 两 次 
PUSHAD， 第 一 次 是 为 了 保存 寄存 器 的 值 ， 第 二 次 
是 为 了 问 hrb_api 传 递 值 。 因 此 如 果 我 们 查 出 被 传递 
的 变量 的 地 址 ， fee er ee 该 正好 存放 着 
相同 的 寄存 器 的 值 。 然 后 只 要 修改 那个 值 ， 束 可 以 
由 POPAD 获 取 修 改 后 的 值 ， 实 现 将 值 返回 给 应 用 程 
序 的 功能 。 


我 们 来 按 这 种 思路 编写 程序 。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


{ 


int ds_base = *((int *) Oxfe8); 
struct TASK *task = task_now(); 
struct CONSOLE *cons = (struct CONSOLE *) *((int *) 
exefec); 
struct SHTCTL *shtctl = (struct SHTCTL *) *((int *) 
Q@xefed) ; /* 从 此 开始 */ 
struct SHEET *sht; 
int *reg = &eax + 1; /* eax 后 面 的 地 址 */ 
/* 强 行 改写 通过 PUSHAD 保 存 的 值 */ 
/* reg[8] : EDI, reg[1] : ESI, reg[2] : 
EBP, reg[3] : ESP */ 
/* reg[4] : EBX, reg[5] : EDX, reg[6] : 


ECX, reg[7] : EAX */ ”/* 到 此 结束 */ 


if (edx == 1) { 
cons_putchar(cons, eax & Oxff, 1); 
} else if (edx == 2) { 
cons_putstr@(cons, (char *) ebx + ds_base); 
} else if (edx == 3) { 
cons_putstri(cons, (char *) ebx + ds_base, 
ecx); 
} else if (edx == 4) { 
return &(task->tss.esp@) ; 
} else if (edx == 5) { /* 从 此 开始 */ 
sht = sheet_alloc(shtct1) ; 
sheet setbuf(sht, (char *) ebx + ds base, esi, 
edi, eax); 
make window8((char *) ebx + ds base, esi, edi, 
(char *) ecx + ds base, @); 
sheet slide(sht, 100, 50); 
sheet_updown(sht，3);  /#* 背 景 层 高 度 3 位 于 task_a 之 


Beh; 
reg[7] = (int) sht; /* 到 此 结束 */ 


return ð; 


shtctl 的 值 是 bootpack.c 的 HariMain 中 的 变量 ， 因 此 
我 们 可 以 从 0x0fe4 地 址 获得 。reg 就 是 我 们 为 了 回应 
用 程序 返回 全 所 动 的 手脚 。 


窗口 我 们 就 暂且 显示 在 (100,50) 这 个 位 置 上 ， 背 
景 层 高 度 3。 


bootpack.c'# ta IIN S147 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CRH) 
*((int *) @x@fe4) = (int) shtctl; 
CRH) 


CLLD 
我 们 编写 这 样 一 个 应 用 程序 来 测试 。 


本 次 的 a_nask.nas 节 选 


_api_openwin: 3 int api_openwin(char *buf, int xsiz, 
int ysiz, int col_inv, char *title); 
PUSH EDI 
PUSH ESI 
PUSH EBX 
MOV EDX,5 
MOV EBX, [ESP+16 | ; buf 
MOV EST, [ESP+20 | ; XSİZ 
MOV EDI, [ESP+24 ] ; ysiz 
MOV EAX, [ESP+28 ] ; col_inv 
MOV ECX, [ESP+32 | ; title 
INT 0x40 
POP EBX 
POP ESI 
POP EDI 
RET 


本 次 的 winhelo.c 


int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 
void api_end(void) ; 


char buf[150 * 50]; 


void HariMain(void) 
{ 
int win; 
win = api_openwin(buf, 150, 50, -1, "hello"); 
api_end(); 


这 些 程序 应 该 不 用 解释 了 吧 ? 
CLLD 


我 们 来 “make run”， 好 ， 快 出 现 吧 ， 窗 口 ! ...... H 
来 了 ! 


显示 出 来 了 哦 ! 


7 在 窗口 中 描绘 字符 和 方块 
Charib19¢ ) 


虽然 时 间 已 经 很 晚 了 ， 大 家 也 很 图 了 了， 不 过 看 到 成 
功 显示 出 窗口 ， 我 们 的 精神 又 振奋 了 起 来 ， 所 以 我 
们 再 来 试 一 下 在 窗口 上 显示 字符 和 方块 吧 。 这 两 个 
功能 都 是 现成 的 ， 只 要 加 在 API 上 面 就 可 以 了 。 


在 窗口 上 显示 字符 的 API 如 下 : 


EDX = 6 
EBX = 窗口 句柄 


ESI = 显示 位 置 的 x 坐标 


EDI = 显示 位 置 的 y 坐 标 


EAX = 色 号 


ECX = 字符 串 长 度 
EBP = i 


摘 绘 方块 的 API 如 下 : 


EDX =7 
EBX = 窗口 句柄 
EAX = x0 

ECX = y0 

ESI = x1 
EDI = y1 
EBP = 65 


叹 哟 ， 真 巧 ， 如 宋 再 多 一 个 参数 寄 仓 器 就 要 个 够 用 
J. 


|i | yy HE 
接 下 来 就 是 写 程 序 了 ， 这 个 简单 。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CHH) 


if (edx == 1) { 


cons_putchar(cons, eax & Oxff, 1); 
} else if (edx == 2) { 
cons_putstr@(cons, (char *) ebx + ds_base); 
} else if (edx == 3) { 
cons_putstri(cons, (char *) ebx + ds_base, 
ecx); 


} else if (edx == 4) { 
return &(task->tss.esp®); 
} else if (edx == 5) { 
(中 上 略 ) 
} else if (edx == 6) { 
/* 从 此 开始 */ 
sht = (struct SHEET *) ebx; 
putfonts8 asc(sht->buf, sht->bxsize, esi, edi, 
eax, (char *) ebp + ds_base); 
sheet_refresh(sht, esi, edi, esi + ecx * 8, edi 
+ 16); 
} else if (edx == 7) { 
sht = (struct SHEET *) ebx; 
boxfill8(sht->buf, sht->bxsize, ebp, eax, ecx, 
esi, edi); 
sheet_refresh(sht, eax, ecx, esi + 1, edi + 1); 
/* 到 此 结束 */ 
} 


return ð; 


操作 系统 的 修改 完成 了 ， 下 面 来 修改 应 用 程序 。 


AS YR AJa_nask.nas 5 4 


_api_putstrwin: ; void api_putstrwin(int win, int x, 
int y, int col, int len, char *str); 


PUSH EDI 


PUSH ESI 
PUSH EBP 

PUSH EBX 

MOV EDX, 6 

MOV EBX, [ESP+20] ; win 
MOV ESI, [ESP+24] ; x 
MOV EDI, [ESP+28] sy 
MOV EAX, [ESP+32] ; col 
MOV ECX, [ESP+36] ; len 
MOV EBP, [ESP+40] ; str 
INT 0x40 

POP EBX 

POP EBP 

POP ESI 

POP EDI 

RET 


_api_boxfilwin: ; void api_boxfilwin(int win, int x®, 
int y@, int x1, int y1, int col); 


PUSH EDI 
PUSH ESI 

PUSH EBP 

PUSH EBX 

MOV EDX,7 

MOV EBX, [ESP+20] ; win 
MOV EAX, [ESP+24] ; x® 

MOV ECX, [ESP+28] ; ye 

MOV ESI, [ESP+32] ; x1 

MOV EDI, [ESP+36] ; yl 

MOV EBP, [ESP+40] ; col 
INT 0x40 

POP EBX 

POP EBP 

POP ESI 


POP EDI 


RET 


AS YR AJ winhelo2.c7i 4% 


int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 

void api_putstrwin(int win, int x, int y, int col, int 
len, char *str); 

void api_boxfilwin(int win, int xð, int yO, int x1, int 
y1, int col); 

void api_end(void) ; 


char buf[150 * 50]; 


void HariMain(void) 
{ 
int win; 
win = api_openwin(buf, 150, 50, -1, "hello"); 
api_boxfilwin(win, 8, 36, 141, 43, 3 /* 黄 色 */); 
api_putstrwin(win, 28, 28, © /*#8f4*/, 12, "hello, 
world"); 
api_end(); 


} 


KJER, “make run2” 之 后 结果 如 下 。 对 了 ， 刚 刚 
态 记 说 了 ，bug1.hrb 己 经 没有 用 了 ， 所 以 把 它 删 掉 
J 了 哦 。 


lo? 
hello 
hello, world 


完成 了 ! 


运行 得 很 顺利 ， 心 里 相当 满 音 呀 。 那 么 今天 束 到 这 
里 吧 ， 大 家 晚安 ， 明 天 见 哦 。 


第 23 天 ”图形 处 理 相 关 


编写 malloc (harib20a) 

画 点 (harib20b) 

刷新 窗口 (harib20c) 

。 男 直线 (harib20d) 

e KHAO (harib20e) 

。 键 盘 输 入 API (harib20f) 

。 用 键盘 输入 来 消 中 一 下 (Charib20g ) 
。 强制 结束 并 关闭 窗口 Charib20h ) 


1 编写 malloc (harib20a ) 


大 家 早上 好 ， 今 天 心情 真 不 错 ， 让 我 们 来 继续 努力 
吧 ! 


昨天 我 们 显示 出 了 窗口 并 绘制 了 方块 、 显 示 了 文 
字 ， 今 天 我 们 要 来 绘制 更 多 的 东西 。 不 过 ， 一 开始 
我 们 先 来 做 后 别 的 事情 。 


今天 早上 在 玩 “ 纸 娃娃 系统 ”的 时 候 发 现 一 个 问题 ， 
winhelo2.hrb 居 然 有 7.6KB。 实 现 了 窗口 显示 功能 之 
后 ， 可 执行 文件 束 一 下 子 变 得 那么 大 ， 这 令 笔 者 十 
TAR CEE: 笔者 就 走 欢 短小 精 悍 的 程序 ) 。 


为 了 找 原 因 ， 笔 者 用 二 进 制 编辑 器 打开 
winhelo2.hrb 看 了 看 ， 里 面 大 然 有 很 多 的 “00”， 这 到 
底 是 怎么 回 事 ! 


于 是 笔者 义 回去 检查 了 一 遍 源 人 代码， 发现 原因 在 于 
winhelo2.c 的 char buf[150 * 50]; 这 一 句 ， 这 相当 于 
在 可 执行 文件 中 插入 了 150x50 三 7500 个 字 节 

的 “00”， 和 汇编 语言 中 的 RESB 7500 是 等 效 的 。 


只 要 去 挥 这 句 ， 可 执行 文件 束 可 以 变 小 很 多 ， 问 题 
是 怎样 才能 实现 呢 ? 如 果 应 用 程序 也 有 一 个 类 似 
memman_alloc 的 函数 用 于 分 配 内 存 空 间 就 好 了 。 在 
操作 系统 中 ， 这 样 的 功能 一 般 被 称 为 malloc， 因 此 
我 们 就 来 编写 一 个 api_malloc 函 数 吧 。 


如 果 api_malloc 只 是 调用 操作 系统 中 的 
memman_alloc， 并 将 分 配 到 的 内 存 空间 地 址 返回 给 
应 用 程序 的 话 ， 是 行 不 通 的 ， 因 为 通过 
memman_alloc 所 获得 的 内 存 空间 并 不 位 于 应 用 程序 
的 数据 段 范围 内 ， 应 用 程序 是 无 法 进行 读 写 操作 
的 。 如 果 应 用 程序 在 不 知情 的 情况 下 执行 了 读 写 操 
作 ， 将 会 产生 异常 并 强制 结 


说 到 压 ， 应 用 程序 可 以 进行 读 写 的 只 是 最 开始 操作 

系统 为 它 准备 好 的 数据 段 中 的 内 存 空间 而 已 ， 那 么 

如 果 我 们 一 开始 就 将 应 用 程序 用 的 数据 段 分 配 得 大 

一 点 ， 当 需要 malloc 的 时 候 从 多 余 的 空间 里 面 拿 出 
小 部 分 来 交 给 应 用 程序 不 束 好 了 吗 ? 


其 实 ， 市 面 上 大 多 数 操作 系统 中 ， 当 请 求 malloc 
的 时 候 会 根据 需要 调整 应 用 程序 的 段 大 小 。 而 这 
次 我 们 在 “ 纸 娃娃 系统 ?中 所 采用 的 事先 多 分 配 内 
存 空间 的 方法 ， 实 在 算 不 上 媳 个 聪明 的 办 法 。 


不 过 由 于 我 们 今后 还 会 对 操作 系统 进行 各 种 改 
民 ， 因 此 现在 就 先 用 这 个 牺 办 法 将 整 一 下 吧 ， 一 
开始 就 选择 最 聪明 的 办 法 还 是 很 有 难度 的 。 


虽说 我 们 要 “事先 多 分 配 一 些 内 存 空 间 ”， 但 如 果 由 
操作 系统 单方 面 定 一 个 值 ， 比 如 100KB， 可 能 某 些 
情况 下 不 够 用 ， 某 些 情况 下 又 浪费 了 ， 因 此 还 是 像 
栈 一 样 ， 在 编写 应 用 程序 的 时 候 指 定 出 来 比较 好 。 
这 样 一 来 ， 当 应 用 程序 需要 使 用 很 多 malloc 时 可 以 
设 定 为 1MB 之 类 的 ， 而 当 应 用 程序 完全 不 需要 使 用 
malloc} M aJ URENO. 


在 哪里 指定 这 个 值 呢 ?我 们 在 用 bim2hrb 的 时 候 指 
定 。 之 前 我 们 都 是 像 下 面 这样 直 接 指 定 为 0 的 。 


$(BIM2HRB) winhelo2.bim winhelo2.hrb 0 


但 这 里 如 果 改 成 3k 的 话 ， 系 统 就 会 为 malloc 准 备 
3KB 的 内 存 空间 。 


当 指 定 了 malloc 所 需 内 存 大 小 时 ， 这 个 数值 会 和 栈 
等 的 大 小 进行 累加 ， 并 写 入 .hrb 文 件 最 开头 的 4 个 字 
节 中 。 因 此 ， 操 作 系 统 不 需要 做 任何 改动 ， 残 可 以 
确保 在 应 用 程序 段 中 分 配 到 包括 malloc 所 需 部 分 在 
内 的 全 部 内 存 空间 。 


同时 ，malloc 用 的 内 存 空 间 在 数据 段 中 的 开始 位 
置 ， 被 保存 在 .hrb 文 件 的 0x0020 处 。 


TECT 
既然 如 此 ， 我 们 就 可 以 将 API 设 计 成 如 下 式样 : 
memman 初 始 化 

EDX=8 

EBX=memman 的 地 址 

EAX=memman 所 管理 的 内 存 空间 的 起 始 地 址 
ECX=memman 所 管理 的 内 存 空间 的 字 节 数 


malloc 

EDX=9 

EBX=memman 的 地 址 
ECX= fii 22 1 RA FH K 


EAX= 分 配 到 的 内 存 空间 地 址 


free 

EDX=10 

EBX=memman 的 地 址 

EAX= 和 需要 释放 的 内 存 空间 地 址 
ECX= 和 需要 释放 的 字 市 数 

根据 上 述 式 样 ， 我 们 来 修改 console.c。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


(中 上 略 ) 
} else if (edx == 8) { 
memman_init((struct MEMMAN *) (ebx + ds_base)); 
ecx &= Oxfffffffe; /* 以 16 字 节 为 单位 */ 
memman_free( (struct MEMMAN *) (ebx + ds_base), 
eax, ecx); 
} else if (edx == 9) { 
ecx = (ecx + @xef) & 6xfffffff6; /* 以 16 字 节 为 单 
位 进位 取 整 */ 
reg[7] = memman_alloc((struct MEMMAN *) (ebx + 
ds base), ecx); 
} else if (edx == 10) { 


ecx = (ecx + OxO@f) & 6xfffffff6; /* 以 16 字 节 为 单 
位 进位 取 整 */ 
memman_free((struct MEMMAN *) (ebx + ds_base), 
eax, ecx); 


} 


return ð; 


然后 我 们 来 编写 应 用 程序 。 


本 次 的 a_nask.nas 闻 选 


_api initmalloc: 
PUSH 
MOV 
MOV 

址 
MOV 
ADD 
MOV 
SUB 
INT 
POP 
RET 


_api malloc: 
PUSH 
MOV 
MOV 
MOV 
INT 
POP 
RET 


; void api_initmalloc(void) ; 


EBX 
EDX, 8 
EBX, [CS :0x0020] ; malloc 内 存 空间 的 地 


EAX, EBX 

EAX, 32*1024 ; 加 上 32KB 
ECX, [CS :0x0000] ; 数据 段 的 大 小 
ECX, EAX 

0x40 

EBX 


; char *api_malloc(int size); 
EBX 
EDX, 9 
EBX, [CS :0x0020] 
ECX, [ESP+8] ; size 
0x40 
EBX 


_api_free: ; void api_free(char *addr, int 
size); 


PUSH EBX 
MOV EDX, 10 

MOV EBX, [CS:0x0020] 

MOV EAX, [ESP+ 8] ; addr 
MOV ECX, [ESP+12 ] ; size 
INT 0x40 

POP EBX 

RET 


本 次 的 winhelo3.c 


int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 

void api_putstrwin(int win, int x, int y, int col, int 
len, char *str); 

void api_boxfilwin(int win, int xð, int yO, int x1, int 
y1, int col); 

void api_initmalloc(void) ; 

char *api_malloc(int size); 

void api_end(void) ; 


void HariMain(void) 
{ 

char *buf; 

int win; 


api_initmalloc(); 

buf = api _ malloc(156 * 50); 

win = api_openwin(buf, 150, 50, -1, "hello"); 

api_boxfilwin(win, 8, 36, 141, 43, 6 /* 浅 葛 色 */); 

api_putstrwin(win, 28, 28, © /# 黑 色 */，12， "hello, 
world"); 

api_end(); 


PO 


应 该 没有 什么 难点 ， 不 过 ， 有 一 个 地 方 需要 注意 : 

malloc 用 来 管理 内 存 的 结构 (struct MEMMAN) 4 

放 在 malloc 内 存 空 间 最 开始 的 地 方 ， 因 此 要 多 申请 

出 一 些 malloc 所 需 的 空间 用 于 存放 这 个 结构 。 那 

么 ， 在 winhelo3.hrb 中 总 共 申 请 了 40k 的 空间 
(32+8=40) 。 


又 到 了 “make run” 的 时 间 ， 在 运行 之 前 我 们 先 用 dir 
来 看 一 下 文件 的 大 小 。 现 在 只 有 387 个 字 节 了 ， 太 
好 了 ! 然后 我 们 来 运行 程序 ..……. 运行 成 功 ! 


WINHELO: 
WINEELO: 


RA387 i AST MY SR 


当然 ， 如 采用 nask 来 编写 的 话 程序 应 该 会 更 小 ， 不 
过 那 实在 能 累 死 人 ， 还 是 免 了 吧 。 


2 男 点 Charib20b) 


终于 进入 今天 的 正题 一 一 图 形 处 理 了 。 虽 然 我 们 已 
经 可 以 描绘 字符 和 方块 了 ， 但 现在 却 还 不 能 画 点 
呢 。 其 实 仔 细 想 想 ， 只 要 能 画 点 就 可 以 画 出 任何 图 
形 ， 画 点 简直 是 基本 中 的 基本 。 然 而 就 是 这 最 基本 
的 东西 到 现在 都 还 没有 实现 ， 这 是 怎么 搞 的 嘛 ! 好 
了 ， 我 们 马上 来 编写 。 

编写 画 点 的 API 太 有 麻烦 了 ， 笔 者 想 要 不 就 用 男方 块 
的 API 画 一 个 1 像素 见方 的 小 方块 来 代 蔡 好 了 ..……… 不 
过 这 样 一 来 各 位 读者 肯定 会 发 狐 的 ， 还 是 不 要 小 聪 
明了 ， 认 认真 真 来 编写 这 个 API 吧 ( 笑 ) 。 

在 窗口 中 画 点 


EDX =11 


EBX = 窗口 句柄 


ESI = 显示 位 置 的 x 坐标 


EDI = 显示 位 置 的 y 坐 标 


EAX = 色 号 


虽 ， 看 上 去 挺 简 单 的 ， 三 两 下 就 能 写 出 来 了 。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


(中 上 略 ) 

} else if (edx == 11) { 
sht = (struct SHEET *) ebx; 
sht->buf[sht->bxsize * edi + esi] = eax; 
sheet_refresh(sht, esi, edi, esi + 1, edi + 1); 


} 


return ð; 


好 ， 完 工 啦 。 


我 们 写 一 个 什么 样 的 应 用 程序 好 呢 ? 可 以 夯 扣 的确 
意味 着 可 以 男 出 任何 图 形 ， 不 过 这 样 一 来 驶 更 不 知 
道 该 干 哈 了 。 要 不 就 在 黑色 的 背景 上 男 一 个 呐 色 的 
点 吧 ， 题 日 “最 腕 的 星 ”。 


本 次 的 a_nask.nas 闻 选 


_api_point: ; void api_point(int win, int x, int y, 
int col); 
PUSH EDI 


PUSH ESI 


PUSH EBX 


MOV EDX, 11 

MOV EBX, [ESP+16] ; win 
MOV ESI, [ESP+20] ; x 
MOV EDI, [ESP+24] sy 
MOV EAX, [ESP+28] ; col 
INT 0x40 

POP EBX 

POP ESI 

POP EDI 

RET 


本 次 的 star1l.c 


int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 

void api_boxfilwin(int win, int xð, int yO, int x1, int 
y1, int col); 

void api_initmalloc(void) ; 

char *api_malloc(int size); 

void api_point(int win, int x, int y, int col); 

void api_end(void) ; 


void HariMain(void) 


{ 


char *buf; 

int win; 

api_initmalloc(); 

buf = api_malloc(150 * 100); 

win api_openwin(buf, 150, 100, -1, "star1"); 
api_boxfilwin(win, 6, 26, 143, 93, © /* 黑 色 */); 
api_point(win, 75, 59, 3 /* 黄 色 */ ) ; 

api_end(); 


和 之 前 一 样 ， 这 个 程序 也 相当 简单 ， 不 过 貌似 光 看 
名 字 束 让 人 感觉 这 个 程序 很 有 料 啊 ( 笑 〉。 
我 们 来 “make run”， 运 行 成 功 ， 意 料 之 中 。 不 过 说 
起 来 ， 要 是 这 么 简单 的 程序 还 出 错 的 话 也 太 对 不 起 
笔者 的 实力 了 。 


最 亮 的 星星 找到 了 ! 


做 这 种 小 程序 当然 会 成 功 啦 ， 所 以 没有 以 往 的 那 种 
DOES, ERE LEMS Ee Fe mS, RAID 


多 画 些 星星 吧 ， 就 画 30 个 左右 。 


本 次 的 stars.c 


int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 

void api_boxfilwin(int win, int xð, int yO, int x1, int 
y1, int col); 

void api_initmalloc(void) ; 


char *api_malloc(int size); 
void api_point(int win, int x, int y, int col); 
void api_end(void); 


int rand(void); /# 产 生 6 一 32767 之 间 的 随机 数 */ 


void HariMain(void) 
{ 
char *buf; 
int win, i, X, Yy; 
api_initmalloc(); 
buf = api_malloc(150 * 100); 
win = api_openwin(buf, 150, 100, -1, "stars"); 
api_boxfilwin(win, 6, 26, 143, 93, © /*#f4*/); 
for (i = ð; i < 50; i++) { 
x = (rand() % 137) + 6; 
y = (rand() % 67) + 26; 
api_point(win, x, y, 3 /* 黄 色 */); 


api_end(); 


我 们 来 讲解 一 下 这 里 出 现 的 rand 函 数 。 这 个 函数 和 
sprintf、stremp 一 样 ， 都 是 编译 费 目 市 的 函数 ， 它 
的 功能 是 随机 产生 位 于 0 一 32767 的 一 个 数字 ， 术 语 
称 为 “随机 数 ”"， 这 个 函数 也 可 以 称 为 “ 般 子 函 数 ”。 


“%” 这 个 运算 和 从 的 功能 是 求 除法 运算 的 余数 ， 在 舍 
入 取 整 的 地 方 我 们 曾经 讲 到 过 ， 所 以 这 里 就 一 笔 市 
过 吧 。 将 随机 数 的 值 除 以 123 求 余 ， 结 果 一 定 落 在 0 
一 122 之 间 ， 也 就 是 说 ， 我 们 可 以 得 到 一 个 0 一 122 
的 随机 数 。 


其 实 所 谓 随 机 数 也 是 通过 计算 得 到 的 ， 电 脑 中 不 可 
能 真有 一 个 角子 ， 即 便 重 新 运行 应 用 程序 ， 得 到 的 
结果 也 总 是 一 样 的 。 因 此 大 家 “make run” 之 后 所 看 
到 的 星 衬 ， 和 笔者 这 里 看 到 的 应 该 是 一 样 的 。 


于 是 我 们 来 “make run”. EX Y! 


呼 ， 星 空 真 美丽 呀 ! 


可 能 有 人 会 间 ， 这 些 星座 我 怎么 都 没 见 过 ? 要 从 哪 
个 角度 看 星空 才能 看 到 这 样 的 排列 啊 ? 咳 咳 ， 其 实 
上 呢 ， 这 是 从 笔者 的 朋友 所 居住 的 外 星球 上 所 看 到 的 
性 衬 哦 。 下 次 他 还 会 不 会 乘坐 UFO 来 地 球 玩 呢 .……. 
呵呵 。 


3 刷新 窗口 (harib20c ) 


在 写 stars.hrb 的 时 候 突 然 想 到 一 个 问题 ， 现 在 每 次 
调用 api_point 画 点 ， 窗 口 都 会 被 刷新 一 次 ， 这 样 感 
觉 会 非常 慢 ， 还 不 如 把 星星 都 画 好 之 后 ， 最 后 再 刷 
新 一 次 窗口 ， 这 样 应 该 会 快 一 些 。 

于 是 ， 我 们 需要 在 所 有 的 窗口 绘图 命令 中 设置 一 
个 “不 目 动 刷新 ”的 选项 ， 然 后 再 编写 一 个 仅 用 来 刷 
新 的 API。 

这 个 选项 要 如 何 指定 呢 ? 窗口 句柄 归根 到 欣 是 struct 
SHEET 的 地 址 ， 这 一 定 是 一 个 偶数 ， 那 么 我 们 可 以 
让 程序 在 指定 一 个 奇数 〈 即 在 原来 的 数值 上 加 1) 
的 情况 下 不 进行 目 动 刷 新 。 

仅 用 来 刷新 的 API 式 样 如 下 。 

刷新 窗口 


EDX = 12 


EBX = 窗口 句柄 


EAX = x0 


ECX = y0 
ESI = x1 
EDI = y1 
it i Yt 
修改 操作 系统 ， 具 体 如 下 。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


(中略 》 
} else if (edx == 6) { 
sht = (struct SHEET *) (ebx & Oxfffffffe) ; 
putfonts8 asc(sht->buf, sht->bxsize, esi, edi, 
eax, (char *) ebp + ds_base); 
if ((ebx & 1) == @) { 
sheet_refresh(sht, esi, edi, esi + ecx * 8, 
edi + 16); 
} 
} else if (edx == 7) { 
sht = (struct SHEET *) (ebx & Oxfffffffe) ; 
boxfill8(sht->buf, sht->bxsize, ebp, eax, ecx, 
esi, edi); 
if ((ebx & 1) == @) { 
sheet_refresh(sht, eax, ecx, esi + 1, edi + 
1); 


} else if (edx == 8) { 


CRH) 

} else if (edx == 9) { 
CRH) 

} else if (edx == 10) { 
CRH) 


} else if (edx == 11) { 
sht = (struct SHEET *) (ebx & 6xfffffffe ) ; 
sht->buf[sht->bxsize * edi + esi] = eax; 
if ((ebx & 1) == 0) { 
sheet_refresh(sht, esi, edi, esi + 1, edi + 
1); 


} 

} else if (edx == 12) { 
sht = (struct SHEET *) ebx; 
sheet_refresh(sht, eax, ecx, esi, edi); 


} 


return ð; 


在 计算 sht 的 地 方 ， 我 们 将 ebx 和 0xfffffffe 做 了 一 个 
AND 运 算 ， 即 对 其 按 2 的 倍数 取 整 。 然 后 在 判断 是 
售 需 要 刷新 的 许 语句 中 ， 我 们 将 ebx 最 低 的 一 个 比特 
用 AND 取 出 ， 判 断 其 是 否 为 0， 如 为 0 则 表示 其 除 以 
2 的 余数 为 0， 也 就 是 偶数 。 


CLLD 
用 上 面 的 功能 ， 我 们 来 编写 stars2.c。 


本 次 的 a_nask.nas 节 选 


_api_refreshwin: 
xð, int y@, int 
PUSH 
PUSH 
PUSH 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
INT 
POP 
POP 
POP 
RET 


本 次 的 stars2.c 


; void api_refreshwin(int win, int 


x1, int y1); 
EDI 
ESI 
EBX 


EDX, 12 
EBX, [ESP+16] 
EAX, [ESP+20] 


ECX, [ESP+24 ] 
EST, [ESP+28] 
EDI, [ESP+32] 
0x40 

EBX 

ESI 

EDI 


int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 
void api_boxfilwin(int win, 


y1, int col); 


void api_initmalloc(void); 

char *api_malloc(int size); 
void api_point(int win, int 
void api_refreshwin(int win, int xð, int yO, int x1, 


int y1); 


void api_end(void) ; 


int rand(void) ; 


int xð, int yO, int x1, int 


x, int y, int col); 


/# 产 生 6 一 32767 的 随机 数 */ 


void HariMain(void) 


{ 


char *buf; 


int win, i, X, Yy; 
api_initmalloc(); 
buf = api_malloc(150 * 100); 
win = api_openwin(buf, 150, 100, -1, "stars2"); 
api_boxfilwin(win + 1, 6, 26, 143, 93, © /# 黑 色 */ ) ; 
for (i = 0; i < 50; i++) { 

x = (rand() % 137) + 6; 

y = (rand() % 67) + 26; 

api_point(win + 1, x, y, 3 /* 黄 色 */); 


} 
api_refreshwin(win, 6, 26, 144, 94); 
api_end(); 


好 了 ， 这 个 也 很 简单 吧 。 大 功 告 成 ， 我 们 来 “make 
run2” 试 试看 。 运 行 成功 了 了 了， 画面 和 stars.hrb 没 区 别 ， 
那 到 底 速 度 有 没有 变 快 呢 ? 咖 ， 两 个 都 很 快 所 以 看 
不 出 来 ， 肯 定 是 变 快 了 吧 。 


4 EZ Charib20d) 


现在 我 们 已 经 可 以 显示 文字 、 摘 绘 方块 ， 还 能 够 国 
点 ， 接 下 来 我 们 应 该 实现 男 直 线 的 功能 


男 朋 线 的 基本 方法 概括 如 下 。 


for (i = ð; i < len; i++) { 
api_point(win, x, y, col); 


x += dx; 
y += dy; 


} 


len 表 示 直 线 的 长 度 ，x 和 y 表 示 和 直线 的 起 点 坐标 ，dx 
和 和 dy 表示 直线 延伸 的 方 辐 。 不 过 这 样 用 起 来 很 抵 
烦 ， 最 好 是 只 要 指定 直线 两 端的 坐标 ， 就 可 以 目 动 
计算 出 dx、dy 和 len 并 画 出 直线 ， 那 么 我 们 就 按 这 个 
思路 来 编写 API 吧 。 


dx 和 dy 这 两 个 值 如 果 太 大 的 话 ， 扩 与 反之 间 的 间 隐 
束 会 空 得 很 大 ， 看 上 去 就 变 成 虚线 了 ; KIRK, 
如 果 dx 和 dy 取 值 太 小 ， 男 点 的 坐标 束 无 法 前 进 ， 会 
导致 多 次 在 同一 个 坐标 上 画 点 ， 浪 费 CPU 的 处 理 能 
力 。 


此 外 ，x 和 y， 以 及 dx 和 dy 如 条 不 文 持 小 数 的 话 ， 驳 
IAN HCA Be CBHI SCRE, SR EET e 
MERMER S) 。 不 过 现在 我 们 还 没有 做 好 
使 用 小 数 的 准备 ， 不 能 使 用 小 数 ， 因 此 我 们 将 这 4 
个 整数 预先 扩大 1000 倍 ， 即 下 面 这 样 : 


for (i = 0; i < len; i++) { 


api_point(win, x / 1000, y / 1000, col); 
x += dx; 
y += dy; 


} 


这 样 一 来 ， 如 果 x 为 100000，dx 为 1223， 就 相当 于 用 
整数 实现 了 将 100 每 次 累加 0.123 这 样 的 运算 。 


实际 上 ， 除 以 1000 的 运算 速度 不 怎么 快 ， 所 以 我 们 
改 成 除 以 1024。 再 进一步 说 ， 其 实 我 们 使 用 的 根本 
不 是 除法 运算 ， 而 是 右 移 10 比 特 的 方法 ， 这 等 效 于 
除 以 1024， 而 之 所 以 使 用 移 位 运算 ， 当 然 是 因为 它 
比 除 法 运算 速度 要 快 。 因 为 除数 改 成 了 1024， 上 所 以 
如 果 要 表示 0.5 的 话 应 该 使 用 512 而 不 是 500 了 。 


|i | yy E 
KF dx 和 dy 等 值 详细 的 计算 方法 请 看 下 面 的 程序 。 
本 次 的 API 式 样 如 下 。 


T h O EHM Ak 


EDX = 13 

EBX = 窗口 句柄 
EAX = x0 

ECX = y0 

ESI = x1 
EDI = y1 

EBP = 色 号 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CRH ) 
} else if (edx == 13) { 
sht = (struct SHEET *) (ebx & Oxfffffffe) ; 
hrb_api_linewin(sht, eax, ecx, esi, edi, ebp); 
if ((ebx & 1) == @) { 
sheet_refresh(sht, eax, ecx, esi + 1, edi + 


return ð; 


} 


void hrb_api_linewin(struct SHEET *sht, int x®, 


int x1, int y1, int col) 


{ 


int i, X, 
dx = x1 - 
dy = y1 - 
X = xO << 
y = yð << 
if (dx < 6 
dx = - 
if (dy < 6 
dy - 
if (dx >= 
len = 
if (x@ 
dx 
} else 
dx 
} 
if (y@ 
dy 
} else 
dy 
} 
} else { 
len = 
if (y@ 
dy 
} else 


y, len, dx, dy; 
xO; 


y@; 
10; 


<= y1) { 
((y1 - y@ + 1) << 10) / len; 


((y1 - y@ - 1) << 10) / len; 


int yO, 


} 
if (xð <= x1) { 

dx = ((x1 - xð + 1) << 10) / len; 
} else { 

dx = ((x1 - xð - 1) << 10) / len; 


} 


for (i = ð; i < len; i++) { 
sht->buf[(y >> 10) * sht->bxsize + (x >> 10)] = 


col; 
x += dx; 
y += dy; 
return; 
} 


我 们 来 讲解 一 下 这 上 段 程序 。 程 序 首 先 要 做 的 是 计算 


len， 通 过 比较 直线 起 点 和 终点 的 坐标 ， 将 变化 比较 
大 的 作为 lan《〈 实 际 上 还 需要 加 上 1) 。 为 什么 要 加 
上 1 呢 ? 因为 如 果 不 这 样 做 的 话 ， 画 到 最 后 就 会 差 1 
个 像素 。 举 个 例子 ， 当 起 点 和 终点 完全 相同 时 ， 应 
该 在 画面 上 画 出 1 个 点 才 对 ， 但 此 时 dx 和 dy 都 为 0， 
如 果 不 加 1 就 什么 都 画 不 出 来 了 。 


len 计 算出 来 以 后 ， 接 着 计算 dx 和 dy。 将 变化 比较 大 
的 一 方 设 为 1024 或 者 -1024〈 即 1 或 -1) ， 变 化 较 小 
的 一 方 用 变化 量 去 除 以 len。 在 做 除法 的 时 候 我 们 还 
是 会 进行 加 1 和 减 1 的 运算 ， 这 有 点 像 烧 来 用 的 秘 


方 ， 是 个 很 微妙 的 小 技巧 ， 下 面 我 们 来 讲 一 讲 这 个 
秘方 的 效 末 吧 。 
如 条 不 用 这 个 小 技巧 的 话 ， 假 设 我 们 需要 男 一 条 从 


(100, 100) 到 (159, 102) 的 直线 ， 则 dy 为 2 /7 60, 
约 为 0.0333。 


100 110 120 130 140 150 160 


i SS 


不 用 小 技巧 的 情况 Cx = 100, y= 100, dx = 1, dy = 
0.0333, len = 60) 


这 样 不 行 ， 画 这 条 直线 的 时 候 y 明 明和 需要 增加 2， 但 
这 里 只 增加 了 1。 如 果 我 们 加 上 这 个 小 技巧 的 话 ， 
dy 的 计算 融 变 成 了 3/160， 即 0.05。 


100 110 120 130 140 150 160 


| 
mm osteo HoHHOMTORHORE 


用 了 小 技巧 的 情况 (x= 100, y= 100, dx = 1, dy = 
0.05, len = 60) 


好 ， 我 们 来 编写 测试 用 的 应 用 程序 吧 。 


AS YR AJa_nask.nas i 


_api_linewin: ; void api_linewin(int win, int x@, 
int y@, int x1, int y1, int col); 

PUSH EDI 

PUSH ESI 

PUSH EBP 

PUSH EBX 

MOV EDX, 13 

MOV EBX, [ESP+20 | 

MOV EAX, [ESP+24 ] 

MOV ECX, [ESP+28 | 

MOV EST, [ESP+32 | 

MOV EDI, [ESP+36 | 

MOV EBP, [ESP+4@ | 

INT 0x40 

POP EBX 

POP EBP 

POP ESI 

POP EDI 

RET 


本 次 的 lines.c 


int api openwin(char *buf, int xsiz, int ysiz, int 
col inv, char *title); 

void api initmalloc(void); 

char *api malloc(int size); 

void api_refreshwin(int win, int xð, int yO, int x1, 
int y1); 

void api_linewin(int win, int x@, int y@, int x1, int 
y1, int col); 


void api_end(void); 


void HariMain(void) 


{ 
char *buf; 
int win, i; 
api_initmalloc(); 
buf = api_malloc(160 * 100); 
win = api_openwin(buf, 160, 100, -1, "lines"); 
for (i = 0; i < 8; i++) { 
api_linewin(win + 1, 8, 26, 77, i * 9 + 26, 
i); 
api_linewin(win + 1, 88, 26, i * 9 + 88, 89, 
i); 
} 
api_refreshwin(win, 6, 26, 154, 90); 
api_end(); 


我 们 来 “make run”， 硕 望 一 切 顺 利 。 成 功 了 ! 


[harib20d 


H tH Ak SP 
美丽 的 星空 ..…. 哦 不 对 ， 这 不 是 星空 ， 不 过 感 党 比 


stars 看 上 去 要 高 级 多 了 ， 难 道 是 笔者 自我 感觉 民 好 
n? 


5 关闭 窗口 (harib20e ) 


现在 我 们 终于 可 以 在 窗口 上 画 线 玩 了 ， 不 过 一 个 重 
大 的 问题 出 现 了 : 在 应 用 程序 结束 之 后 ， 窗 口 依然 
还 留 在 男 面 上 。 


这 是 因为 系统 为 留 在 画面 上 的 这 个 窗口 分 配 了 应 用 
程序 的 数据 段 作为 存放 窗口 图 层 的 内 存 空 间 ， 当 应 
用 程序 活动 时 没有 任何 问题 ， 但 当 应 用 程序 运行 结 
束 后 ， 其 数据 段 的 内 存 空间 融和 被 释放 出 来 ， 供 操作 
系统 及 其 他 应 用 程序 来 使 用 。 所 以 这 样 不 行 。 


因此 在 应 用 程序 结束 之 前 ， 我 们 需要 多 关闭 窗口 。 


EEHEEHE 
首先 还 是 像 之 前 一 样 ， 编 写 一 个 API。 
关闭 窗口 
EDX=14 


EBX= 窗 口 句 柄 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


(中 上 略 ) 
} else if (edx == 14) { 


sheet free((struct SHEET *) ebx); 
} 


return ð; 


非常 简单 吧 。 


然后 我 们 来 编写 应 用 程序 。 写 一 个 新 的 应 用 程序 太 
WET, RIRH ZAI Aines. F 


本 次 的 a_nask.nas 节 选 


_api_closewin: ; void api_closewin(int win); 
PUSH EBX 
MOV EDX,14 
MOV EBX, [ESP+8] ; win 
INT 0x40 
POP EBX 
RET 


本 次 的 lines.c 


int api openwin(char *buf, int xsiz, int ysiz, int 
col inv, char *title); 

void api initmalloc(void); 

char *api malloc(int size); 

void api_refreshwin(int win, int xð, int yO, int x1, 


int y1); 

void api_linewin(int win, int x@, int y@, int x1, int 
y1, int col); 

void api_closewin(int win); 

void api_end(void); 


void HariMain(void) 


{ 
char *buf; 
int win, i; 
api_initmalloc(); 
buf = api_malloc(160 * 100); 
win = api_openwin(buf, 160, 100, -1, "lines"); 
for (i = ð; i < 8; i++) { 
api_linewin(win + 1, 8, 26, 77, i* 9 + 26, 
i); 
api_linewin(win + 1, 88, 26, i * 9 + 88, 89, 
i); 
} 
api_refreshwin(win, 6, 26, 154, 90); 
api_closewin(win); [PH #7 
api_end(); 


WES, KID, AAEE E 


我 们 来 “make run” 试 试看 吧 。 哦 哦 ， 运 行 成 功 ， 窗 
口 消 失 了 。 


Ey 


harib20e 


A, AOWA TIE? 


R, DERES OR, O RER S EAR 
了 ， 我 们 连 显示 出 来 的 内 容 都 看 不 清 。 在 程序 结束 
之 前 关闭 窗口 固然 很 好 ， 可 是 这 样 的 话 显 示 窗 口 就 
RAX TH 


6 键盘 输入 API (harib20f) 


那么 ， 我 们 残 给 这 个 应 用 程序 增加 接 有 党 键盘 输入 的 
功能 ， 当 按 下 回 车 键 时 再 结束 运行 ， 这 样 就 不 会 出 
现 窗口 显示 时 间 过 短 的 问题 了 。 


要 接受 键盘 输入 ， 其 实 只 要 从 和 任务 绑 定 的 FIFO 绥 
冲 区 中 取出 1 个 就 可 以 了 。 哦 对 了 ， 等 竺 键盘 输入 
的 这 段 时 间 程序 没有 什么 事情 好 做 ， 因 此 我 们 还 要 
加 上 体 眠 的 功能 。 


键盘 输入 

EDX = 15 

EAX = 0..…. 没 有 键盘 输入 时 返回 -1， 不 休眠 
= 1...…. 休 眠 直到 发 生 键 盘 输 入 


EAX = 输入 的 字符 编码 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


int ds_base = *((int *) Oxfe8); 


中略 ) 
int i; 


CHH) 


} else if (edx == 15) { 
for (33) { 


虐 并 等 每 */ 


io cli(); 
if (fifo32 status(&task->fifo) == 6) { 
if (eax != @) { 
task_sleep(task); /* FIFOA, tk 


} else { 
io_sti(); 
reg[7] = -1; 
return ð; 
} 
} 
i = fifo32_get(&task->fifo) ; 
io_sti(); 


if (i <= 1) { /* 光 标 用 定时 器 */ 
/# 应 用 程序 运行 时 不 需要 显示 光标 ， 因 此 总 是 将 


下 次 显示 用 的 值 置 为 1*/ 


timer init(cons->timer, &task->fifo, 


1); /*# 下 次 置 为 1*/ 


任务 A) */ 


timer_settime(cons->timer, 50); 


i; 
if (i == 2) {  /* 光 标 ON */ 
cons->cur_c = COL8_FFFFFF; 


} 

if (i == 3) {  /* 光 标 OFF */ 
cons->cur_c = -1; 

} 


if (256 <= i && i <= 511) { /*# 键 盘 数据 (通过 


reg[7] = i - 256; 
return ð; 


} 
} 
} 


return ð; 


} 


这 次 的 代码 有 点 长 。 首 先 ， 从 整体 上 看 ， 我 们 通过 
一 个 for 语 句 来 进行 循环 。 为 什么 要 这 样 做 昵 ? 当 
FIFO 为 空 或 成 功 接 收 到 键盘 输入 后 循环 结束 ， 在 这 
个 过 程 里 ，FIFO 中 还 会 收 到 诸如 计时 器 光标 ON、 
OFF 之 类 的 数据 ， 这 时 ， 我 们 需要 简单 地 将 它们 处 
理 掉 ， 然 后 再 重新 循环 轮 询 FIFO 的 状态 。 当 确认 接 
收 到 键盘 输入 的 数据 ， 或 者 FIFO 缓 冲 区 为 空 时 ， 则 
通过 return 命 令 结 束 API 的 处 理 。 这 样 一 来 ， 从 结果 
上 来 说 ， 就 相当 于 跳出 了 for 循 环 。 


这 段 程序 是 仿照 console_ task 的 FIFO 数 据 处 理 部 分 
写 的 ， 将 它们 对 比 着 看 应 该 会 更 容易 理解 。 


还 有 cons 一 > timer 的 地 方 需要 讲 一 下 。 为 了 设置 定 
时 器 我 们 需要 timer 的 地 址 ， 不 过 这 是 console_task 中 
的 变量 ，hrb_api 是 无 法 获取 的 ， 虽 然 像 ds_base 的 时 
候 那 样 ， 随 便 找 一 个 地 址 存放 一 下 也 可 以 解决 ， 不 
过 这 次 我 们 采用 了 不 同 的 方法 。 


本 次 的 bootpack.h 节 选 


struct CONSOLE { 


struct SHEET *sht; 
int cur_x, cur_y, cur_c; 
struct TIMER *timer; 


}; 


像 这 样 ， 我 们 将 定时 器 加 入 到 struct CONSOLE F 
了 。 因 为 这 个 定时 喜 是 用 来 控制 光标 闪烁 的 ， 对 于 
命令 行 窗 口 来 说 是 必需 的 ， 所 以 放 在 CONSOLE 结 
构 中 也 没什么 问题 〈 笔 者 希望 将 相关 的 成 员 都 封闭 
到 同一 个 结构 中 ) 。 


因此 我 们 还 修改 了 console task， 去 掉 timer 变 量 ， 以 
cons.timer 取 而 代 之 。 


操作 系统 的 修改 已 经 完成 了 ， 接 下 来 轮 到 应 用 程序 
了 。 写 一 个 新 程序 太 麻 烦 ， 所 以 我 们 还 是 来 改造 


lines.c 吧 。 


AS YR AJa_nask.nas 5 4 


_api_getkey: ; int api_getkey(int mode); 
MOV EDX,15 
MOV EAX, [ESP+4] ; mode 


INT 0x40 
RET 


本 次 的 lines.c 节 选 


int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 

void api_initmalloc(void) ; 

char *api_malloc(int size); 

void api_refreshwin(int win, int xð, int yO, int x1, 
int y1); 

void api_linewin(int win, int x@, int y@, int x1, int 
y1, int col); 

void api_closewin(int win); 

int api_getkey(int mode); 

void api_end(void) ; 


void HariMain(void) 


(中 上 略 ) 

api_refreshwin(win, 6, 26, 154, 90); 

for (33) { 
if (api_getkey(1) == @x@a) { 

break; /* 按 下 回 车 键 则 break; */ 

} 

} 

api_closewin(win) ; 

api_end(); 


写 好 啦 。 应 用 程序 很 简单 ， 当 然 ， 编 写 API 也 不 是 
什么 很 难 的 事情 啦 。 


RIDE A “make run"lh, AAI REA BETA WE MR 
R, RRA EIR! 


看 ， 这 次 不 会 日 动 消失 了 哦 


而 且 ， 按 空格 键 或 者 其 他 字母 键 部 没有 有 反应， 但 按 
PAREN BRAS, ARR TAME o 


按 下 回 车 键 程序 结束 


7 用 键盘 输入 来 消 站 一 


(harib20g) 


既然 我 们 已 经 实现 了 键盘 输入 ， 不 如 多 用 它 来 消 壮 
AINE, WHA A RM 


于 是 我 们 编写 了 下 面 这 个 程序 ， 只 看 代码 的 话 ， 
至 出 这 是 个 怎样 的 程序 吗 ? 


本 次 的 walk.c 和 节选 


void HariMain(void) 


{ 
char *buf; 
int win, i, X, Yy; 
api_initmalloc(); 
buf = api_malloc(160 * 100); 
win = api_openwin(buf, 160, 100, -1, "walk"); 
api_boxfilwin(win, 4, 24, 155, 95, © /* 黑 色 */); 
x = 76; 
y = 56; 
api_putstrwin(win, x, y, 3 /*38f*/, 1, "*"); 
for (33) { 
i = api_getkey(1); 
api_putstrwin(win, x, y, © /*f*/, 1, "*"); /* 
用 黑色 探 除 */ 
if (i == '4' & x> 4) { x -= 83 } 
if (i == '6' && x < 148) { x += 8; } 
if (i == '8' & y > 24) { y -= 8; } 


if (i == '2' & y < 80) { y += 8; } 
if (i == 6x6a) { break; } /* 按 回 车 键 结束 */ 
api_putstrwin(win, x, y, 3 /+* 黄 色 */，1，"*"); 


api_closewin(win) ; 
api_end(); 


简单 来 说 ， 这 个 程序 是 让 “*” 在 窗口 中 移动 ， 按 小 
键盘 的 “5” 让 它 回 到 窗口 中 心 ， 

按 “2”、 r ap “spaa | 以 上 下 左右 移动 ， EA 
f P [el Se peat AY DAG H FEF ao 


那么 我 们 来 “make run” 试 试看 ， 画 面 如 下 。 


rib20g 


RE RERE se 


BAR PK 之 个 字符 换 成 一 个 帅气 的 卡通 和 人物， 将 
黑色 的 背景 换 成 更 漂 腕 的 背景 的 话 ， 我 们 惑 可 以 做 
一 个 RPG《〈 角 色 扮 演 游 戏 ) 了 呢 。 不 过 笔者 可 不 会 
人 么 做 蛾 “如 宋 真 这 么 做 的 话 ， 这 本 讲 操作 系统 编 


写 方法 的 书 就 成 了 讲 RPG 制 作 的 书 了 ...... 笑 ) 。 


在 Linux 中 有 一 个 很 有 名 的 游戏 叫做 nethack， 如 果 
喜欢 那个 游戏 的 话 ， 把 “** 改 成 “@” 说 不 定 会 更 好 哦 
(PIi 


8 强制 结束 并 关闭 窗口 Charib20h) 


眼看 天 色 已 晚 ， 本 打算 今天 就 到 此 结束 的 ， 却 突然 
发 现 了 一 个 问题 。 


在 运行 walk.hrb 和 1lines.hrb 时 ， 如 果 不 按 回 车 键 结 
束 ， 而 是 按 Shift+F1 强 制 结束 程序 的 话 ， 窗 口 束 会 
残留 在 画面 上 。 话 说 回来 ， 强 制 结束 的 时 候 还 并 没 
有 执行 api_closewin， 窗 口 会 留 在 画面 上 也 是 意料 之 
中 的 事情 ， 不 过 应 用 程序 已 经 强制 结束 ， 内 存 空间 
也 已 经 被 回收 ， 而 窗口 却 还 留 在 上 面 ， 这 可 不 太 
see 


A IRE EY Te pe E IIE POF he, PAN EIR SS 
WES, AT DA BRATS AE ES BREE Fis FE HIE 


TaSk_a x| 


þari b20g 


强制 结束 harib20g 后 就 变 成 这 样 了 ! 


ARIA Ape? 首先 ， 我 们 在 struct SHEET Fs 
加 一 个 用 来 存放 task 的 成 员 ， 当 应 用 程序 结束 时 ， 
查询 所 有 的 图 层 ， 如 果 图 层 的 task 为 将 要 结束 的 应 
用 程序 任务 ， 则 关闭 该 图 层 。 


这 个 功能 不 仅 是 在 强制 结束 的 时 候 起 作用 ， 在 正 御 
结束 时 一 样 有 效 ， 因 此 ， 即 便 程 序 本 里 蕊 记 加 上 关 
闭 窗口 的 代码 ， 系 统 也 会 目 动 将 窗口 关 财 ， 进 一 步 
说 ， 应 用 程序 甚至 可 以 完全 依 徘 系统 的 这 个 功能 ， 
而 不 必 特 地 调用 api_closewin 来 关闭 窗口 了 。 


本 次 的 bootpack.h 节 选 


struct SHEET { 

unsigned char *buf; 

int bxsize, bysize, vx®, vy@, col_inv, height, 
flags; 


struct SHTCTL *ctl; 
struct TASK *task; /* 这 里 ! */ 


ie 


本 次 的 sheet.c 节 选 


struct SHEET *sheet_alloc(struct SHTCTL *ct1) 
{ 


struct SHEET *sht; 
int i; 
for (i = ð; i < MAX SHEETS; i++) { 
if (ctl->sheets@[i].flags == ð) { 
sht = &ctl->sheets@[i]; 
sht->flags = SHEET_USE; /* 正 在 使 用 的 标记 */ 


sht->height = -1; /* 不 显示 */ 
sht->task = 0; /* 不 使 用 自动 关闭 功能 */ /* 这 
Hl sf 
return sht; 
} 
} 


return 6;  /* 所 有 的 图 层 都 正在 使 用 */ 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


(中 上 略 ) 
} else if (edx == 5) { 
sht = sheet alloc(shtct]); 
sht->task = task; Pe 
sheet setbuf(sht, (char *) ebx + ds base, esi, 
edi, eax); 


make window8((char *) ebx + ds base, esi, edi, 
(char *) ecx + ds base, @); 

sheet_slide(sht, 100, 50); 

sheet_updown(sht, 3);  ”/* 图 层 高 度 为 3， 在 task_a 之 


ue 
reg[7] = (int) sht; 
} else if (edx == 6) { 
(中 上 略 ) 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


(中 上 略 ) 
struct SHTCTL *shtctl; /* 从 此 开始 */ 
struct SHEET *sht; /* 到 此 结束 */ 
CHEK) 
if (finfo != 0) { 
/* 找 到 文件 的 情况 */ 
p = (char *) memman alloc 4k(memman, finfo- 
>size); 
file loadfile(finfo->clustno, finfo->size, p, 
fat, (char *) (ADR_DISKIMG + @x@@3e@@) ) ; 
if (finfo->size >= 36 && strncmp(p + 4, "Hari", 
4) == 0 && *p == 0x00) { 
CREK) 
start_app(0x1b, 1003 * 8, esp, 1004 * 8, & 
(task->tss.esp®)); 
shtctl = (struct SHTCTL *) *((int *) 
9x6fe4) ; /* 从 此 开始 */ 
for (i = 6; i < MAX SHEETS; i++) { 
sht = &(shtctl->sheets@[i]); 
if (sht->flags != 6 && sht->task == 
task) { 
/* 找 到 被 应 用 程序 遗留 的 窗口 */ 
sheet free(sht); /* Hy 


} 
/* 到 此 结束 */ 
memman_free 4k(memman, (int) q, segsiz); 
} else { 
cons_putstr@(cons, ".hrb file format 
error.\n"); 
} 
memman_free 4k(memman, (int) p, finfo->size); 
cons_newline(cons) ; 
return 1; 


/* 没 有 找到 文件 的 情况 */ 
return ð; 


} 
ERIK TA at T o 
TOLD 


我 们 来 试验 一 下 , “make run”， 然 后 运行 lines.hrb， 
按 Shift+F1 强 制 结束 。 运 行 成 功 了 ! 


看 ， 窗 口 不 见 了 吧 ? 


下 面 我 们 再 用 winhelo3.hrb 试 试看 ， 这 个 程序 中 我 
们 没有 调用 closewin， 不 知道 窗口 能 不 能 自动 天 闭 
呢 ? 哦 哦 ， 关 闭 了 ， 虽 说 这 样 束 完全 看 不 清 窗口 显 
TIARAS (SE) ， 但 只 要 像 lines 和 walk 那 样 加 上 
等 待 键 盘 输 入 再 结束 的 功能 束 好 了 。 


winhelo3.hrb 在 程序 结束 时 窗口 也 会 被 天 闭 哦 


好 了 ， 我 们 已 经 成 功 实现 了 强制 结束 时 也 能 关闭 窗 
口 的 功能 ， 这 下 可 以 睡 个 好 和 党 了 ， 大 家 晚安 .……… 


第 24 天 ”窗口 操作 


e A OY (1) (harib21a) 

e。 和 窗口 切换 (2) (harib21b) 

。 移 动 窗 口 (harib21c) 

。 用 鼠标 关闭 窗口 Charib21d) 

。 将 输入 切换 到 应 用 程序 窗口 (harib21e) 
。 用 鼠标 切换 输入 窗口 Charib21f) 

。 定 时 器 API (harib21g) 

。 取 消 定 时 器 (harib21h ) 


1 窗口 切换 (1) (harib21a) 


前 天 开始 我 们 的 应 用 程序 可 以 显示 目 己 的 窗口 了 ， 
现在 画面 上 到 处 都 是 窗口 ， 我 们 急需 能 够 切换 窗口 
顺序 的 功能 ， 使 得 在 希 要 的 时 候 可 以 碍 看 最 下 面 的 
窗口 的 内 容 。 这 个 功能 看 起 来 不 难 ， 我 们 马上 来 实 
现 它 

不 过 ， 一 上 来 融 实 现 “ 点 击 鼠 标 切 换 窗口 ?的 功能 还 


有 点 难 ， 所 以 我 们 先 从 用 键盘 切换 的 方法 入 手 吧 ， 
即 按 下 F11 时 ， 将 最 下 面 的 那个 窗口 放 到 最 上 面 。 


要 实现 这 一 功能 我 们 首先 需 要 知道 F11 的 控 键 编 
码 。 根 据 下 面 网 址 中 的 资料 : 


http://community.osdev.info/?(AT)keyboard 


ETE ees Abs 7107 (F12 为 0x58) 。 AUT 
些 ， 接 下 来 只 要 稍微 修改 一 下 bootpack.c 即 可 ， 只 
需要 添加 3 行 代 码 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


中略) 


for (33) { 
(中 上 略 ) 
if (fifo32 status(&fifo) == 0) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CREK) 
/* 从 此 开始 */ if (i == 256 + 0x57 && shtctl->top > 2) 
{ /* F11 */ 
sheet_updown(shtctl->sheets[1], 
shtctl->top - 1); 
/* 到 此 结束 */ } 


CHAK ) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
《中 上 略 》 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CHAK ) 


RABEL Att SR BRE TIA SI, RIE 
稍微 详细 地 讲解 一 下 。 


sheet_updown(shtctl->sheets[1], shtctl->top - 1); 


这 人 句 代 人 码 的 功能 是 将 从 下 面 数 第 2 个 图 层 ( 最 下 面 


一 个 图 层 shtctl 一 > sheets[0] 是 背景 ) 的 高 度 提 升 为 
shtctl 一 > top -1。Shtct 一 > top 这 个 高 度 存 放 的 是 
最 上 面 一 个 图 层 的 高 度 ， 这 个 网 层 永 远 是 绘制 鼠标 
指针 用 的 ， 我 们 不 能 将 窗口 放 在 比 忌 标 还 高 的 位 置 
上 《 搞 个 恶作剧 倒是 挺 有 趣 的 ) ， 因 此 将 窗口 高 度 
设置 为 鼠标 图 层 的 下 面 一 层 。 


我 们 来 试 试看 能 不 能 成 功 ，“make run” 虽然 我 
们 已 经 做 了 无 数 届 ， 但 笔者 还 是 乐 在 其 中 。 撒 花 ! 
运行 成 功 了 ! 


按 一 次 F11， 将 命令 行 窗 口 提 升 到 了 上 面 


2 窗口 切换 (2) (harib21b) 


这 次 我 们 来 实现 Windows 那 样 的 用 女 标 点 击 来 切换 
窗口 的 功能 。 这 个 功能 会 让 task_a 中 窗口 移动 的 功 
能 失效 ， 不 过 没关系 ， 我 们 在 下 一 节 会 重新 编写 窗 
口 移动 功能 的 ， 大 家 不 必 担 心 。 

当局 标点 击 男 面 的 菏 个 地 方 时 ， 怎 样 才能 知道 鼠标 
所 扣 击 到 的 是 哪个 图 层 呢 ?我们 需要 按照 从 上 到 下 
的 顺序 ， 判 断 鼠 标的 位 置 落 在 哪个 图 层 的 范围 内 ， 

并 且 还 需要 确保 该 位 置 不 是 透明 色 区 域 。 

将 上 述 思 路 用 程序 写 出 来 就 是 下 面 这 样 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


{ 
CHH) 
int j, x, y; /* 这 里 1 */ 
struct SHEET *sht; /* 这 里 ! */ 
CHH) 


for (33) { 
CRH) 
if (fifo32_status(&fifo) == 0) { 
(中 上 略 ) 
} else { 
(中 上 略 ) 


if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CHEA) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 


据 */ 
if (mouse_decode(&mdec, i - 512) != ð) 
{ 
/* BAD TS ETA I) * / 
CHH) 
if ((mdec.btn & 0x01) != 6) { 
e A / 
/* 从 此 开始 */ /* 按 照 从 上 到 下 的 顺序 寻找 鼠标 所 指 问 
的 图 层 */ 
for (j = shtctl->top - 1; j > 
0 J 


sht = shtctl->sheets[j]; 
X mx - sht->vx@; 
y = my - sht->vy@; 
if (0 <= x && x < sht- 
>bxsize && @ <= y && y < sht->bysize) { 
if (sht->buf[y * sht- 


>bxsize + x] != sht->col_inv) { 

sheet_updown(sht, 
shtctl->top - 1); 

break; 


/* 到 此 结束 */ } 
i 


} 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CHIK) 


我 们 来 “make run”， 然 后 运行 lines.hrp， 点 击 一 个 窗 
口试 试看 。 哦 哦 ! 成 功 了 ! 


通过 点 击 将 task_a 切 换 到 最 上 面 


如 果 点 击 命 令 行 窗口 将 其 切换 到 最 上 面 的 话 ， 别 的 
窗口 就 全 都 被 庶 住 了 ， 这 样 无 法 用 鼠标 点 击 切 换 
了 ， 还 好 我 们 可 以 按 F11 将 被 遮 住 的 窗口 切换 出 
来 ，F11 这 个 功能 还 真是 挺 方便 的 呢 。 


3 移动 窗口 (harib21c) 


窗口 切换 的 功能 已 经 做 的 差不多 了 ， 这 次 我 们 来 实 
现 窗 口 的 移动 。 之 前 我 们 只 能 移动 task_a 的 窗口 ， 
这 次 的 目标 是 实现 像 windows 一 样 的 窗口 移动 功 
能 。 不 过 要 如 何 才 能 实现 呢 ..……. 


当 鼠 标 左 键 点 击 窗口 时 ， 如 果 氮 击 位 置 位 于 窗口 的 
标题 栏 区 域 ， 则 进入 “窗口 移动 模式 ?”， 使 窗口 的 位 
置 追 随 鼠 标 指针 的 移动 ， 当 放 开 鼠标 元 键 时 ， 退 
tH fed AAS ARTO”, ENE ERN 


要 实现 窗口 的 移动 ， 我 们 需要 记录 鼠标 指针 所 移动 
的 距离 ， 为 此 我 们 添加 了 两 个 变量 : mmx 和 mmy， 
mm 是 “move mode” 的 缩写 ， 这 两 个 变量 所 记录 的 是 
移动 之 前 的 坐标 。 由 于 鼠标 指针 不 会 跑 到 画面 以 
外 ， 因 此 我 们 规定 当 mmx 为 负数 时 代表 当前 不 处 于 
窗口 移动 模式 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


中略) 


int j, X, y, mmx = -1, mmy = -1; /* 这 里 ! */ 


struct SHEET *sht = 6; /* 这 里 ! */ 


CHEK) 
for (33) { 
CHARS ) 
if (fifo32_status(&fifo) == @) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CREK) 
} else if (512 <= i && i <= 767) { /* RR% 
据 */ 
if (mouse decode(&mdec, i - 512) != ð) 
{ 
/* RERI ET AS oD * / 
(中 上 略 ) 
if ((mdec.btn & 0x01) != @) { 
/* 按 下 左 键 */ 
/* 从 此 开始 */ if (mmx < @) { 
/* 如 果 处 于 通常 模式 */ 
/# 按 照 从 上 到 下 的 顺序 寻找 鼠标 所 
指向 的 图 层 */ 
for (j = shtctl->top - 1; j 
> ð; Jan) { 
sht = shtctl- 
>sheets[j]; 
X mx - sht->vx@; 


my - sht->vy@; 
if (O <= x && x < sht- 
>bxsize && @ <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 


sheet_updown(sht, shtctl->top - 1); 
if (3 <= x && x 


< sht->bxsize - 3 && 3 <= y && y < 21) { 


mmx = mx; 
/* 进 入 窗口 移动 模式 */ 
mmy = my; 
} 
break ; 
} 
} 
} else { 
/* 如 果 处 于 窗口 移动 模式 */ 
x = mx - mmx;  ”/* 计 算 鼠 标的 
移动 距离 */ 


y = my - mmy; 

sheet_slide(sht, sht->vx@ + 
x, sht->vy@ + y); 

mmx = mx; ”/* 更 新 为 移动 后 的 


坐标 */ 
mmy = my; 
} 
} else { 
PRA FA / 
/* 到 此 结束 */ mmx = -1; ”/* 返 回 通 常 模式 */ 
} 
} ` 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CHH) 


BARBA AK, MIR RD ORF A Be — E eA E 
的 。 


我 们 来 “make run” 试 试看 ， 能 不 能 成 功 昵 ..……. 哦 
R, MOS! 


console x| 


FY RXTE A h E ER R 


不 过 命令 行 窗 口 的 移动 速度 太 慢 了 ! 这 大 概 是 
QEMU 的 原因 ， 在 真 机 环境 下 窗口 的 移动 一 定 可 以 
达到 可 接受 的 速度 。 还 是 有 点 不 放心 ， 于 是 在 真 机 
环境 下 测试 了 了 一下， 不错， 虽然 还 是 有 一 扣 慢 ， 不 
过 这 个 速度 也 没什么 问题 。 


4 用 鼠标 关闭 窗口 (harib21d ) 


现在 我 们 已 经 实现 了 窗口 的 移动 ， 这 次 束 来 实现 关 
闭 窗口 的 功能 吧 。 我 们 的 窗口 上 面 已 经 有 了 了 一 
个 “x” 按 钮 ， 看 到 它 大 家 都 想 按 一 下 吧 CK) ? 


判断 是 否 点 击 了 “x” 按 钮 的 方法 ， 和 之 前 窗口 移动 
时 判断 是 舍 点 击 到 标题 栏 的 方法 是 一 样 的 ， 而 且 操 
击 后 的 程序 结束 处 理 ， 也 可 以 参考 强制 结束 部 分 的 
AI. A, KEA EALER A M o 


CLLD 
我 们 添加 了 11 行 代码 ， 这 样 应 该 可 以 搞定 了 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


中略) 


for (33) { 

CRH) 

if (fifo32_status(&fifo) == 0) { 
CHER ) 

} else { 
《中 略 ) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 

《中 略 ) 


} else if (512 <= i && i <= 767) { /* 鼠 标 数 


ti * / 
if (mouse _decode(&mdec, i - 512) != ð) 
{ 
/* BD TS ETA 3) * / 
CHH) 
if ((mdec.btn & 0x01) != 6) { 
/* 按 下 左 键 */ 
if (mmx < @) { 
/* 如 果 处 于 通常 模式 */ 
/# 按 照 从 上 到 下 的 顺序 寻找 鼠标 所 
指向 的 图 层 */ 
for (j = shtctl->top - 1; j 
> ð; j--) { 


CHH) 
if (O <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 


sheet_updown(sht, shtctl->top - 1); 
if (3 <= x && x 
< sht->bxsize - 3 && 3 <= y && y < 21) { 


(中 上 略 ) 
} 
/* 从 此 开始 */ if (sht->bxsize 
- 21 <= x && x < sht->bxsize - 5 && 5 <= y && y < 19) { 
/* 点 击 “x” 按 
F7 
if (sht- 
>task != 0) {  /* 该 窗口 是 否 为 应 用 程序 窗口 ? */ 
cons = 


(struct CONSOLE *) *((int *) @x@fec); 


cons_putstr@(cons, "\nBreak(mouse) :\n"); 


io cli();  /* 强 制 结束 处 理 中 禁止 切换 任务 */ 


task_cons->tss.eax = (int) 


& 
(task_cons->tss.esp@); 
task_cons->tss.eip = (int) asm_end_app; 
io sti(); 
} 
/* 到 此 结束 */ } 
break; 
} 
} 
} else { 
/* 如 果 处 于 窗口 移动 模式 */ 
(中 上 略 ) 
} 
} else { 
/* 没 有 按 下 左 键 */ 
CHER ) 
} 
} 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
中略 ) 


应 该 不 难 吧 ? 那么 程序 的 讲解 惑 到 此 为 止 了 哦 。 


将 上 面 的 程序 “make run” 一 下 ， 结 果 如 下 。 看 ， 成 
nS! 


console 


5 将 输入 切换 到 应 用 程序 窗口 
(harib21e ) 


虽然 我 们 已 经 实现 了 像 walk.hrb 这 样 让 应 用 程序 接 
受 键 盘 输 入 的 功能 ， 不 过 仔细 看 画面 会 发 现 ， 处 于 
输入 状态 的 其 实 是 命令 行 窗 口 ， 而 不 是 walk 的 窗 

口 。 


[haribzid 


用 harib21d 移 动 “*” 时 的 样子 


这 样 看 上 去 有 点 怪 ， 应 该 先 让 应 用 程序 窗口 处 于 得 
入 状态 ， 然 后 再 操作 “*” 进 行 移动 。 


之 前 我 们 所 使 用 的 Tab 键 切换 很 简单 ， 只 能 在 两 个 
窗口 之 间 交 丛 进 行 ， 但 这 次 我 们 已 经 显示 出 了 3 个 
以 上 的 窗口 ， 情 况 变 得 有 点 复杂 ， 在 按 下 Tab 键 

时 ， 我 们 需要 判断 切换 到 哪个 窗口 。 我 们 移 这 样 规 
定 吧 : 按 下 Tab 键 时 将 键盘 输入 切换 到 当前 输入 窗 


口 下 面 一 层 的 窗口 中 ， 知 当前 窗口 为 最 下 层 ， 则 切 
换 到 最 上 层 窗口 。 


对 于 键盘 输入 的 控制 我 们 之 前 用 的 是 key_to 这 个 变 
量 ， 不 过 这 已 经 是 很 久 以 前 写 的 了 《应 该 是 在 17.3 
节 中 写 的 ， 也 就 是 差不多 一 个 礼拜 之 前 吧 ， 但 感觉 
好 像 已 经 过 了 很 入 了 昵 ) ， 这 个 方法 现在 已 经 不 能 
用 了 ， 于 是 我 们 改 成 使 用 key_win 这 个 变量 存放 当 

前 处 于 输入 模式 的 窗口 地 址 。 


另外 ， 还 有 一 个 问题 ， 如 果 当 应 用 程序 窗口 处 于 和 输 
入 模 陈 时 航 关 闭 的 话 要 怎样 处 理 呢 ? 这 个 时 候 我 们 
可 以 让 系统 目 动 切换 到 最 上 层 的 窗口 。 


本 次 修改 的 内 容 较 多 。 主 要 修改 的 地 方 是 将 
HariMain 中 key_to 的 地 方 改 为 key_win， 以 及 添加 在 
得 入 窗口 消失 时 《被 关闭 时 ) 进行 处 理 的 代码 。 


有 个 细节 需要 讲 一 下 ， 我 们 用 SHEET 结 构 中 的 task 
成 员 来 判断 数据 发 送 对 象 的 FIFO， 因 此 在 sht_cons 
一 >task 中 也 加 入 了 TASK 结 构 的 地 址 ， 这 样 的 话 我 
们 融 无 法 分 辩 窗 口 是 不 是 由 应 用 程序 生成 的 ， 于 是 
我 们 需要 通过 SHEET 结 构 中 的 flags 成 员 进行 判断 
(以 0x10 比 特 位 进行 区 分 ) 。 些 外， 只 有 命令 行 窗 


口 需要 控制 光标 的 ONMOFF， 应 用 程序 窗口 不 需 
要 ， 这 一 区 别 也 是 通过 flags 来 进行 判断 的 (以 0x20 
比特 位 进行 区 分 ) 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 
struct SHEET *sht = 0, *key_win; PRIZE] 


CHH) 
key_win = sht_win; 
/* 从 此 开始 */ 
sht_cons->task = task_cons; 
sht_cons->flags |= 0x20; /* 有 光标 *#/ /* 到 | 
此 结束 */ 
中略) 
for (;;) { 
CHH) 
if (fifo32_status(&fifo) == @) { 
CHH ) 
} else { 
i = fifo32_get(&fifo); 
io_sti(); 
if (key_win->flags == 0) { /* 输 入 窗口 被 关闭 
4 /* 从 此 开始 */ 
key win = shtctl->sheets[shtctl->top - 
1]; 
cursor_c = keywin_on(key_win, sht_win, 
cursor_C); 


} 


/* 到 此 结束 */ 
if (256 <= i && i <= 511) { /* 键 盘 数 据 */ 


CREK) 
if (s[6] != 0) { /* 一 般 字符 */ 
/* 从 此 开始 */ if (key win == sht win) {  /* 发 送 至 
任务 A */ 
if (cursor x < 128) { 
/* 显 示 一 个 字符 并 将 光标 后 移 一 位 
i 


s[1] = 9; 
putfonts8_asc_sht(sht_win, 

cursor_x, 28, COL8 9090000, COL8_FFFFFF, s, 1); 
cursor_xX += 8; 


} 
} else { /* 发 送 至 命令 行 窗 口 */ 


fifo32_put(&key_win->task- 
>fifo, s[8] + 256); 


} 
} 
if (i == 256 + @x@e) { /* 退 格 键 */ 
if (key_win == sht win) {  /* 发 送 至 


任务 A */ 
if (cursor x > 8) { 
/* 用 空格 擦 除 光 标 后 将 光标 前 移 一 
fy*/ 


putfonts8_asc_sht(sht_win, 
cursor_x, 28, COL8 990000, COL8 FFFFF ", 1); 
cursor_X -= 8; 


} 
} else { /# 发 送 至 命令 行 窗 口 */ 
fifo32_put(&key_win->task- 
>fifo, 8 + 256); 
} 
} 
if (i == 256 + @xic) { /* 回 车 键 */ 
if (key_win != sht win) {  /* 发 送 至 


fifo32_put(&key_win->task- 
>fifo, 10 + 256); 


} 
} 
if (i == 256 + @x@f) { /* Tab 键 */ 


cursor_c = keywin_off(key_win, 
sht_win, cursor_c, cursor_x); 
j = key_win->height - 1; 
if (j == 6) { 
j = shtctl->top - 1; 


} 
key win = shtctl->sheets[j]; 
/* 到 此 结束 */ cursor_c = keywin_on(key_win, 
sht_win, cursor_c); 
} 
CREK) 
} else if (512 <= i && i <= 767) { /* RR% 
据 */ 
if (mouse decode(&mdec, i - 512) != ð) 
{ 
CHS ) 
if ((mdec.btn & 0x01) != 6) { 
/*t& FEE, 
if (mmx < @) { 
/* 如 果 处 于 通常 模式 */ 
/# 按 照 从 上 到 下 的 顺序 寻找 鼠标 所 
指向 的 图 层 */ 
for (j = shtctl->top - 1; j 
> ð; j--) { 


CHH) 
if (O <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 


CHH ) 

if (sht->bxsize 
- 21 <= x && x < sht->bxsize - 5 && 5 <= y && y < 19) 
{ 


/* 点 击 “x” 按 
钮 */ 
/* 这 里 ! */ if ((sht- 
>flags & 0x10) != @) { /* 是 由 应 用 程序 生成 的 窗口 吗 ? */ 
CRH) 
} 
} 
break; 
} 
} 
} 
} else { 
(中 上 略 ) 
} 
} else { 
CREA) 
i } 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
(中 上 略 ) 


上 面 的 代码 中 调用 了 keywin_on 和 keywin_off 两 个 函 
数 ， 它 们 的 功能 是 控制 窗口 标题 栏 的 闫 色 和 task_a 
窗口 的 光标 ， 我 们 将 它们 写 在 bootpack.c 中 。 


本 次 的 bootpack.c 节 选 


int keywin_off(struct SHEET *key_win, struct SHEET 
*sht_win, int cur_c, int cur_x) 
{ 
change wtitle8(key_win, @); 
if (key_win == sht_win) { 
cur_c = -1; /# 删 除 沦 标 *V/ 
boxfil18(sht_win->buf, sht_win->bxsize, 
COL8_FFFFFF, cur_x, 28, cur_x + 7, 43); 
} else { 
if ((key_win->flags & 0x20) != 0) { 
Ffifo32_put(&key_win->task->fifo, 3); /* 命 令 
行 窗口 光标 OFF */ 
} 
} 


return cur_c; 


} 


int keywin on(struct SHEET *key win, struct SHEET 
*sht_win, int cur_c) 


{ 


change wtitle8(key_win, 1); 
if (key_win == sht_win) { 
cur_c = COL8_000000; /# 显 示 光 标 */ 
} else { 
if ((key_win->flags & 0x20) != 0) { 
fifo32_put(&key_win->task->fifo, 2); /* 命 令 
行 窗 口 光标 ON */ 
} 
} 


return cur_c; 


上 面 的 代码 中 我 们 调用 了 一 个 叫做 change_wtitle8 的 
RAL, IX ER ALIN IAB 是 改变 窗 Here Hee, 
我 们 写 在 window.c 中 。 其 实 make wtitle8 也 可 以 实 
现 相 同 的 功能 ， 但 change_wtitle8 的 好 处 是 ， 即 全 不 
知道 窗口 E 除 此 之 
外 ， 人 代码 的 其 余部 分 应 该 不 需要 讲解 了 吧 。 


本 次 的 window.c 节 选 


void change wtitle8(struct SHEET *sht, char act) 
{ 


int x, y, xsize = sht->bxsize; 

char c, tc_new, tbc_new, tc_old, tbc_old, *buf = 
sht->buf; 

if (act != 0) { 


tc_new = COL8_FFFFFF; 
tbc_new = COL8 000084; 
tc_old = COL8 C6C6C6; 
tbc_old = COL8 848484; 
} else { 
tc_new = COL8 C6C6C6; 
tbc_new = COL8 848484; 
tc_old = COL8_FFFFFF; 
tbc_old = COL8 000084; 


} 
for (y = 33 y <= 20; y++) { 
for (x = 33 x <= xsize - 4; X++) { 
c = buf[y * xsize + x]; 
if (c == tc_old && x <= xsize - 22) { 
c = tc_new; 
} else if (c == tbc_old) { 
c = tbc_new; 


} 


buf[y * xsize + x] = C; 


} 


sheet_refresh(sht, 3, 3, xsize, 21); 
return; 


我 们 对 cmd_app 也 进行 了 修改 ， 主 要 修改 了 应 用 程 
序 结束 时 目 动 关闭 窗口 的 部 分 。 因 为 没有 运行 应 用 
程序 的 命令 行 窗口 ， 其 task 也 不 为 0， 所 以 需要 通过 
flags 的 0x10 比 特 位 来 判断 是 否 上 自动 关闭 。 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


(中 上 略 ) 
if (finfo != 0) { 
(中 上 略 ) 
if (finfo->size >= 36 && strncmp(p + 4, "Hari", 
4) == 0 && *p == 0x00) { 
CREK) 
for (i = ð; i < MAX_SHEETS; i++) { 
sht = &(shtctl->sheets@[i]); 
if ((sht->flags & 0x11) == 0x11 && sht- 
>task == task) { JET 
/* 找 到 应 用 程序 残留 的 窗口 */ 
sheet_free(sht); /My 
} 
} 
memman_free 4k(memman, (int) q, segsiz); 
} else { 


cons_putstr@(cons, ".hrb file format 
error.\n"); 


} 
(中 上 略 )》 
} 
CHAM 


我 们 还 修改 了 hrb_api， 为 了 在 打开 窗口 的 地 方 启用 
目 动 关闭 窗口 的 功能 ， 我 们 将 flags 和 0x10 进 行 OR 
aoe 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CRH) 
} else if (edx == 5) { 
sht = sheet_alloc(shtctl); 
sht->task = task; 
sht->flags |= 0x10; /*iX HB! */ 
sheet_setbuf(sht, (char *) ebx + ds_base, esi, 
edi, eax); 


make_window8((char *) ebx + ds base, esi, edi, 
(char *) ecx + ds_base, Q); 
sheet_slide(sht, 100, 50); 


sheet_updown(sht, 3);  ”/* 图 层 高 度 3 位 于 task_a 之 上 


z 
reg[7] = (int) sht; 
} else if (edx == 6) { 
(中 上 略 ) 


下 面 轮 到 例 行 的 “make run” yo WI} I ! 


>walk 


harib2le | 


选择 了 应 用 程序 窗口 


6 用 鼠标 切换 输入 窗口 (harib21f ) 


我 们 已 经 实现 了 输入 窗口 的 切换 ， 着 实 进 步 不 小 ， 
只 是 用 Tab 键 来 进行 切换 的 操作 和 Windows 还 不 一 
样 。 在 Windows 中 ， 只 要 用 鼠标 在 窗口 上 点 击 一 
下 ， 那 个 窗口 就 会 被 切换 到 画面 的 最 上 方 ， 而 且 键 
共 输 入 也 会 目 动 切换 到 该 窗口 。 因 此 ， 我 们 要 

让 “ 纸 娃 娃 系 统 ” 也 可 以 通过 简单 的 点 击 就 能 完成 输 
入 切换 。 


刚才 为 了 实现 用 Tab 键 切换 ， 我 们 修改 了 大 量 的 代 
码 ， 而 这 次 我 们 只 需要 添加 一 点点 代码 束 好 了 ， 
为 只 需要 通过 鼠标 操作 实现 和 键盘 操作 相同 的 功能 
而 已 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


if (fifo32_status(&fifo) == 0) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CREK) 


} else if (512 <= i && i <= 767) { /* 鼠 标 数 


据 */ 
if (mouse decode(&mdec, i - 512) != ð) 
{ 
CHH) 
if ((mdec.btn & 0x01) != 6) { 
/* 按 下 左 键 */ 
if (mmx < @) { 
/* 如 果 处 于 通常 模式 */ 
/# 按 照 从 上 到 下 的 顺序 寻找 鼠标 所 
指向 的 图 层 */ 
for (j = shtctl->top - 1; j 
> ð; j--) { 


CHH) 
if (O <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 


sheet_updown(sht, shtctl->top - 1); 
/* BETTE aR* / if (sht != 
key_win) { 
cursor_c = 
keywin_off(key_win, sht_win, cursor_c, 


cursor_xX); 

key win = 
sht; 

cursor_c = 
keywin_on(key_win, sht_win, cursor_c); 

/* 到 此 结束 */ } 
if (3 <= x && x 

< sht->bxsize - 3 && 3 <= y && y < 21) { 

mmx = mX; 
/* 进 入 窗口 移动 模式 */ 


mmy = my, 


if (sht->bxsize 
- 21 <= x && x < sht->bxsize - 5 && 5 <= y && y < 19) 
{ 


/* 点 击 “x” 按 
alle | 
CRH) 
} 
break; 
} 
} 
} 
} else { 
(中 上 略 ) 
} 
} else { 
(中 上 略 ) 
} 
} 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
《中 略 ) 


好 了 ， 我 们 来 “make run”， 点 击 一 下 应 用 程序 窗口 
mane ue 


console 


Aim Bo — Bat Ay UA SER D eh 


7 定时 器 API (harib21g) 


到 现在 为 止 ， 计 划 今 天 要 讲 的 关于 窗口 操作 功能 的 
部 分 已 经 全 部 完成 了 ， 不 过 现在 时 间 还 早 ， 我 们 来 
做 点 好 玩 的 吧 。 今 天 我 们 还 没有 写 过 新 的 API， 那 
现在 我 们 就 来 做 个 新 的 API 吧 ， 比 如 说 ， 定 时 器 的 
API. 


记得 在 12.2 节 中 我 们 实现 了 用 定时 器 来 计时 的 功 
能 ， 当 时 我 们 高 兴 了 半天 ， 因 为 我 们 的 操作 系统 可 
以 用 来 泡 面 了 。 不 过 现在 我 们 的 操作 系统 又 回 到 了 
派 不 上 什么 用 场 的 状态 ， 即 便 可 以 显示 窗口 、 夯 
点 、 男 直线 ， 但 它 却 不 能 帮 了 我们 解决 实际 问题 呀 。 


因此 ， 接 下 来 我 们 打算 让 应 用 程序 也 可 以 使 用 定时 
俐 ， 然 后 就 可 以 去 吃 碗 泡 面 了 。 大 家 先 把 想 吃 的 泡 
RE 趁 这 段 时 间 笔 者 先 来 写 程序 了 
HK ! 


CLLD 
X FS AJAPTUN P -o 


获取 定时 器 Calloc) 


EDX=16 


EAX= 定 时 器 句柄 〈 由 操作 系统 返回 ) 


设置 定时 器 的 发 送 数 据 (init) 
EDX=17 

EBX=%E IN ar JN 

EAX= 数 据 


定时 器 时 间 设 定 (set) 
EDX=18 
EBX=%€ IN 45 AJIN 


EAX= 时 间 


释放 定时 器 〈free) 


EDX=19 
FEBX= 定 时 器 句柄 
思路 确定 了 ， 接 下 来 就 是 写 程 序 了 。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CHAS ) 
} else if (edx == 15) { 
for (33) { 
CREK) 
if (i >= 256) { /*#* 键 盘 数 据 〈 通 过 任务 A) 等 */ 
JERE #7 
reg[7] = i - 256; 


return ð; 
} 
} 
} else if (edx == 16) { 
/* 从 此 开始 */ 


reg[7] = (int) timer_alloc(); 
} else if (edx == 17) { 
timer_init((struct TIMER *) ebx, &task->fifo, 
eax + 256); 
} else if (edx == 18) { 
timer_settime((struct TIMER *) ebx, eax); 
} else if (edx == 19) { 
timer_free((struct TIMER *) ebx); 
/* 到 此 结束 */ 
} 


return ð; 


PO 


edx EE A16~19, XMR, DARA UE 
了 。 哦 对 了 ，edx = 17 的 情况 需要 稍微 说 一 下 ， 这 
里 数据 的 编号 加 上 了 256， 是 因为 在 向 应 用 程序 传 
耶 FIFO 数 据 时 ， 需 要 先 减 去 256。 


此 外 ，api_getkey， 也 就 是 edx = 15 的 部 分 也 稍微 修 


y, BAN 、 Xy 


511) ， 而 现在 修改 成 了 让 G>=256) ， 就 是 说 ， 
512 以 上 的 值 也 可 以 通过 api_getkey 来 获取 了 。 之 所 
以 要 这 样 改 ， 是 因为 现在 应 用 程序 不 仅 需要 接收 键 
盘 的 数据 ， 还 需要 接收 应 用 程序 所 设置 的 定时 堪 发 
生 超时 时 所 传递 的 数据 。 


TT 
下 面 我 们 来 编写 应 用 程序 。 


本 次 的 a_nask.nas 节 选 


_api_alloctimer: 3 int api_alloctimer(void) ; 
MOV EDX, 16 


INT 0x40 
RET 


_api_inittimer: ; void api_inittimer(int timer, int 
data); 
PUSH EBX 


MOV EDX, 17 


MOV EBX, [ESP+ 8] ; timer 
MOV EAX, [ESP+12] ; data 
INT 0x40 
POP EBX 
RET 
_api_settimer: ; void api_settimer(int timer, int 
time) ; 
PUSH EBX 
MOV EDX,18 
MOV EBX, [ESP+ 8] ; timer 
MOV EAX, [ESP+12] ; time 
INT 0x40 
POP EBX 
RET 
_api_freetimer: 3 void api_freetimer(int timer); 
PUSH EBX 
MOV EDX, 19 
MOV EBX, [ESP+ 8] ; timer 
INT 0x40 
POP EBX 
RET 


本 次 的 noodle.c 节 选 


#include <stdio.h> 


int api openwin(char *buf, int xsiz, int ysiz, int 

col inv, char *title); 

void api putstrwin(int win, int x, int y, int col, int 
len, char *str); 

void api_boxfilwin(int win, int xð, int yO, int x1, int 
y1, int col); 


void api_initmalloc(void) ; 

char *api_malloc(int size); 

int api_getkey(int mode); 

int api_alloctimer(void) ; 

void api_inittimer(int timer, int data); 
void api_settimer(int timer, int time); 
void api_end(void) ; 


void HariMain(void) 
{ 
char *buf, s[12]; 
int win, timer, sec = @, min = @, hou = @; 
api_initmalloc(); 
buf = api _ malloc(156 * 50); 
win = api_openwin(buf, 150, 50, -1, "noodle"); 
timer = api_alloctimer(); 
api_inittimer(timer, 128); 
for (33) { 
sprintf(s, "%5d:%02d:%@2d", hou, min, sec); 
api_boxfilwin(win, 28, 27, 115, 41, 7 /* 白 色 */); 
api_putstrwin(win, 28, 27, © /*f&*/, 11, s); 


api_settimer(timer, 100); /* 1#b*/ 
if (api_getkey(1) != 128) { 


break; 
} 
sectt+; 
if (sec == 60) { 
sec = ð; 
min++ ; 
if (min == 60) { 
min = ð; 
hou++; 
} 
} 


api_end(); 
} 


关于 noodle.c 这 里 稍微 讲解 一 下 ， 之 前 操作 系统 显 
示 的 是 秒 ， 而 现在 我 们 需要 显示 时 、 分 、 秒 ， 这 样 
一 来 时 间 看 起 来 会 更 直观 ， 我 们 束 不 需要 用 泡 面 的 
3 分 钟 再 乘 以 60 换 算 成 秒 了 。 


当 定 时 器 超时 时 ， 会 产生 128 这 样 一 个 值 ， 这 个 值 
不 是 由 键盘 的 编码 所 使 用 的 ， 因 此 除了 定时 器 ， 别 
的 事件 不 可 能 产生 这 个 值 。 如 果 产 生 的 数据 是 128 
以 外 的 值 ， 那 一 定 是 用 户 按 了 回 车 键 或 者 其 他 什么 
键 ， 这 时 应 用 程序 结束 退出 。 


要 开始 运行 了 哦 ， 开 水 准备 好 了 吗 ?“make run”, 
先 往 泡 面 里 面倒 好 开水 ， 然 后 运行 noodle.hrb。 
好 ，3 分 钟 到 了 ， 可 以 吃 唆 ! 


PDEA 


现在 我 们 的 操作 系统 又 可 以 派 上 用 场 了 ， 不 错 不 
TH o 


8 取消 定时 需 (harib21h) 


上 一 市 我 们 所 实现 的 定时 咒 功 能 ， 其 实 有 个 问题 ， 
接 下 来 我 们 来 解决 它 。 


这 个 问题 是 在 应 用 程序 结束 之 后 发 生 的 ， 请 大 家 想 
象 一 下 noodle.hrb 结 束 之 后 的 情形 。 应 用 程序 设置 
了 一 个 1 秒 的 定时 器 ， 当 定时 器 到 达 指 定时 间 时 会 
产生 超时 ， 并 辐 任 务 发 送 事先 设置 的 数据 。 问 题 
是 ， 如 果 这 时 应 用 程序 已 经 结束 了 ， 定 时 器 的 数据 
| 而 命令 行 窗 口 肯 定 是 一 
LEE IK 


为 了 确认 这 个 问题 ， 我 们 在 harib21g 中 运行 
noodle.hrb， 按 回 车 键 或 者 其 他 任意 键 结束 程序 看 
看 。 大 约 1 秒 钟 之 后 ， 命 令 行 窗口 中 会 目 动 出 现 一 
个 神秘 的 字符 。 用 鼠标 按 “x” 关 闭 窗 口 之 后 ， 也 会 
出 现 同样 的 现象 。 


noodle.hrb 结 束 后 出 现 的 神秘 字符 (不 是 C 哦 ) 


要 解决 这 个 问题 ， 我 们 需要 取消 每 机 中 的 定时 避 ， 
这 样 一 来 ， 束 可 以 在 应 用 程序 结束 的 同时 取消 定时 
名 ， 问 题 也 束 迎 为 而 解 了 。 


LTT] Yt 
E ERIR H PY Fs FEE PY a AY BRI BBL 
本 次 的 timer.c 节 选 
int timer_cancel(struct TIMER *timer) 
{ 
int e; 


struct TIMER *t; 
e = io_load_eflags(); 
io_cli();  /* 在 设置 过 程 中 禁止 改变 定时 器 状态 */ 
if (timer->flags == TIMER FLAGS USING) { /* 是 否 需 
要 取消 ?*/ 
if (timer == timerctl.t@) { 
/* 第 一 个 定时 器 的 取消 处 理 */ 


t = timer->next; 


timerctl.t@ = t; 
timerctl.next = t->timeout; 
} else { 

/* 非 第 一 个 定时 器 的 取消 处 理 */ 
/* 找 到 timer 前 一 个 定时 器 */ 
t = timerctl.t@; 
for (33) .4 

if (t->next == timer) { 


} 
t = t->next; 

} b APOL W AI 

t->next = timer->next; /* 将 之 前 “timer 的 下 一 
个 ” 指 同 “timer 的 下 一 个 ”*/ 


timer->flags = TIMER_ FLAGS ALLOC; 
io_store_eflags(e); 


return 1;  /* 取 消 处 理 成 功 */ 


} 
io_store eflags(e); 
return @; /* 不 需要 取消 处 理 */ 


详细 的 解说 已 经 写 在 程序 的 注释 中 了 ， 请 大 家 自生 
阅读 ， 


接 下 来 ， 我 们 来 编号 在 应 用 程序 结束 时 取消 全 部 定 
时 融 的 函数 。 在 此 之 前 ， 我 们 需要 在 定时 卉 上 增加 
一 个 标记 ， 用 来 区 分 该 定时 器 是 否 需要 在 应 用 程序 
结束 时 目 动 取消 。 如 果 没 有 这 个 标记 的 话 ， 命 令 行 
窗口 中 用 来 控制 光标 内 烁 的 定时 志 也 会 家 取消 把 
J. 


本 次 的 bootpack.h 节 选 


struct TIMER { 
struct TIMER *next; 
unsigned int timeout; 
char flags, flags2; JAEL #7 


struct FIFO32 *fifo; 
int data; 


J 


通常 情况 下 ， 这 里 的 fags2 为 0， 为 了 避免 忘记 置 
0， 我 们 来 修改 一 下 timer.alloc。 


本 次 的 timer.c 节 选 


struct TIMER *timer_alloc(void) 
{ 


int i; 
for (i = 6; i < MAX_TIMER; i++) { 
if (timerctl.timersð[i].flags == @) { 
timerctl.timersð[i].flags = 
TIMER_FLAGS_ALLOC; 
timerctl.timersð[i].flags2 
ey 
return &timerctl.timerso[i]; 
} 
} 
return 0; /* 没 有 找到 */ 


接 下 来 ， 我 们 将 应 用 程序 所 申请 的 定时 器 的 flags2 
设 为 1。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


{ 


(中略) 
} else if (edx == 16) { 
reg[7] = (int) timer_alloc(); 
((struct TIMER *) reg[7])->flags2 = 1; /* mM É 
动 取消 */ A 
} else if (edx == 17) { 
CPH) 


准备 完成 了 ， 下 面 我 们 就 编写 一 个 图 数 ， 来 取消 应 
用 程序 结束 时 所 不 需要 的 定时 器 。 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


CHEK) 
if (finfo != 0) { 
(中 上 略 ) 
if (finfo->size >= 36 && strncmp(p + 4, "Hari" 
4) == © && *p == 0x00) { 
CREK) 
start_app(0x1b, 1003 * 8, esp, 1004 * 8, & 
(task->tss.esp®)); 
shtctl = (struct SHTCTL *) *((int *) 


3 


OxOFed4) ; 
for (i = @; i < MAX_SHEETS; i++) { 
sht = &(shtctl->sheets@[i]); 
if ((sht->flags & @x11) == 0x11 && sht- 
>task == task) { 
/* 找 到 应 用 程序 残留 的 窗口 */ 
sheet_free(sht); [Pa / 


} 


timer_cancelall(&task->fifo); /* 这 里 ! 
ey 
memman_free_4k(memman, (int) q, segsiz); 
} else { 
CHH ) 
} 
CHH) 
} 
《中略 ) 


本 次 的 timer.c 节 选 


void timer_cancelall(struct FIFO32 *fifo) 
{ 
int e, i; 
struct TIMER *t; 
e = io load eflags(); 
io_cli();  /*# 在 设置 过 程 中 禁止 改变 定时 器 状态 */ 
for (i = @; i < MAX_TIMER; i++) { 
t = &timerctl.timers@[i]; 


if (t->flags != 6 && t->flags2 != © && t->fifo 
== fifo) { 
timer_cancel(t); 
timer_free(t); 


} 
} 
io_store_eflags(e); 
return; 


KMS! 


我 们 来 “make run”， 运 行 hoodle.hrb， 然 后 让 程序 结 
束 。 哦 蛾 成 功 了 ， 神 秘 字 符 再 也 不 出 现 了 ， 太 好 
Tg 


神秘 字符 消失 了 
好 了 ,今天 的 内 容 就 到 这 里 吧 ， 明 天 见 哦 ! 


第 25 天 ”增加 命令 行 窗 口 


蜂 鸣 器 发 声 (harib22a ) 

增加 更 多 的 羚 色 (1) (harib22b) 
增加 更 多 的 颜色 (2) Charib22c) 

窗口 初始 位 置 (harib22d) 

增加 命令 行 窗 口 (1) (harib22e) 

增加 命令 行 窗 口 (2) (harib22f) 

增加 命令 行 窗口 (3) (harib22g) 

增加 命令 行 窗口 (4) (harib22h) 

变 得 更 像 真正 的 操作 系统 (1) Charib22i) 
变 得 更 像 真 正 的 操作 系统 (2) Charib22j) 


1 Hens es AR Charib22a) 
大 家 早上 好 ， 今 天 我 们 还 要 继续 努力 哦 。 


之 前 我 们 为 系统 添加 了 很 多 API， 但 那些 只 不 过 是 
将 以 前 操作 系统 就 有 的 功能 开放 给 应 用 程序 来 调用 
而 已 ， 没 什么 让 人 了 眼前 一 腕 的 东西 。 现 在 看 来 ， 我 
们 之 前 给 操作 系统 编写 的 功能 已 经 用 光 了 ， 以 后 如 
果 要 为 API 添 加 新 的 功能 ， 束 需要 同时 为 操作 系统 
本 里 编写 新 的 代码 了 。 


因此 我 们 这 次 来 做 一 个 “ 蜂 鸣 器 发 声 ” 的 功能 吧 。 蜂 
鸣 器 发 出 的 声音 ， 英 语 叫 “BEEP”， 是 个 象声词 ， 
也 束 是 那 种 哗 哗 哗 的 声音 。 一 提 到 电脑 上 的 声音 ， 
可 能 大 家 首先 会 想到 “声卡 ”， 不 过 声卡 的 调用 实在 
过 于 复杂 ， 新 手 上 路 难度 太 大 ， 因 此 我 们 还 是 先 来 
实现 蜂 鸣 器 发 声 吧 ， 这 个 功能 是 所 有 型 号 的 电脑 都 
有 的 《如 果 是 自己 组 装 的 电脑 ， 只 要 你 没 态 记 接 上 
蜂 鸣 器 的 线 就 好 ) 。 


TT 
关于 发 声 的 方法 ， 笔 者 从 这 里 查阅 了 一 下 资料 。 


http://community.osdev.info/?(PIT)8254 


没 错 ， 其 实 蜂 鸣 器 发 声 和 定时 器 一 样 ， 都 是 由 PIT 
来 控制 的 ， 而 PIT 位 于 必 片 组 中 ， 因 此 所 有 型 号 的 
电脑 部 能 使 用 它 。 


跟 以 前 一 样 ， 我 们 还 是 直接 来 看 原文 中 “ 懒 人 专用 
指南 ”一 市 的 内 容 吧 。 


。 蜂 鸣 右 及 声 的 控制 
o 音 高 操作 


= AL = 0xb6; OUT(0x43, AL); 


sa。 AL = 设 定 值 的 低位 8bit; OUT(0x42, AL); 

s AL = 设 定 值 的 高 位 8bit; OUT(0x42, AL); 

a 设 定 值 为 0 时 当 作 65536 来 处 理 。 

a 及 声 的 音 高 为 时 钟 除 以 设 定 值 ， 也 就 是 说 
设 定 值 为 1000 时 相当 于 发 出 1.19318KHz 
的 声音 ) 设 定 值 为 10000 时 相当 于 
119.318Hz。 因 此 设 定 2712 即 可 发 出 约 
440Hz 的 声音 1。 


1440Hz 为 中 央 C 之 上 的 A 音 ， 即 国际 标准 
wr. 
H o 


。 峰 鸣 器 ON/OEFF 
o 使 用 W/O 端口 0x61 控 制 。 


o ON: IN(AL, 0x61); AL |= 0x03; AL &= 0x0f; 
OUT(0x61, AL); 


o OFF: IN(AL, 0x61); AL &= 0xd; OUT(0x61, 
AL); 


虽 ， 差 不 多 看 懂 了 ， 我 们 来 编写 API 吧 〈 这 里 所 提 
到 的 时 钟 不 是 CPU 时 钟 ， 而 是 PIT 时 钟 。 在 电脑 中 
PIT 时 钟 与 CPU 无 关 ， 频 率 恒 定 为 1.19318MHz) 。 
蜂 鸣 器 发 声 


EDX=20 


DAX= 声 音频 率 〈 单 位 是 mHz， 即 毫 赫 效 ) 


例如 当 EAX=4400000 时 ， 则 发 出 440Hz 的 声音 


频率 设 为 0 则 表示 保 止 肥 声 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CRH) 
} else if (edx == 20) { 
if (eax == 0) { 
i = io_in8(0x61); 
io _out8(@x61, i & @x@d); 
} else { 
i = 1193180000 / eax; 
io_out8(@x43, @xb6); 


io_out8(@x42, i & OxfFf); 
io_out8(@x42, i >> 8); 

i = io_in8(0x61); 

io out8(@x61, (i | 6x63) & exef); 


CLLD 
接着 我 们 编写 用 来 测试 的 应 用 程序 。 


本 次 的 a_nask.nas 节 选 


_api_beep: ; void api_beep(int tone); 
MOV EDX, 20 
MOV EAX, [ESP+4] ; tone 


INT 0x40 
RET 


本 次 的 beepdown.c 


void api end(void); 

int api getkey(int mode); 

int api alloctimer(void); 

void api inittimer(int timer, int data); 
void api settimer(int timer, int time); 
void api beep(int tone); 


void HariMain(void) 
{ 
int i, timer; 
timer = api_alloctimer(); 
api_inittimer(timer, 128); 
for (i = 20000000; i >= 20000; i - 


= i / 100) { 
/* 26KHz 一 26Hz， 即 人 类 可 以 听 到 的 声音 范围 */ 
/* 以 1% 的 速度 递减 */ 
api_beep(i); 
api_settimer(timer, 1); /* 0.01%b*/ 
if (api_getkey(1) != 128) { 
break; 


} 


api_beep(@); 
api_end(); 


这 个 应 用 程序 每 0.01 秒 便 降 低 一 次 发 出 的 声音 频 
率 ， 当 声音 频率 降 至 20Hz 或 者 用 户 按 下 任意 键 时 结 
束 。 


笔者 刚 要 “make run” 的 时 候 突 然 想到 ，QEMU 并 没 
有 模拟 蜂 鸣 器 友 声 的 功能 ， 因 此 即便 运行 这 个 程序 
也 发 不 出 声音 。 没 办 法 ， 我 们 只 好 用 “make 
install” 在 真 机 环境 下 测试 了 ， 只 要 主板 和 蜂 鸣 需 正 
确 连 接 就 会 发 出 声 首 哦 。 


Y 


AL HAR 
NOODLE 
EEPDOWN . HRE 


OAR VR Sk Seer bt FETE | RS”, oD Trt 
跟着 一 起 跌落 到 低谷 的 话 ， 不 妨 编写 下 面 这 个 
beepup.c 听 上 听 看 。 只 是 将 i 由 递减 改 为 递增 ， 就 能 及 
出 让 人 “元 满 能 量 ” 的 声音 啦 〈( 笑 ) 。 


beepup.c 


void HariMain(void) 


{ 


int i, timer; 

timer = api_alloctimer(); 

api_inittimer(timer, 128); 

for (i = 20000; i <= 20000000; i += i / 100) { 
api_beep(i); 
api _settimer(timer, 1); /* 6.61 秒 */ 
if (api_getkey(1) != 128) { 


break ; 


} 


} 
api_beep(@); 
api_end(); 


2 增加 更 多 的 两 色 (1) 
(harib22b ) 


到 目前 为 止 我 们 的 操作 系统 只 用 了 16 种 颜色 ， 话 说 
既然 现在 我 们 已 经 用 上 了 256 色 的 显示 模式 ， 那 实 
际 上 还 有 240 种 磊 色 可 以 用 ， 不 用 的 话 实 在 太 浪 费 
了 。 因 此 我 们 准备 修改 一 下 操作 系统 ， 以 便 可 以 喧 
ES EE 


到 底 要 原色 
reg. green, blue 〈 红 、 Wa) 中 每 种 斋 色 赋予 6 
EBM, 这 村 一 来 ， areas Lace: 
216 种 两 色 ， 没 定义 的 就 只 剩 下 24 种 颜色 了 。 


“6 个 色 阶 : 也 束 是 6 个 级 别 的 浓度 的 意思 。 在 这 
里 ， 定 义 为 “6 个 级 别 的 亮度 ae. 


对 于 操作 系统 ， 我 们 需要 修改 graphic.c， 好 久 没 碰 
这 个 文件 了 ， 真 怀念 啊 ! 


本 次 的 graphic.c 节 选 


void init_palette(void) 


{ 


static unsigned char table _rgb[16 * 3] = { 
CHIE) 


}; 
unsigned char table2[216 * 3]; 
int r, g, b; 
set_palette(@, 15, table rgb); 
for (b = ð; b < 63 b++) { 

for (g = 0; g < 6; g++) { 

for (r = 03 r < 6; r++) { 
table2[(r +g * 6+b* 36) * 3 + @] 


po 54; 
table2[(r +g * 6+ b * 36) * 3 +1] = 
g * 51; 
table2[(r +g * 6+ b * 36) * 3 + 2] = 
b * 51; 
} 
} 


} 
set_palette(16, 231, table2); 
return; 


这 样 一 来 ， 当 我 们 需要 指定 RGB=[51, 102, 153] 这 个 
颜色 时 ， 只 要 使 用 色 号 137 就 可 以 了 。137 这 个 数字 
的 计算 方法 为 :， 16 十 1 十 2x6 十 3x36。 


按照 这 样 的 划分 方式 ， 色 号 0 和 16 所 代表 的 颜色 都 
是 #000000， 当 费 了 一 个 色 号 ， 不 过 我 们 就 偷 个 懒 
先 这 样 吧 。 除 此 之 外 ，#ff0000 等 颜色 也 会 发 后 重复 
(重复 的 颜色 一 共有 8 种 ) 。 


接 下 来 我 们 还 需要 编写 应 用 程序 ， 不 过 这 次 不 用 编 
写 新 的 API， 所 以 任务 很 轻松 。 


本 次 的 color.c 


int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 

void api_initmalloc(void) ; 

char *api_malloc(int size); 

void api_refreshwin(int win, int xð, int yO, int x1, 
int y1); 

void api_linewin(int win, int x@, int y@, int x1, int 
y1, int col); 

int api_getkey(int mode); 

void api_end(void) ; 


void HariMain(void) 
{ 
char *buf; 
int win, x, Yy, r, g, b; 
api_initmalloc(); 
buf = api_malloc(144 * 164); 
win = api_openwin(buf, 144, 164, -1, "color"); 
for (y = ð; y < 128; y++) { 
for (x = 03 x < 128; x++) { 
r Jot 2s 
g =y * 2; 
b ð; 


buf[(x + 8) + (y + 28) * 144] = 16 + (r / 
+ (g / 43) * 6 + (b / 43) * 36; 
} 


} 

api_refreshwin(win, 8, 28, 136, 156); 
api_getkey(1); /* 等 待 按 下 任意 键 */ 
api_end(); 


赶紧 “make run”’— fF, A, WEZ ! 


五 彩 斑 阐 


3 增加 更 多 的 颜色 (2) 
(harib22c ) 


color.hrb 很 漂亮 ， 不 过 其 实 还 有 一 种 技巧 能 够 让 凑 
色 更 加 丰富 ， 下 面 我 们 束 来 试 试看 吧 。 


实际 上 ， 如 果 我 们 不 用 256 色 模式 ， 而 使 用 VESA 
的 全 彩色 模式 的 话 ， 可 以 轻而易举 地 显示 出 更 多 
的 颜色 ， 不 过 在 不 兼容 VESA 标 准 的 电脑 上 《〈 偶 

尔 会 有 ) 是 完全 无 法 使 用 全 彩色 模式 和 65536 色 模 
式 的 。 而 且 ， 要 在 “ 纸 娃娃 系统 ”上 实现 对 全 彩色 

模式 的 支持 ， 得 花 上 差不多 整整 一 天 时 间 。 眼 看 
剩 下 的 日 子 不 多 了 ， 笔 者 也 该 开始 考虑 30 天 到 底 
能 做 到 什么 程度 了 “〈 笑 ) ， 所 以 就 不 在 全 彩色 模 
式 上 花费 时 间 了 。 


可 能 有 人 会 说 “反正 我 以 后 是 要 用 全 彩色 的 ， 这 个 
技巧 对 我 就 没什么 用 了 吧 ”， 这 个 想法 也 没 错 。 不 
过 笔者 认为 ， 即 便 如 此 ， 也 还 是 对 这 种 搁 巧 有 扣 
本 解 比较 好 ， 因 为 有 时 候 需 要 显示 一 幅 全 彩色 的 
图 片 ， 但 很 有 可 能 直到 不 支持 全 彩色 模式 的 电 
脑 ， 如 果 了 解 了 这 个 技巧 ， 在 这 种 情况 下 也 可 以 
让 图 片 看 上 去 相对 好 看 一 些 。 


“ 谁 让 他 们 不 能 用 全 彩色 的 ， 才 不 管 他 们 呢 ?， 大 


家 干 万 不 要 说 这 种 绝情 的 话 哦 。 如 果 大 家 编写 的 
操作 系统 能 够 做 到 “用 全 彩色 模式 的 时 候 很 漂 且 ， 
不 能 用 的 时 候 也 不 难看 ”"， 笔 者 也 残 感到 很 欣慰 
To 


怎样 才能 让 颜色 看 起 来 更 多 呢 ? RATE AH AERA 
BACHE, AEA BX A EE aE e 
FE, Rete. PEMA RTS rs SPH 
3 种 〈“ 算 上 完全 不 混合 的 情况 ， 一 共有 5 种 ) 。 


二 HH a n'a” m- RRRA 
H ECP Cee CR a 
$ y y yY y 


这 样 一 来 ， 虽 然 我 们 只 有 6 级 色 阶 ， 但 却 可 以 显示 
出 21 级 色 阶 《在 纯色 中 间 可 以 产生 3 个 中 间 色 ， 
此 是 6 十 5x3 二 21) 。 


H 即便 只 有 两 种 颜色 


CLLD 
TOUR BATT A m BEB ODF Be Fe BY BY 


本 次 的 color2.hrb 


int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 

void api_initmalloc(void) ; 

char *api_malloc(int size); 

void api_refreshwin(int win, int xð, int yO, int x1, 
int y1); 

void api _linewin(int win, int x@, int y@, int x1, int 
y1, int col); 

int api_getkey(int mode); 

void api_end(void) ; 


unsigned char rgb2pal(int r, int g, int b, int x, int 
y); 


void HariMain(void) 
{ 
char *buf; 
int win, X, Yy; 
api_initmalloc(); 
buf = api_malloc(144 * 164); 
win = api_openwin(buf, 144, 164, -1, "color2"); 
for (y = ð; y < 128; y++) { 
for (x = 03 x < 128; x++) { 
buf[(x + 8) + (y + 28) * 144] = rgb2pal(x * 
2, y * 2, @, X, y); 
} 
} 
api_refreshwin(win, 8, 28, 136, 156); 
api_getkey(1); /* 等 待 按 下 任意 键 */ 
api_end(); 
} 


unsigned char rgb2pal(int r, int g, int b, int x, int 
y) 


ae int table[4] = { 3, 1, ©, 2 }; 


Ti ; /* 判 断 是 偶数 还 是 奇数 */ 

y &= 

二 +y * 2];  /* 用 来 生成 中 间 色 的 常量 */ 
r= (r * 21) / 256; /* 『 为 8 一 26#/ 

g = (g * 21) / 256; 

b = (b * 21) / 256; 

r=(r+i)/ 4; /* 下 为 8 一 5#/ 

g = (8 +1) /-:4; 

b = (b + i) / 4; 

return 16 +r +g*6+b * 36; 


rgb2pal 是 本 次 增加 颜色 的 核心 部 分 ， 里 面 的 算法 看 


上 去 非常 神秘 ， 佑 计 很 多 人 都 不 明日 为 什么 如 此 简 
短 的 代码 却 能 实现 我 们 所 需 的 功能 。 其 实用 很 多 个 
f 语 句 也 可 以 实现 一 样 的 功能 ， 但 相 比 之 下 显然 我 
们 的 算法 速度 更 快 ， 因 此 我 们 还 是 采用 这 个 算法 
吧 。 


如 果 对 解 谜 感 兴趣 的 话 ， 可 以 化 点 时 间 仔 细 思 
下 。 话 说 这 个 算法 也 不 是 笔者 想 出 来 的 ， 而 是 一 位 
编程 达 人 传授 的 笔者 一 开始 也 是 写 了 很 多 if 语 
人 句 ， 后 来 锌 这 位 达 人 给 改 成 这 样 了 ) 。 


好 了 ， 我 们 来 “make run” 吧 。 哦 哦 ， 看 起 来 平滑 多 


(0) 


console 


看 起 来 平 请 多 了 


4 窗口 初始 位 置 (harib22d ) 


在 编写 color.hrb 的 时 候 笔 者 注意 到 一 个 小 问题 ， 
color 的 窗口 一 开始 出 现 的 位 置 好 像 有 点 别扭 〈 注 : 
使 用 VESA 的 人 画面 尺寸 非常 大 ， 可 能 并 不 觉得 有 
什么 别扭 的 ) 。 


harib22c 运 行 的 时 候 窗 口 跑 到 画面 外 面 去 了 


因此 我 们 希望 让 窗口 总 是 显示 在 画面 的 中 央 ， 而 且 
显示 窗口 时 的 图 层 高 度 也 不 能 总 是 固定 为 3， 而 是 
要 判断 当前 画面 中 窗口 的 数量 并 自动 显示 在 最 上 
面 。 虽 说 现在 窗口 也 是 显示 在 最 上 面 ， 不 过 如 条 再 
多 打开 几 个 的 话 ， 情 况 就 不 一 样 了 。 


AS VX AY console.c {i 126 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


{ 


CRH) 
} else if (edx == 5) { 
CRH) 


sheet_slide(sht, (shtctl->xsize - esi) / 2, 
(shtctl->ysize - edi) / 2); 


sheet_updown(sht, shtctl->top); /* 将 窗口 图 层 高 度 


指定 为 当前 鼠标 所 在 图 层 的 高 度 ， 鼠 标 移 到 上 层 */ 
CRH) 
} else if (edx == 6) { 
CRH) 


好 ， 完 工 了 ， 这 下 窗口 应 该 显示 在 男 面 中 央 了 ， 我 
们 来 试 试看 吧 。 “make run”, MIS ! 


这 次 显示 在 画面 中 央 了 


5 SMa AT eA CD 
(harib22e ) 


我 们 在 25.2 节 和 25.3 节 中 分 别 编 写 了 color.hrb 和 
color2.hrb， 如 果 要 和 仔细 对 比 一 下 这 两 个 程序 显示 出 
来 的 画面 有 什么 区 别 ， 就 要 把 两 个 程序 的 窗口 并 排 
起 来 看 才 行 ， 可 是 我 们 不 能 同时 启动 两 个 应 用 程序 
IT, SEERA ABP SO, RATE FE TS BE 
务 到 底 是 为 了 什么 呢 ? 


要 解决 这 个 问题 ， 我 们 可 以 考虑 修改 一 下 命令 行 窗 
口 ， 使 其 在 应 用 程序 运行 中 就 可 以 输入 下 一 条 命 
令 ， 不 过 这 样 的 修改 量 实在 太 大 ， 讲 解 起 来 也 会 很 
厅 烦 ， 因 此 我 们 还 是 改 用 同时 启动 两 个 命令 行 窗口 
的 方法 吧 。 如 果 可 以 启动 两 个 命令 行 窗口 ， 就 可 以 
在 每 个 窗口 中 各 目 局 动 一 个 应 用 程序 ， 这 就 相当 于 
同时 运行 了 两 个 应 用 程序 。 而 命令 行 窗口 我 们 一 开 
台 束 是 作为 任务 来 编写 的 ， 所 以 要 同时 启动 两 个 也 
很 容易 。 


不 过 我 们 的 程序 中 还 有 一 部 分 是 以 只 有 一 个 命令 行 
窗口 为 前 捉 设 计 的 ， 所 以 如 条 只 是 司 动 两 个 命令 行 
窗口 任务 的 话 肯 定 是 行 不 通 的 。 不 过 我 们 不 妨 先 局 
动 两 个 命令 行 窗 口试 试看 ， 如 果 有 什么 不 对 的 地 方 


再 去 一 点 一 点 地 修改 〈 一 上 来 就 想 做 得 完美 ， 反 而 
会 过 到 麻烦 的 问题 昵 〉。 


于 是 ， 我 们 这 次 只 修改 bootpack.c， 将 命令 行 窗口 
的 相关 变量 (buf_cons、sht_cons、task_cons 利 
cons) 各 准备 2 个 ， 分 别 分 给 命令 行 1 和 命令 行 2。 
例如 : task_cons ”task_cons1 和 task_cons2 
不 过 这 样 一 来 ， 如 条 要 将 命令 行 窗口 增加 到 10 个 ， 
己 不 是 要 写 10 组 这 样 的 变量 吗 ? 虽说 可 以 复制 粘 


贴 ， 但 还 是 太 麻 烦 了， 因此 我 们 稍微 动 点 脑筋 改 成 
下 面 这 样 殉 好 了 。 


task_cons -, task cons[6] 和 task cons[1] 


这 样 的 话 我 们 就 可 以 用 一 个 循环 来 进行 相同 的 处 


理 ， 管 它 10 个 还 是 100 个 都 没 问 题 ! 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


中略) 
unsigned char *buf_back, buf_mouse[256], *buf_win, 
*buf_cons[2]; /* 从 此 开始 */ 


struct SHEET *sht back, *sht mouse, *sht win, 


*sht_cons[2]; 

struct TASK *task_a, *task_cons[2]; 
/* 到 此 结束 */ 

中略) 


/* sht_cons */ 
for (i = 0; i < 2; i++) { 
/* 从 此 开始 */ 
sht_cons[i] = sheet alloc(shtct]); 
buf_cons[i] = (unsigned char *) 
memman_alloc_4k(memman, 256 * 165); 
sheet_setbuf(sht_cons[i], buf_cons[i], 256, 
165, -1); /* 没 有 透明 色 */ 
make_window8(buf_cons[i], 256, 165, "console", 
ð); 
make_textbox8(sht_cons[i], 8, 28, 240, 128, 
COL8_000000) ; 
task_cons[i] = task_alloc(); 
task_cons[i]->tss.esp = memman_alloc_4k(memman, 
64 * 1024) + 64 * 1024 - 12; 
task_cons[i]->tss.eip = ( 
task_cons[i]->tss.es = 
task_cons[i]->tss.cs = 
task_cons[i]->tss.ss = 
task_cons[i]->tss.ds = 
task_cons[i]->tss.fs = 
task_cons[i]->tss.gs = 1 * 8; 
*((int *) (task_cons[i]->tss.esp + 4)) 
sht_cons[i]; 
*((int *) (task_cons[i]->tss.esp + 8)) 
memtotal; 
task_run(task_cons[i], 2, 2); /* level=2, 
priority=2 */ 
sht_cons[i]->task = task_cons[i]; 
sht_cons[i]->flags |= 0x20; /+ 有 光标 */ 


) &console_task; 


int 
* 8 
* 8 
* 8 
* 8 
* 8 


PRPRENPB 


3 
3 
3 
3 
3 


(int) 


} 
/* 到 此 结束 */ 


CHEK) 
sheet_slide(sht_back, ©, 090); 
sheet_slide(sht_cons[1], 56, 6); FERE] 
FS 
sheet_slide(sht_cons[@], 8, 2); /# 这 里 ! 
*/ 
sheet slide(sht win, 64, 56); 
sheet slide(sht mouse, mx, my); 
sheet_updown(sht_back, Q); 
sheet_updown(sht_cons[1], 1); /* 从 此 开 
始 */ 
sheet_updown(sht_cons[@], 2); 
sheet_updown(sht_win, 3); 
sheet_updown(sht_mouse, 4); /* 到 此 结 
束 */ 
key win = sht_win; 
(中 上 略 ) 
for (;;) { 
(中 上 略 ) 
io_cli(); 
if (fifo32_status(&fifo) == 0) { 
(中 上 略 ) 
} else { 
CREA ) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
(中 上 略 ) 


/* 从 此 开始 */ if (i == 256 + Ox3b && key shift != 6 && 
task_cons[@]->tss.ss® != ©) { /* Shift+F1 */ 

cons = (struct CONSOLE *) *((int *) 
OxOFfec) ; 


cons_putstr@(cons, "\nBreak(key) 


:\n"); 
切换 */ 


io_cli(); /* 强 制 结束 处 理 时 禁止 任务 


task_cons[@]->tss.eax = (int) & 
(task_cons[@]->tss.esp@) ; 
/* 到 此 结束 */ task_cons[@]->tss.eip = (int) 
asm_end_app; 


io_sti(); 
} 
CHH ) 
} else if (512 <= i && i <= 767) { /* RR% 
据 */ 
if (mouse decode(&mdec, i - 512) != ð) 
{ 
CHH) 
if ((mdec.btn & 0x01) != 6) { 
/* 按 下 左 键 时 */ 
if (mmx < @) { 
CHAM ) 
for (j = shtctl->top - 1; j 
> ð; j--) { 


CFH) 
if (O <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 
CHH ) 
if (sht->bxsize 
- 21 <= x && x < sht->bxsize - 5 && 5 <= y && y < 19) { 


AA ea 
钮 */ 

if ((sht- 
>flags & 0x10) != @) { /*# 是 否 为 应 用 程序 窗口 */ 


cons = 


(struct CONSOLE *) *((int *) @x@fec); 
cons_putstr@(cons, "\nBreak(mouse) :\n"); 


io_cli();  /#* 强 制 结束 处 理 时 禁止 任务 切换 */ 

/* 从 此 开始 */ 
task_cons[@]->tss.eax = (int) &(task_cons[@]- 
>tss.esp@) ; 


/* 到 此 结束 */ 
task_cons[@]->tss.eip = (int) asm end app; 
io sti(); 
} 
} 
break 
} 
} 
} 
} else { 
CHAK ) 
} 
} else { 
《中 上 略 》 
i } 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CHAK ) 


前 半 部 分 代码 应 该 还 很 容易 看 懂 ， 不 过 后 半 部 分 
Shift+F1 以 及 “x” 按 钮 的 处 理 是 不 是 党 得 有 些 蹊跷 ? 


为 什么 不 判断 就 直接 写 cons[0] 呢 ? RE, x 
Re re (Art CSE). WERT A DELO RRA IY 
话 编译 器 通 不 过 ， 因 此 惑 先 写 了 [0]， 关 于 这 一 块 ， 
我 们 会 在 25.8 节 中 进行 修复 。 


因此 ， 在 运行 harib22e 和 harib22f 的 时 候 ， 大 家 记得 
千 万 别 按 Shift+F1 或 者 “x” 按 钮 哦 。 


好 了 ， 我 们 来 “make run”， 目 前 打开 两 个 命令 行 窗 
口 应 该 没 问 题 吧 。 好 ， 出 来 了 ! 


console xj 


task_a x| 
fharib22elf S 


E Lan 
出 现 了 两 个 命令 行 窗 口 


在 两 个 窗口 之 间 切 换 一 下 ， 貌 似 痢 能 够 执行 命令 。 
之 所 以 说 “貌似 *"”， 是 因为 笔者 知道 镜 下 的 问题 还 有 
很 多 ， 人 至 于 后 面 到 抵 能 不 能 顺利 运行 ， 说 实话 笔者 
真 没 什么 目 信 。 


-HRB 


‘OLE 


ODLE .HEB 
BEEPDOWN . HRB 
COLOR =. HRB 


尝试 执行 一 下 mem 和 和 dir 命令 


那么 现在 到 底 能 不 能 同时 启动 两 个 应 用 程序 呢 ? 虽 
然 很 想 用 color.hrb 和 color2.hrb 来 试 一 下 ， 不 过 大 抵 
是 不 会 成 功 的 ， 所 以 我 们 还 是 从 基本 中 的 基本 一 一 
ahrb 开 始 测试 吧 。 喷 ? 什么 都 没 显示 出 
R??? zl EXILU! 居然 显示 到 没 运行 这 
个 程序 的 命令 行 窗口 中 去 了 。 


运行 ahrb 的 情形 ...... 


这 样 可 不 行 啊 ， 我 们 得 解决 这 个 问题 。 


6 增加 命令 行 窗口 (2) 
(harib22f ) 


到 底 应 该 改 哪里 呢 ? sree oe BAe, K 
数 hrb_api0 中 的 这 人 句 : 


struct CONSOLE *cons = (struct CONSOLE *) *((int *) 
exefec); 


应 该 就 是 问题 所 在 了 ， 这 里 的 cons 变 量 是 用 来 判 
源 “ 要 问 哪个 命令 行 窗口 输出 字符 ”的 关键。 该 变量 
的 值 是 从 内 存 地 址 0x0fec 读 取出 来 的 ， 而 无 论 从 哪 
个 任务 读 取 这 个 内 存 地 址 中 的 值 ， 得 到 的 肯定 都 是 
同一 个 值 ， 因 此 不 管 在 哪个 窗口 中 运行 a.hrb， 都 只 
能 在 固定 的 其 中 一 个 窗口 中 显示 字符 。 


harib22e 中 ， 无 论 在 哪个 窗口 运行 ， 结 果 都 一 样 


那么 该 如 何 解决 这 个 问题 呢 ? 虽 ， 看 看 这 种 方法 怎 


么 样 。 


本 次 的 bootpack.h 节 选 


struct TASK { 
int sel, flags; /* sel 代 表 GDT 编 号 */ 
int level, priority; 
struct FIFO32 fifo; 


struct TSS32 tss; 
struct CONSOLE *cons; ”/* 从 此 开始 */ 
int ds_base; /* 到 此 结束 */ 


每 个 任务 都 拥有 各 自 的 TASK 结构 ， 只 要 我 们 将 
cons 保 存在 TASK 结构 中 ， 束 可 以 由 不 同 的 任务 读 
取出 不 同 的 值 了 。 上 此外， 我 们 将 ds_base 也 放 到 了 
TASK 结构 中 ， 理 由 和 上 面 的 cons 是 相同 的 。 
ds_base 之 前 是 从 内 存 地 址 0x0fe8 处 读 取 的 ， 但 很 明 
显 ，cons[0] 的 应 用 程序 数据 段 地 址 和 cons[1] 的 地 址 
肯定 是 不 同 的 ， 如 果 不 在 这 里 区 分 开 的 话 ， 字 符 串 


的 显示 就 会 出 问题 。 


接 下 来 我 们 只 要 将 代码 中 的 *((int *) 0x0fec) 和 *((int 
*) 0x0fe8) 全 部 改 为 使 用 TASK 结构 中 的 cons 和 
ds_base 成 员 就 可 以 了 ， 需 要 修改 的 只 有 console.c 一 
个 文件 。 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, int memtotal) 


CHH) 

task->cons = &cons; /# 修 改 前 : *((int *) @x@fec) 
= (int) &cons;*/ 

CHH) 


} 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


CHH) 
if (finfo != 6) { 
CHH) 
if (finfo->size >= 36 && strncmp(p + 4, "Hari", 
4) == 6 && *p == 0x00) { 
CHH ) 


task->ds_base = (int) q; /* 修 改 前 : *( (int 
*) Oxefe8) = (int) &q;*/ 
} else { 
《中 上 略 》 


} 
(中 上 略 )》 


} 
(中 上 略 ) 
} 


int *hrb api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CRH ) 
int ds_base = task->ds_base; IZETE, 


struct CONSOLE *cons = task->cons; /* 这 里 ! */ 
(中 上 略 ) 
} 


int *inthandler@c(int *esp) 


(中略 》 
struct CONSOLE *cons = task->cons; /* 这 里 ! */ 
(中略 》 

} 


int *inthandler@d(int *esp) 


CPR) 
struct CONSOLE *cons = task->cons; /* 这 里 ! */ 


中略) 


好 ， 完 工 啦 。 现 在 无 论 在 哪个 窗口 运行 ahrb， 应 该 
会 在 相应 的 窗口 中 显示 出 字符 .…… 了 吧 ..……. 


我 们 来 试验 一 下 吧 。“make run”， 在 两 边 的 窗口 分 
别 运行 a.hrb! WRR, RIT, KEIT! (要 是 这 样 
还 不 行 的 话 ， 笔 者 真 的 不 知道 该 怎么 办 了 ， 小 捏 了 
— EF) 


fharib22f 


a.hrb 运 行 成 功 ! 

趁 热 打铁 ， 我 们 来 运行 color.hrb 和 color2.hrb 试 试 
Fo E! 成 功 了 ! 现在 我 们 可 以 把 两 个 窗口 并 排 对 
比 了 ， 终 于 实现 了 当初 的 风 愿 。 


| [harib22f 


color.hrb vs color2.hrb 


接 下 来 我 们 来 做 点 别 的 试验 吧 ， 比 如 说 把 color.hrb 
和 color2.hrb 的 窗口 关闭 ( 注 : Shift+F1 和 “x” 按 钮 点 
击 的 处 理 我 们 还 没有 改 好 ， 记 得 按 回 车 键 退 出 程序 
哦 )...... me? WEL, QEMUH BIR E! 


这 是 由 于 color.hrb 和 color2.hrb 的 局 动 顺序 、 各 从 
哪个 命令 行 窗 口 运 行 的 、 以 及 先 关 闭 的 哪 一 个 窗 
口 等 不 同情 况 导 致 的， 出 错 的 方式 貌似 也 不 一 
样 。 应 用 程序 没有 bug， 也 没有 故意 揭 乱 ， 这 是 由 
FREER AS AT S| AC SAS o 


因此 ， 在 两 个 color 程 序 PK 之 后 ， 我 们 的 下 一 个 目 
标 就 是 要 使 窗口 能 够 正常 关闭 。 


7 增加 命令 行 窗口 (3) 
(harib22g) 


为 什么 程序 会 无 法 正 第 关闭 呢 ? 一 开始 笔者 以 为 问 
题 出 在 关闭 窗口 的 函数 ， 或 者 是 处 理 程 序 结束 的 部 
分 ， 但 事实 并 非 如 此 ， 这 个 失误 比 想象 中 更 加 严 
重 。 问 题 的 原因 在 于 应 用 程序 的 内 存 段 消 失 了 ， 突 
然 间 竟然 友 生 这 种 事情 ，QEMU 上 肯定 也 被 整 糊 涂 
To 


也 许 大 家 不 明白 应 用 程序 的 内 存 段 消失 是 怎么 一 回 
事 ， 总 之 ， 问 题 出 在 cmd_app 呈 上。 


harib22f 的 cmd_app 节 选 


set_segmdesc(gdt + 1003, finfo->size - 1, (int) p, 
AR_CODE32_ER + x60); 
set_segmdesc(gdt + 1004, segsiz - 1, (int) q, 
AR_DATA32_RW + 0x60); 


CHER ) 
start_app(@x1b, 1003 * 8, esp, 1004 * 8, &(task- 
>tss.espO) ); 


上 面 这 段 代 人 码 是 用 来 创建 应 用 程序 段 并 局 动 应 用 程 
序 的 ， 大 家 仔细 思考 一 下 这 段 代码 。 


首先 ，color.hrb 在 某 个 窗口 中 被 运行 ， 司 动 程序 一 


切 顺 利 ， 然 后 显示 窗口 并 绘图 ， 接 下 来 等 竺 键 租 输 
入 并 进入 休眠 状态 。 到 这 里 为 止 没 有 任何 问题 。 


然后 我 们 在 另外 一 个 窗口 中 运行 color.hrb， 程 序 也 
顺利 启动 了 ， 显 示 窗 口 并 绘图 ， 随 后 进入 休眠 状 
态 。 然 而 在 这 个 时 候 ， 问 题 其 实 已 经 发 生 了 。 这 是 
怎么 回 事 呢 ? 因为 我 们 为 color.hrb 准 备 的 1003 号 代 
人 码 段 和 1004 号 数据 段 ， 被 color2.hrb 所 用 的 段 给 履 盖 
挥 了 。 


办 此 ， 当 按 下 回 车 键 唤醒 color.hrb 时 ， 整 会 发 生 异 
各 情况 明明 应 该 去 运行 color.hrb 的 ， 结 果 却 错 
误 地 运行 了 color2.hrb， 这 样 当 然 会 出 错 了 。 


既然 问题 的 原因 想 明 白 了 ， 要 干 挥 这 个 bug 也 束 不 
难 了 ， 只 要 为 color.hrb 和 color2.hrb 分 配 编号 不 同 的 
段 就 可 以 了 。 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


CHH) 


if (finfo != @) { 
CHH ) 


if (finfo->size >= 36 && strncmp(p + 4, "Hari", 

A) == O && *p == 0x00) { 

CREK) 

set_segmdesc(gdt + task->sel / 8 + 1000, 
finfo->size - 1, (int) p, AR_CODE32_ER + 0x60); 

set_segmdesc(gdt + task->sel / 8 + 2000, 
segsiz - 1, (int) q, AR_DATA32_RW + 0x60); 

CHAR ) 


start_app(@x1b, task->sel + 1000 * 8, esp, 
task->sel + 2000 + 8, &(task->tss.esp@)); 
CREK) 
} else { 
CREK) 


} 
中略) 
} 
CHAM ) 


在 task- >sel 中 填 入 TSS 的 段 号 *8【〈 请 参照 mtask.c 
的 task_init) ， 将 这 个 值 除 以 8， 结 果 一 定 洛 在 3 一 
1002。 将 其 加 上 1000， 惑 得 到 1003 一 2002 的 值 ， 我 
们 把 它 用 作 应 用 程序 用 的 代码 段 编号 ;将 其 加 上 

2000， 即 得 到 2003 一 3002 的 值 ， 我 们 把 它 用 作 应 用 
程序 用 的 数据 段 编号 。 这 样 一 来 ， 就 不 会 发 生 段 被 
履 盖 的 问题 了 。 


我 们 来 试 试 看 能 不 能 成 功 , “make run”， 运 行 
color.hrb 和 color2.hrb， 并 排 对 比 一 下 ， 然 后 按 下 回 


车 键 结束 程序 。 啊 ， 这 次 终于 成 功 了 ， 撒 人 花 ! 


harib22g 


成 功 结束 了 应 用 程序 


8 HIMMA A) 
Charib22h ) 


增加 命令 行 窗 口 这 个 系列 终于 到 了 最 后 一 节 ， 之 前 
我 们 已 经 知道 ShifttrF1 和 “x” 按 钮 的 部 分 是 有 问题 
的 ， 但 一 直 放 着 没 管 ， 现 在 终于 到 了 解决 它 的 时 候 
ie 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


(中略) 
struct TASK *task_a, *task_cons[2], *task; 
CHH) 
for (;;) { 
CHH) 
if (fifo32_status(&fifo) == @) { 
CHH ) 
} else { 
CHE) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CHH ) 
/* 从 此 开始 */ if (i == 256 + 6x3b && key shift != @) { 
task = key_win->task; 
if (task != 0 && task->tss.ss@ != 
6) { /* Shift+F1 */ 
cons_putstr@(task->cons, 
"\nBreak(key) :\n"); 
io_cli();  /* 强 制 结束 处 理 时 茶 止 


任务 切换 */ 

task->tss.eax = (int) &(task- 
>tss.esp@) ; 

task->tss.eip = (int) 
asm_end_app; 


io_sti(); 
/* 到 此 结束 */ } 
} 
CREK) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
if (mouse decode(&mdec, i - 512) != 0) 
{ 
(中 上 略 ) 
if ((mdec.btn & 6x61) != 6) { 
/*t2 A e*/ 
if (mmx < @) { 
CREK) 
for (j = shtctl->top - 1; j 
> 60; j--) { 


CHH) 
if (@ <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 
CHH ) 
if (sht->bxsize 
- 21 <= x && x < sht->bxsize - 5 && 5 <= y && y < 19) { 
/* 点 击 “x” 按 钮 */ 
/* 从 此 开始 */ if ((sht- 
>flags & 0x10) != 6) {/# 是 否 为 应 用 程序 窗口 ? */ 


task = 
sht->task; 


cons_putstr@(task->cons, "\nBreak(mouse) :\n"); 


io_cli(); /* 强 制 结束 处 理 时 禁止 任务 切换 */ 


>tss.eax = (int) &(task->tss.esp@) ; 
/* 到 此 结束 */ task- 


>tss.eip = (int) asm_end_app; 


io_sti(); 
} 
} 
break ; 
} 
} 
} 
} else { 
(CREK) 
} 
} else { 
CREK) 
i } 
} else if (i <= 1) { /* 光 标 用 定时 器 */ 
CREK) 


} 


这 次 的 修改 也 很 简单 ， 首 先 将 原来 task_cons[0] 的 地 
方 改 为 key_win 一 >task 和 sht 一 >task， 这 样 一 来 ， 用 
键 租 强 制 结 束 时 会 以 当前 输入 窗口 为 对 象 ， 而 用 鼠 
标点 击 “x” 按 钮 时 会 以 被 点 击 的 窗口 为 对 象 。 然 


后 ， 我 们 将 从 内 存 地 址 0xfec 读 出 cons 的 部 分 改 为 使 
用 task 一 >cons， 这 样 就 改 好 了 了。 


我 们 来 “make run”， 将 color.hrb 和 color2.hrb 的 窗口 
并 排 显 示 之 后 ， 用 键盘 或 者 鼠标 强制 结束 试 试 .…… 
看 ， 成 功 了 ! 


[harib22h 


MIL! 


9 变 得 更 像 真正 的 操作 系统 (1) 
(harib22i ) 


做 到 这 里 ， 我 们 的 系统 看 上 去 已 经 非常 像 那 么 回 事 
了 。 不 过 ， 大 家 回忆 一 下 一 般 操 作 系 统 的 样子 ， 再 
看 看 我 们 的 画面 ， 是 不 是 有 什么 奇怪 的 东西 混 进 去 
了 ? 一 般 的 操作 系统 中 哪 有 这 玩意 儿 啊 ?笔者 所 说 
的 ， 就 是 taks_a 的 窗口 。 


一 般 的 操作 系统 不 会 一 上 来 就 弹出 这 么 一 个 窗口 来 
吧 ? 话说 回来 ， 这 个 窗口 貌似 是 14.6 节 中 我 们 为 了 
让 画面 看 上 去 更 酶 更 有 操作 系统 范 儿 而 做 出 来 的 ， 
也 就 是 说 ， 它 只 是 个 花瓶 ， 摆 着 好 看 罢了 (14.6 节 
已经 是 差不多 两 周 之 前 讲 的 了 呢 ) 。 之 后 ， 我 们 在 
练习 多 任务 等 部 分 时 这 个 窗口 也 还 派 上 过 用 场 ， 不 
过 现在 它 看 起 来 确实 有 点 碍 手 碍 脚 了 一 一 它 不 是 应 
a a 

KE, RAEE MBE RAPE, GRAB 
REN Mee, RESAMMAN Ra 
好 了 。 而 且 应 用 程序 的 话 ， 不 需要 的 时 候 束 可 以 关 
fi, «(ON EE) 还 可 以 同时 运行 多 个 副本 呢 。 


其 实 ， 在 bootpack.c 中 ， 只 有 这 个 task_a 的 窗口 是 摘 


特殊 化 的 ， 如 果 删 掉 task_a 的 部 分 程序 就 变 得 清爽 
多 了 。 对 了 ，task_a 的 处 理 全 部 是 在 bootpack.c 中 完 
成 的 ， 因 此 不 需要 修改 其 他 的 程序 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


中略) 

int mx, my, i; /*Ņ®l]}¥ cursor_x#llcursor_c */ 

unsigned int memtotal; 

struct MOUSE_DEC mdec; 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

unsigned char *buf_back, buf_mouse[256], 
*buf_cons[2]; ”/* 删 掉 了 buf_win */ 

struct SHEET *sht_back, *sht_mouse, *sht_cons[2]; 

struct TASK *task_a, *task_cons[2], *task; 

/# 删 掉 了 用 于 光标 闪烁 的 timer */ 

static char keytable6[6x86] = { /# 癌 Keytab1le6、 
keytable1 中 追加 退 格 键 和 回 车 键 的 编码 */ 

ð, ð, ATR A Bes E g 

'8', '9', '0', '-', TOS 0x08, ®, 


5 
static char keytable1[@x80] = { 
O, 0, '!', @x22, '#', '$', '%', '&', 0X27, 


195.5 re ty tw, ae tw, 0x08, ð, 
'Q', PW iD caer 'R', E Yes Ui SE “QO, 


'', '{', 6x6a, O, 'A', 'S', 
CHH) 
}; 
中略) 
/* sht_back */ 
《中略 ) 


/* sht _ cons */ 


中略) 
/# 删 反 了 关于 sht_win 的 部 分 */ 


/* sht_mouse */ 


CHH) 


sheet_slide(sht_back, ©, 0); 
sheet_slide(sht_cons[1], 56, 6); 
sheet_slide(sht_cons[@], 8, 2); 

/# 删 把 了 sht_win */ 

sheet_slide(sht_mouse, mx, my); 
sheet_updown(sht_back, ð); 
sheet_updown(sht_cons[1], 1); 
sheet_updown(sht_cons[@], 2); 
sheet_updown(sht_mouse, 3); /* 从 此 开始 */ 
key win = sht_cons[@]; 

keywin on(key win) ; /* 到 此 结束 */ 


CHH) 


for (33) { 
CRH) 
if (fifo32_status(&fifo) == 0) { 
《中 略 ) 
} else { 
(中 上 略 ) 


if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CHAK ) 
eee if (s[@] != 0) { /# 一 般 字 符 、 退 格 键 、 回 车 
ge * / 
fifo32_put(&key_win->task->fifo, 
s[@] + 256); 
} 
if (i == 256 + @xef) { /* Tab 键 */ 
keywin_off(key_win) ; 
j = key_win->height - 1; 
if (j == 9) { 
j = shtctl->top - 1; 


} 
key_win = shtctl->sheets[j]; 
/* 到 此 结束 */ keywin_on(key_win); 
} 
CHH) 


/* 删 掉 了 “重新 显示 光标 ”的 部 分 */ 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 


据 */ 
if (mouse decode(&mdec, i - 512) != ð) 
{ 
CHEK) 
if ((mdec.btn & 0x01) != 6) { 
/* 按 下 左 键 */ 
if (mmx < @) { 
CREK) 
for (j = shtctl->top - 1; j 
20 J-A 
(中 上 略 ) 


if (O <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 


sheet updown(sht, shtctl->top - 1); 


if (sht != 


key_win) { 
keywin_off(key_win); ya ese ey 
key_win = 
sht; 
keywin_on(key_win); ZL* eS | 
CHH ) 
} 
} 
} 
} else { 
CHH ) 
} 
} else { 
CHH ) 
} 
} 
} 
/* 柚 控 了 “光标 用 定时 絮 ” 的 部 分 */ 
} 
} 

} 
void keywin off(struct SHEET *key_win) 
/* 从 此 开始 */ 
{ 


change wtitle8(key_win, @); 
if ((key_win->flags & 0x20) != ð) { 
fifo32_put(&key_win->task->fifo, 3); /* 命 令 行 窗 
口 光标 OFF */ 
} 


return; 


/* 到 此 结束 */ 
} 


void keywin_on(struct SHEET *key_win) 
/* 从 此 开始 */ 
{ 
change wtitle8(key_win, 1); 
if ((key_win->flags & 0x20) != 0) { 
fifo32_put(&key_win->task->fifo, 2); /* 命 令 行 窗 
口 光标 ON */ 
} 


return; 
/* 到 此 结束 */ 
} 


大 功 告 成 ， 看 上 去 清爽 多 了 。 修 改 前 的 bootpack.c 
一 共有 374 行 代码 ， 修 改 后 只 剩 下 304 行 ， 拓 然 减 抒 
了 70 行 呢 。 


我 们 还 是 来 “make run” 吧 ， 不 知道 能 不 能 成 功 呢 。 
WY Hef ? 


貌似 系统 在 不 断 重 局 ， 当 然 ， 任 何 操作 都 没有 反 
应 ， 看 来 是 失败 了 .…… 


10” 变 得 更 像 真 正 的 操作 系统 (2) 
(harib22j) 


当然 不 能 就 这 样 放弃 ， 我 们 来 找 找 失败 的 原因 。 在 
对 有 可 能 出 问题 的 地 方 排 租 一 过 之 后 ， 我 们 友 现 只 
要 将 bootpack.c 的 第 117 行 keywin_on(key_win); 这 一 
句 删 挥 *， 重 局 的 毛病 就 没 了 。 不 过 这 样 一 来 ， 启 

动 之 后 光标 没有 显示 出 来 ， 必 须要 按 Tab 键 或 者 点 
击 窗 口 将 窗口 手工 切换 一 下 才 行 。 


“可 能 有 人 会 问 ， 你 是 怎样 发 现 这 一 句 有 问题 的 
We? 其 实 笔者 寻找 bug 的 基本 思路 是 搞 清 楚 “ 为 什 
么 之 前 还 运行 得 好 好 的 程序 ， 现 在 就 无 法 运行 了 
呢 ”*?。 因 此 ， 导 人 致 程序 无 法 正常 运行 的 原因 肯定 在 
于 我 们 诬 加 的 或 者 删除 的 那 部 分 代码 里 ， 我 们 可 
以 采取 逐个 还 原 的 方式 来 排 伍 。 


harib22i 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 


sheet_slide(sht_back, ©, @); 
sheet_slide(sht_cons[1], 56, 6); 
sheet_slide(sht_cons[@], 8, 2); 
sheet_slide(sht_mouse, mx, my); 


sheet_updown(sht_back, ð); 

sheet_updown(sht_cons[1], 1); 

sheet_updown(sht_cons[@], 2); 

sheet_updown(sht_mouse, 3); 

key win = sht_cons[@]; 

keywin_on(key_win) ; Kix — TM, EAEI 
wie I 


CHH) 


看 来 ， 只 要 检查 一 下 keywin_on 函 数 就 能 找到 自动 
重启 的 原因 了 。 


harib22i 的 bootpack.c 节 选 


void keywin_on(struct SHEET *key_win) 
{ 
change wtitle8(key_win, 1); 
if ((key_win->flags & 0x20) != 0) { 
fifo32_put(&key_win->task->fifo, 2); /* 命 令 行 窗 


口 光标 ON */ 
} 


return; 


keywin_on 这 个 函数 的 功能 很 简单 ， 先 是 改变 窗口 
的 闫 色 ， 然 后 同 命 令 行 窗口 任 务 的 FIFO 发 送 2 这 个 
值 用 来 显示 光标 。 我 们 将 刚才 出 问题 的 
keywin_on(key_win); 这 一 句 改 成 
change_wtitle8(key_win, 1); 试 了 一 下 ， 没 有 发 生 重 


启 的 问题 ， 看 来 问题 的 原因 束 在 fifo32_put 这 里 了 。 
it i Yt 


不 过 ，fifo32_put 这 个 函数 我 们 已 经 用 了 很 信 了 ， 从 
来 没有 出 过 问题 ， 应 该 不 会 是 程序 的 bug， 因 此 我 
们 来 检查 一 下 发 送 数 据 的 目的 地 key_win 一 > task 


一 > fifo. 


这 个 FIFO 绥 冲 区 是 否 处 于 正常 状态 呢 ?” 想 到 这 里 ， 
我 们 来 找 找 看 对 这 个 FIFO 组 冲 区 进行 初始 化 的 代码 
在 哪里 ， 啊 ， 找 到 了 ， 位 于 console task 最 开头 的 地 


ay 


方 


这 样 肯 定 人 不行， 因为 命令 行 窗 口 任务 的 优先 级 比较 
低 ， 只 有 当 bootpack.c 的 HariMain 休 有 虐 之 后 才 会 运行 
命令 行 窗口 任务 ， 而 如 果 不 运 行 这 个 任务 的 话 ， 
FIFO 绥 冲 区 就 不 会 被 切 始 化 ， 这 就 相当 于 我 们 在 问 
一 个 还 没 初 始 化 的 FIFO 强 行 发 送 数 据 ， 于 是 造成 
fifo32_put 混 乱 而 导致 重 局 。 

搞 清 楚 原 因 ， 改 起 来 就 简单 了 。 我 们 只 要 将 
console_task 中 对 FIFO 进 行 初 始 化 的 代码 移动 到 
HariMain Pty VA Y o 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 

int fifobuf[128], keycmd_buf[32], *cons_fifo[2]; 
JARE 7 

CFH) 


/* sht_cons */ 
for (i = ð; i < 2; i++) { 
CHEK) 
sht_cons[i]->task = task_cons[i]; 
sht_cons[i]->flags |= 0x20; /+ 有 光标 */ 
cons fifo[i] = (int *) memman_alloc_4k(memman, 
128 * 4); /* 从 此 开始 */ 
fifo32 init(&task cons[i]->fifo, 128, 
cons_fifo[i], task_cons[i]); ”/* 到 此 结束 */ 
} 


中略) 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, int memtotal) 


{ 


struct TASK *task = task_now(); 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

int i, *fat = (int *) memman_alloc_4k(memman, 4 * 
2880); /* 这 里 ! 〈 删 掉 了 fifobuf[128]) */ 

struct CONSOLE cons; 

char cmdline[ 30]; 

cons.sht = sheet; 

cons.cur_X = 8; 

cons.cur_y = 28; 


cons.cur_c 
task->cons 


-1; 
&cons ; 


/*# 删 掉 了 这 里 的 fifo32_init(&task->fifo，128，fifobuf， 
task); */ 

cons.timer = timer_alloc(); 

timer_init(cons.timer, &task->fifo, 1); 


中略) 


虽然 我 们 只 修改 了 5 行 代码 ， 但 是 完全 可 以 解决 我 
们 的 问题 ， 话 说 ， 要 是 还 解决 不 了 可 真 该 涉 大 了 ， 
因为 笔者 的 上 眼皮 和 下 眼皮 已 经 开始 打架 了 
(E) o MZ, RIJ “make run” 试 试看 吧 。 


貌似 成 功 了 ， 那 个 人 碍 事 的 task_a 已 经 不 见 了 ， 系 统 
运行 也 没有 问题 ， 太 好 了 。 


司 动 后 的 画面 
WEL, RAINS Km Be HEIE ! 


第 26 天 ”为 窗口 移动 提速 


。 提 高 窗口 移动 速度 (1) (harib23a) 

。 提 高 窗口 移动 速度 (2) Charib23b) 

。 提 高 窗口 移动 速度 (3) Charib23c) 

。 提 高 窗口 移动 速度 (4) Charib23d) 

。 局 动 时 只 打开 一 个 命令 行 窗 口 Charib23e) 
。 增 加 更 多 的 命令 行 窗口 (harib23f) 

。 关闭 命令 行 窗 口 (1) (harib23g) 

。 关 闭 命令 行 窗口 (2) (harib23h) 

e Start 命 令 (harib23i) 

。ncst 命 令 Charib23}) 


1 提高 窗口 移动 速度 (1) 
(harib23a ) 


昨天 我 们 增加 了 可 同时 局 动 的 应 用 程序 的 数量 ， 窗 
口 也 跟着 变 多 了 ， 整 个 画面 变 得 热 亲 起 来 。 


话说 ， 在 对 比 color.hrb 和 color2.hm 的 时 候 我 们 需要 
移动 窗口 ， 那 个 时 候 笔 者 感到 窗口 移动 的 速度 很 
慢 。 在 真 机 环境 下 的 速度 还 算 可 以 接受 ， 但 在 
QEMU 下 就 慢 得 离谱 ， 让 人 心烦 。 虽 说 在 真 机 环境 
下 速度 不 慢 就 可 以 了 ， 但 如 果 速 度 能 再 快 点 总 归 是 
件 好 事 。 因 此 ， 提 高 窗口 移动 的 速度 束 成 了 我 们 今 
天 的 第 一 个 课题 。 


导致 窗口 移动 速度 慢 的 原因 有 很 多 ， 其 中 之 一 就 是 
sheet_refreshmap 的 速度 太 慢 。 这 个 函数 在 

sheet slide 中 被 调用 了 两 次 ， 如 果 能 提高 它 的 速度 
效果 应 该 会 很 明显 。 


这 个 函数 是 很 久之 前 写 的 ， 因 此 在 修改 之 前 我 们 再 
来 看 一 下 它 的 代码 。 


修改 前 的 sheet.c 世 选 


void sheet_refreshmap(struct SHTCTL *ctl, int vx@, int 
vyð, int vx1, int vy1, int hð) 


CHH) 
for (h = hð;s h <= ctl->top; h++) { 
CHH) 
for (by = byð; by < by1; by++) { 
vy = sht->vy@ + by; 
for (bx = bx@; bx < bx1; bx++) { 


vx = sht->vx@ + bx; 
if (buf[by * sht->bxsize + bx] != sht- 
>col_inv) { 
map[vy * ctl->xsize + vx] = sid; 


return; 


怎样 才能 提高 这 个 函数 的 速度 呢 ? 我 们 可 以 尝试 将 
里 面 的 让 语句 去 掉 。 这 个 if 语 句 位 于 三 层 for 循 环 之 
中 ， BAST MT LIK, Alte on AR BBE Fea if 
BANA, GREMIAZAAA CDSE o 


要 去 挥 这 个 if 语 句 ， 我 们 得 先 思 考 一 Pena x. 
Miia ANI ee A ARE Ae oy, 20 
Ran TaHE NG ARE HMA RIA T, 鼠标 
Fa ET LS EM PT ER, ERAT AMT. (ARDS AE 
想 想 ， 窗 口 基 本 上 都 是 矩形 的 ， 没 有 透明 部 分 ， 如 
果 仅 去 揉 窗口 部 分 的 计 判 断 是 没有 影 啊 的 。 


因此 ， 我 们 在 进入 bx 和 by 的 for 循 环 之 前 先 判断 这 个 
图 层 是 否 有 透明 部 分 ， 如 果 有 透明 部 分 的 话 还 按 现 
有 程序 执行 ， 否 则 执行 一 个 疫 有 让 语句 的 两 层 循 

环 。 


本 次 的 sheet.c 节 选 


void sheet_refreshmap(struct SHTCTL *ctl, int vx@, int 
vy@, int vx1, int vy1, int hð) 


CHH) 
for (h = hð; h <= ctl->top; h++) { 
CHH) 
if (sht->col_inv == -1) { 
/* 从 此 开始 */ 


/* 无 透明 色 图 层 专 用 的 高 速 版 */ 
for (by = by@; by < by1; by++) { 
vy = sht->vy@ + by; 
for (bx = bx®@; bx < bx1; bx++) { 
vx = sht->vx®@ + bx; 
map[vy * ctl->xsize + vx] = sid; 


} 
} else { 
/* 有 透明 色 图 层 用 的 普通 版 */ 
for (by = by@; by < by1; by++) { 
vy = sht->vy@ + by; 
for (bx = bx@; bx < bx1; bx++) { 


vx = sht->vx®@ + bx; 
if (buf[by * sht->bxsize + bx] != 


sht->col_inv) { 
map[vy * ctl->xsize + vx] = 


Sid; 


} 
/* 到 此 结束 */ 
} 


return; 


ZEEE 
TL! 我 们 赶紧 来 运行 一 下 看 看 ， “make 
run”...... WAAL, ZS AT RIAA le. FO 
FE SHEE WE. 唔 ， 也 看 不 太 出 来 ， 不 过 感觉 好 


BR SRA mh, MEK SI CE) 。 


console x| 


AA EBA HK, Aa oR SABA 


2 提高 衫 口 移动 速度 〈2) 
(harib23b ) 


IX ARIE ANAS, BATTER IIE ER ER ERA 
行 。 其 实 要 想 变 快 ， 方 法 还 是 很 多 的 。 


比如 sheet_refreshmap 中 有 这 样 一 句 : 


我 们 来 琢磨 一 下 这 行 代码 。 这 个 命令 的 功能 是 向 内 
存 中 某 个 地 址 写 入 sid 的 值 ， 它 也 位 于 for 循 环 中 ， 
会 被 反 复 执 行 ， 而 且 这 个 地 址 的 后 面 以 及 再 后 面 的 
地 址 也 要 与 入 sid 的 但。 


且慢 ， 这 样 的 话 不 是 有 个 更 好 的 方法 吗 ? 在 汇编 语 
言 中 ， 如 果 我 们 用 16 位 寄存 器 代替 8 位 寄存 器 来 执 

行 MOV 指 令 的 话 ， 相 邻 的 地 址 中 也 会 同时 写 入 数 

据 ， 而 如 果 用 32 位 寄存 器 ， 仪 1 条 指令 就 可 以 同时 

向 相 邻 的 4 个 地 址 写 入 值 了 。 


更 重要 的 是 ， 即 便 是 同时 写 入 4 个 字 节 的 值 ， 只 要 
指定 地 址 是 4 的 整数 倍 ， 指 令 的 执行 速度 就 和 1 个 字 
市 的 MOV 是 相同 的 。 也 束 是 说 ， 速 度 说 不 定 能 提 
局 到 原来 的 4 倍 ! 这 简直 是 太 强 大 了 ， 我 们 一 定 得 


试 试 看 。 
修改 后 的 代码 如 下 。 


本 次 的 sheet.c 节 选 


void sheet_refreshmap(struct SHTCTL *ctl, int vx@, int 
vy@, int vx1, int vy1, int hð) 
{ 


int h, bx, by, vx, vy, bx®@, by@, bx1, by1, sid4, 
*p; FAZEI Ay 


CFH) 

for (h = hð; h <= ctl->top; h++) { 
CHH) 
if (sht->col_inv == -1) { 


if ((sht->vxð & 3) == @ && (bxð & 3) == 0 
&& (bx1 & 3) == 0) { /* 从 此 开始 */ 
/*# 无 透明 色 图 层 专用 的 高 速 版 〈4 字 贡 型 ) */ 
bx1 = (bx1 - bx6) / 4; /* MOV 次 数 */ 
sid4 = sid | sid << 8 | sid << 16 | sid 


<< 24; 
for (by = by@; by < by1; by++) { 
vy = sht->vy@ + by; 
vx = sht->vx@ + bxð; 
p = (int *) &map[vy * ctl->xsize + 
vx]; 
for (bx = 0; bx < bx1; bx++) { 
p[ bx] = sid4; 
} 
} 
} else { 


/* 无 透明 色 图 层 专 用 的 高 速 版 “1 字 市 型 )*/ 
for (by = by@; by < by1; by++) { 
vy = sht->vy@ + by; 


for (bx = bx6; bx < bx1; bx++) { 
vx = sht->vx@ + bx; 
map[vy * ctl->xsize + vx] = 


} 
/* 到 此 结束 */ 
} else { 
/* 有 透明 色 图 层 用 的 普通 版 */ 
CREK) 
} 


return; 


} 


其 实 有 透明 色 的 情况 我 们 也 可 以 改 成 4 子玉 型 ， 不 

WA REISER EL T o 因为 修改 这 里 必须 考虑 透明 
色 的 处 理 ， 算 法 会 比较 复杂 ， 而 且 现 在 用 透明 色 的 
只 有 鼠标 指针 ， 鼠 标的 图 层 矿 二 很 小 ， 两 种 方 去 的 
速度 差异 不 大 。 


为 了 让 这 次 的 修改 发 挥 最 大 的 效果 ， 我 们 需要 使 窗 
口 在 x 方 向 上 的 大 小 为 4 的 倍数 ， 而 且 窗 口 的 x 坐 标 
也 要 为 4 的 倍数 。 目 前 所 有 的 窗口 大 小 都 是 4 的 售 

数 ， 所 以 不 需要 修改 了 ， 而 对 于 窗口 坐标 ， 我 们 需 
权 伐 AND 运 算 来 取 整 ， 使 打开 窗口 时 的 显示 位 为 
4 的 倍数 。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


(中 上 略 ) 
} else if (edx == 5) { 
sht = sheet alloc(shtct]); 
sht->task = task; 
sht->flags |= 0x10; 
sheet_setbuf(sht, (char *) ebx + ds_base, esi, 
edi, eax); 
make _window8((char *) ebx + ds base, esi, edi, 
(char *) ecx + ds_base, @); 
sheet_slide(sht, ((shtctl->xsize - esi) / 2) & 
~3, (shtctl->ysize - edi) / 2);/* 这 里 ! */ 
sheet_updown(sht, shtctl->top); /* 将 窗口 图 层 高 度 
指定 为 当前 鼠标 所 在 图 层 的 高 度 ， 鼠 标 移 到 上 层 */ 
reg[7] = (int) sht; 
} else if (edx == 6) { 
(中 上 略 ) 


其 中 ~3 的 意思 是 将 3 这 个 数 的 每 个 比特 位 进行 取 
反 ， 也 束 是 等 于 0xfffffffc， 之 所 以 写成 ~3 是 因为 这 
样 写 起 来 比较 短 ， 而 且 也 不 会 由 于 f 的 个 数 太 多 而 
不 小 心 写 错 。 


还 有 一 点 ， 当 用 女 标 拖 动 窗口 时 如 果 目 的 地 坐标 不 
是 4 的 倍数 ， 我 们 这 次 的 修改 也 就 没有 效果 了 ， 为 
a la ao 
倍数 才 行 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 
int j, X, y, mmx = -1, mmy = -1, mmx2 = 0; /* 这 里 ! 
(添加 mmx2 ) */ 


CHH) 
for (33) { 
CHH) 
if (fifo32_status(&fifo) == @) { 
CHH ) 
} else { 
CHH ) 
if (256 <= i && i <= 511) { /*# 键 盘 数据 */ 
CHH ) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
if (mouse decode(&mdec, i - 512) != ð) 
{ 
CHH) 
if ((mdec.btn & 0x01) != 6) { 
{1I FEE 
if (mmx < @) { 
CHH ) 
for (j = shtctl->top - 1; j 
> ð; j--) { 
CHH) 


if (O <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 


中略 ) 


if (3 <= x && x 


< sht->bxsize - 3 && 3 <= y && y < 21) { 


mmx = mX; 
/* 切 换 到 窗口 移动 模式 */ 
mmy = my; 
mmx2 = sht- 
>VX9 ; /* 这 里 ! */ 
} 
CHH) 
} 
} 
} 
} else { 
/* 如 果 处 于 窗口 移动 模式 */ 
x = mx - mmx;  /# 计 算 鼠 标 指 
针 移 动量 */ 


y = my - mmy; 

sheet_slide(sht, (mmx2 + x 
+ 2) & ~3, sht->vy@ + y); fie Eh 

mmy = my; ”/* 更 新 到 移动 后 的 
坐标 */ 


变量 mmx2 的 功能 是 保存 移动 前 的 sht 一 >vx0 的 值 。 


sheet_slide 的 地 方 我 们 做 了 了 AND 运算， 之 所 以 要 先 
加 2 再 做 AND， 是 因为 只 做 AND 的 话 就 像 直 接 铭 去 


小 数 一 样 ， 容 易 造 成 窗口 往 左 移 ， 而 如 果 先 加 上 2 
就 相当 于 做 了 四 舍 五 入 ， 使 往 左 和 往 右 移 的 几率 对 
Ay 


好 了 ， 我 们 来 “make run”. IEIR! 好 快 ! 如 果 说 之 
前 移动 窗口 是 “ 呈 员 吓 ” 的 感 党 的 话 ， 现 在 比 之 前 弯 
得 更 加 流畅 了 ， 关 不 多 是 “ 昨 咱 咱 > 这 样 吧 。 大 家 可 
以 在 CPU 特别 怪 的 电脑 上 用 QEMU 来 对 比 一 下 ， 一 
定 能 明显 感觉 到 差距 的 。 


截图 上 看 不 出 来 ， 不 过 速度 快 了 不 少 


3 提高 窗口 移动 速度 (3) 
(harib23c) 


我 们 发 现 一 次 性 写 入 4 个 字 节 这 个 办 法 可 以 有 效 地 
提高 速度 ， 既 然 如 此 ， 这 个 办 法 是 不 是 也 能 用 在 
sheet_refreshmap 以 外 的 函数 中 呢 ? 于 是 我 们 首先 想 
到 了 sheet_ refreshsub， 窗 口 移动 的 时 候 也 调用 了 这 
个 函数 ， 因 此 通过 修改 它 可 以 提高 窗口 移动 的 速 
度 ， 此 外 其 他 一 些 地 方 也 会 调用 这 个 函数 ， 如 果 顺 
利 的 话 ， 系 统 整体 的 绘图 速度 都 会 有 所 提升 ， 真 是 
SANE. 


本 次 的 sheet.c 节 选 


void sheet_refreshsub(struct SHTCTL *ctl, int vx@, int 
vyð, int vx1, int vy1, int hð, int h1) 


{ 
int h, bx, by, vx, vy, bx@, by@, bx1, by1, bx2, 
sid4, i, i1, *p, *q, *r; [Piel Fy 
CHP AK ) 
for (h = hð; h <= h1; h+) { 
CHP AIK ) 
if ((sht->vx® & 3) == @) { 
/* 从 此 开始 */ 


/* 4 字 节 型 */ 

i (bxe + 3) / 4; /* bx6 除 以 4( 小 数 进位 ) */ 
il bx1 / 4; /* bx1 除 以 4〈 小 数 舍 去 ) */ 
i1 il - i; 

sid4 = sid | sid << 8 | sid << 16 | sid << 


24; 
for (by = by@; by < by1; by++) { 
vy = sht->vy@ + by; 
for (bx = bx®@; bx < bx1 && (bx & 3) != 
O; bx++) {  /# 前 面 被 4 除 多 余 的 部 分 逐个 字 节 写 入 */ 
vx = sht->vx® + bx; 
if (map[vy * ctl->xsize + vx] == 
Sid) { 
vram[ vy * ctl->xsize + vx] = 
buf[by * sht->bxsize + bx]; 


} 
vx = sht->vx® + bx; 
p = (int *) &map[vy * ctl->xsize + vx]; 
q = (int *) &vram[vy * ctl->xsize + 

vx]; 

(int *) &buf[by * sht->bxsize + 


5 
ll 


bx]; 
for (i = 0; i < i1; i++) { 
/* 4 的 倍数 部 分 */ 
if (p[i] == sid4) { 
qali] = r[i]; /* 估 计 大 多 数 会 是 
这 种 情况 ， 因 此 速度 会 变 快 */ 
} else { 
bx2 = bx + i * 4; 
vx = sht->vx® + bx2; 
if (map[vy * ctl->xsize + vx + 
0] == sid) { 
vram[vy * ctl->xsize + vx + 
buf[by * sht->bxsize + bx2 + 0]; 
} 


if (map[vy * ctl->xsize + vx + 


o] 


1] == sid) { 
vram[vy * ctl->xsize + vx + 
buf[by * sht->bxsize + bx2 + 1]; 


} 


1] 


if (map[vy * ctl->xsize + vx + 
2] == sid) { 
vram[vy * ctl->xsize + vx + 
buf[by * sht->bxsize + bx2 + 2]; 
} 


if (map[vy * ctl->xsize + vx + 


2] 


3] == sid) { 
vram[vy * ctl->xsize + vx + 


buf[by * sht->bxsize + bx2 + 3]; 
} 


3] 


} 
} 
for (bx += i1 * 4; bx < bx1; bx++) { 
/* 后 面 被 4 除 多 余 的 部 分 逐个 字 节 写 入 */ 
vx = sht->vx@ + bx; 
if (map[vy * ctl->xsize + vx] == 
sid) { 
vram[ vy * ctl->xsize + vx] = 
buf[by * sht->bxsize + bx]; 
} 
} 
} 


} else { 
/* 1245 H*/ 
for (by = by@; by < by1; by++) { 
vy = sht->vy@ + by; 
for (bx = bx®@; bx < bx1; bx++) { 
vx = sht->vx®@ + bx; 
if (map[vy * ctl->xsize + vx] == 
Sid) { 
vram[ vy * ctl->xsize + vx] = 
buf[ by * sht->bxsize + bx]; 
} 
} 


} 
/* 到 此 结束 */ 
} 


return; 


} 


这 样 一 来 ， 当 窗口 显示 位 置 为 4 的 倍数 时 速度 就 会 
变 快 。 重 绘画 面 时 ， 重 绘 范围 不 一 定 为 4 的 倍数 ， 

因此 我 们 也 考虑 了 这 种 情况 的 处 理 方法 : 当前 面 有 
余数 时 将 余数 部 分 逐个 字 节 处 理 ， 后 面 有 余数 时 也 
一 样 。 不 过 ， 即 便 窗口 本 里 没有 透明 色 ， 当 它 和 别 
的 窗口 或 者 鼠标 重 登 时 我 们 也 不 能 直接 往 相 邻 的 内 
存 地 址 中 写 入 数据 ， 因 此 for 循 环 中 用 来 判断 map 的 
值 是 否 等 于 sid 的 if 语 句 还 是 不 能 去 掉 的 。 


PTTL 
我 们 来 “make run”* 吧 。 哦 哦 ， 好 快 ! 移动 起 来 咱 咱 


的 ， 昨 天 我 们 还 在 忍受 着 旬 速 呢 ， 现 在 想 想 就 跟 做 
梦 似 的 ， 耶 ! 


截图 上 看 不 出 来 ， 不 过 速度 快 了 很 


4 所 局 贸 口 移动 速度 (4) 
Charib23d ) 


虽说 窗口 移动 的 速度 已 经 快 了 很 多 ， 但 还 是 无 法 完 
全 跟 上 鼠标 指针 那 矫 健 的 身影 〈 啊 ， 在 真 机 环境 下 
当然 还 是 跟 得 上 的 ， 这 里 是 说 在 QEMU 中 运行 的 情 
形 ， 大 家 别 误会 哦 ) 。 更 进一步 的 提速 我 们 现在 还 
做 不 到 ， 不 过 我 们 可 以 动 点 脑筋 ， 在 真正 的 速度 不 
变 的 情况 下 ， 给 用 户 带 来 好 像 变 快 了 的 错觉 
(R) 。 


说 起 来 ， 用 “ 纸 娃娃 系统 ”之 所 以 会 感到 速度 慢 ， 是 
因为 移动 窗口 的 时 候 ， 窗 口 移 动 的 速度 赶不上 鼠标 
的 速度 ， 在 放 开 鼠标 键 之 后 窗口 还 在 那里 挪动 ， 因 
此 我 们 只 要 针对 这 个 现象 想 想 办 法 融 可 以 了 。 


为 什么 明明 已 经 放 开 了 鼠标 键 ， 窗 口 却 还 在 挪动 
WE? 这 是 因为 伴随 图 层 移动 所 进行 的 绘图 操作 非常 
消耗 时 间 ， 导 有 致 系统 来 不 及 处 理 FIFO 中 的 鼠标 移动 
数据 。 那 么 我 们 可 以 在 接收 到 鼠标 移动 数据 后 不 立 
即 进行 绘图 操作 ， 但 如 果 一 直 不 绘图 的 话 鼠 标 和 窗 
口 就 静止 不 动 了 ， 那 不 就 没 意 义 了 吗 ? 我 们 可 以 等 
FIFO 为 空 时 再 进行 绘图 操作 啊 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 

int mx, my, i, new mx = -1, new my = @, new_wx = 
@x7fffffff, new wy = Q; Je Bt] 

CHH) 


for (33) { 
CHH) 
if (fifo32_status(&fifo) == 0) { 
/* FIFO 为 空 ， 当 存在 搁置 的 绘图 操作 时 立即 执行 */ 
/* 从 此 开始 */ 
if (new mx >= @) { 
io_sti(); 
sheet_slide(sht_mouse, new mx, new_my); 
new mx = -1; 
} else if (new wx != Ox7ffffffF) { 
io_sti(); 
sheet slide(sht, new wx, new_wy); 
new wx = Ox7fffffff; 
} else { 
task sleep(task a); 
io_sti(); 


} 
/* 到 此 结束 */ 


} else { 
(中 上 略 ) 
} else if (512 <= i && i <= 767) { /* 到 此 结 
束 */ 
if (mouse decode(&mdec, i - 512) != 0) 
{ 
(中 上 略 ) 
new_mx = mx; 
PARETE 


new_my = my; 


JFET, 
if ((mdec.btn & 0x01) != 6) { 
/* 按 下 鼠标 左 键 */ 
if (mmx < @) { 
CHH ) 
for (j = shtctl->top - 1; j 
> ð; j--) { 


CHH) 
if (© <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 
CHH ) 
if (3 <= x && x 
< sht->bxsize - 3 && 3 <= y && y < 21) { 


mmx = mX; 
/* 切 换 到 窗口 移动 模式 */ 
mmy = my; 
mmx2 = sht- 
>VXO ; 
new_wy = 
sht->vyQ; /* 这 里 1 */ 
} 
CHAM ) 
} 
} 
} else { 
/* 如 果 处 于 窗口 移动 模式 */ 
x = mx - mmx;  ”/* 计 算 鼠 标 指 
针 移 动量 */ 
y = my - mmy; 
new_wx = (mmx2 + x + 2) & 
~3; /*IX HL! E 


new_wy = new_wy + y; 


[ria +] 
mmy = my; ”/* 更 新 到 移动 后 的 


坐标 */ 
} 
} else { 
/* 没 有 按 下 鼠标 左 键 */ 
mmx = -1; ”/* 切 换 到 一 般 模式 */ 
if (new wx != @x7fffffff) { 
/* 从 此 开始 */ 


sheet slide(sht, new_wx, 


new_wy); ”/* 固 定 图 层 位 置 */ 
new wx = Ox7ffffffF; 
} 


/* 到 此 结束 */ 


这 次 我 们 增加 了 new_mx 和 new_wy 两 个 变量 ， 并 将 
原来 的 sheet_slide (sht_mouse, mx, my) ; 改 成 了 
new_mx = mx; new_my = my;， 也 就 是 说 ， 我 们 并 
不 真 的 移动 鼠标 图 层 的 位 置 ， 而 是 将 移动 后 的 坐标 
暂且 保存 起 来 ， 当 FIFO 为 空 时 ， 再 执行 


sheet_slide (sht_mouse, new_mx, new_my) ;。 
窗口 移动 我 们 也 采用 相同 的 方法 ， 只 不 过 有 一 点 小 


小 的 区 别 ， 代 表 FIFO 为 空 时 不 需要 执行 sheet_ slide 
的 值 从 -1 变 成 了 0x7fffffff， 这 是 因为 鼠标 的 坐标 不 


可 能 为 负数 ， 但 窗口 的 坐标 却 有 可 能 为 负数 ， 因 此 
用 -1 会 造成 歧义 ， 我 们 只 好 改 用 另外 一 个 不 可 能 会 
出 现 的 值 ， 即 0x7fffffff。 


当 放 开 鼠 标 左 键 退出 窗口 移动 模式 时 ， 即 便 FIFO 不 
为 空 也 需要 立即 更 新 窗口 的 位 置 ， 这 是 因为 用 户 可 
能 马上 会 去 移动 别 的 窗口 ， 那 样 的 话 sht 变 量 的 值 头 
会 发 生变 化 ， 因 此 我 们 必须 在 sht 变 量 的 值 改 变 之 前 
将 当前 窗口 移动 到 指定 的 位 置 。 


好 了 ， 我 们 来 “make run”...... HE! 即便 在 CPU 很 慢 
的 电脑 上 用 QEMU 运 行 我 们 的 系统 ， 窗 口 也 能 跟 刀 
标 同步 快速 移动 ， 太 好 了 ! 


console x| 


5 局 动 时 只 打开 一 个 命令 行 窗口 
(harib23e ) 


昨天 我 们 将 命令 行 窗 口 的 数量 增加 到 了 两 个 ， 还 把 
碍 眼 的 task_a 窗 口 给 去 挥 了 ,今天 我 们 要 让 它 看 上 
去 更 像 一 个 普通 的 操作 系统 。 


说 到 这 里 ， 痛 先 想到 的 是 系统 局 动 时 所 打开 的 命令 
行 窗口 数量 ， 普 通 的 操作 系统 没有 一 司 动 就 打开 两 
个 命令 行 窗 口 的 吧 ? 一 般 都 是 先 打开 一 个 命令 行 窗 
口 ， 然 后 根据 需要 增加 。 下 面 我们 就 将 局 动 时 显示 
的 命令 行 窗 口 数量 改 为 一 个 ， 并 且 实 现 可 以 随意 局 
动 新 命令 行 窗口 的 功能 吧 。 


这 里 我 们 需要 考虑 一 下 ， 如 果 局 动 一 个 新 窗口 需要 
让 用 户 如 何 操作 呢 ? 比如 说 ， 在 Windows2000 的 命 
令 行 窗 口中 输入 “start cmd.exe”， 驶 会 出 现 一 个 新 的 
命令 行 窗 口 。 那 么 我 们 就 来 模仿 一 下 这 个 方法 ， 先 
编写 一 个 用 来 启动 新 窗口 的 命令 吧 。 

不 过 ， 实 际 使 用 操作 系统 的 用 户 一 般 是 在 运行 某 个 


程序 的 同时 突然 想 做 慷 外 一 件 事情 ， 才 需要 开 新 窗 
口 的 。 这 时 ， 如 于 只 能 通过 命令 来 局 动 新 窗口 ， 允 


必须 先 强 制 关 闭 现 在 正在 运行 的 应 用 程序 ， 再 往 命 
令 行 窗口 中 输入 命令 才 行 一 一 这 也 太 麻 烦 了 。 


在 Windows 中 ， 即 便 不 在 命令 行 中 输入 命令 ， 只 通 
过 鼠标 的 操作 也 可 以 打开 新 的 命令 行 窗 口 〈( 比 如 可 
以 通过 开始 荣 单 ) ， 我 们 的 “ 纸 娃娃 系统 ”也 可 以 借 
鉴 一 下 这 种 方法 。 不 过 鼠标 点 击 开 始 沫 单 这 种 方式 
实现 起 来 太 难 ， 我 们 还 是 做 快捷 键 吧 ， 可 以 规定 按 
下 Shift+F2 束 打开 一 个 新 的 命令 行 窗 口 。 之 所 以 用 
这 个 组 合 键 ， 是 因为 程序 改 起 来 方便 ， 如 果 不 喜 欢 
这 个 组 合 键 的 话 ， 完 全 可 以 根据 下 面 的 范例 自行 修 
改 哦 。 


修改 后 的 程序 如 下 : 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


中略) 


/* sht_cons */ 

sht_cons[@] = open_console(shtctl, memtotal) ; / 
从 此 开始 */ 

sht_cons[1] = 0; /* 未 打开 状态 */ f= 
到 此 结束 */ 


CHH) 


sheet_slide(sht_back, ©, @); 


sheet_slide(sht_cons[@], 32, 4); [FIXE I ¥/ 
sheet_slide(sht_mouse, mx, my); 


sheet_updown(sht_back, ð); 
sheet_updown(sht_cons[@], 1); /* 从 此 开始 */ 
sheet_updown(sht_mouse, 2); /* 到 此 结束 */ 


key win = sht_cons[@]; 
keywin_on(key_win) ; 


中略) 


for (33) { 
CHH) 
if (fifo32_status(&fifo) == 0) { 
CHH ) 
} else { 
CHH ) 
if (256 <= i && i <= 511) { /* 键 盘 数 据 */ 
CHH ) 
if (i == 256 + @x3c && key_shift != 6 
&& sht_cons[1] == 0) { /* Shift+F2 */ 
sht_cons[1] = open_console(shtctl, 
memtotal ); 
sheet_slide(sht_cons[1], 32, 4); 
sheet_updown(sht_cons[1], shtctl- 
>top ) ; 
/* 目 动 将 输入 焦点 切换 到 新 打开 的 命令 行 窗 
口 〈 这 样 比较 方便 吧 ? ) */ 
keywin_off(key_win); 
key_win = sht_cons[1]; 
keywin_on(key_win) ; 


} 
CHE ) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
CHE ) 


} 


struct SHEET *open_console(struct SHTCTL *shtctl, 
unsigned int memtotal) 


| 


struct MEMMAN *memman = (struct MEMMAN *) 


MEMMAN_ADDR; 


struct SHEET *sht = sheet_alloc(shtct1l); 
unsigned char *buf = (unsigned char *) 


memman_alloc_4k(memman, 256 * 165); 


128 


struct TASK *task = task_alloc(); 

int *cons_fifo = (int *) memman_alloc_4k(memman, 

* 4); 

sheet_setbuf(sht, buf, 256, 165, -1); /* 无 透明 色 */ 
make_window8 (buf, 256, 165, "console", @); 
make_textbox8(sht, 8, 28, 240, 128, COL8_000000); 
task->tss.esp = memman_alloc_4k(memman, 64 * 1024) 


+ 64 * 1024 - 12; 


task->tss.eip = (int) &console_task; 
米 


task->tss.es = 1 8; 
task->tss.cs = 2 * 8; 
task->tss.ss = 1 * 8; 
task->tss.ds = 1 * 8; 
task->tss.fs = 1 * 8; 


task->tss.gs = 1 * 8; 

*((int *) (task->tss.esp + 4)) (int) sht; 
*((int *) (task->tss.esp + 8)) = memtotal; 
task_run(task, 2, 2); /* level=2, priority=2 */ 
sht->task = task; 

sht->flags |= 0x20; /* 有 光标 */ 
fifo32_init(&task->fifo, 128, cons fifo, task); 
return sht; 


首先 ， 我 们 将 打开 命令 行 窗 口 的 程序 封装 成 了 一 个 
单独 的 函数 Copen_console) ， 然 后 将 没有 打开 的 
窗口 的 sht_cons[] 置 为 0 以 示 区 别 。 当 按 下 Shift+F2 有 日 
第 2 个 命令 行 窗 口 处 于 未 打开 状态 时 将 其 打开 。 


那么 我 们 来 “make run”* 吧 ， 先 来 运行 我 们 特别 喜欢 
的 color2.hrb， 然 后 按 下 Shift+F2 打 开 新 的 命令 行 窗 
口 ， 再 运行 jines.hrb。 成 功 了 ， 好 开心 呀 ! 


console 


刚刚 启动 完毕 的 画面 《只 有 一 个 命令 行 窗口 ) 


6 增加 更 多 的 命令 行 窗口 
(harib23f) 


命令 行 窗口 最 多 只 能 打开 两 个 ， 这 太 不 方便 了 ， 要 
是 能 打开 更 多 的 窗口 就 好 了 。 那 我 们 写 一 个 
sht_cons[100] 之 类 的 不 束 行 了 吗 ? 不 过 仔细 想 想 
看 ， 这 个 sht_cons[ 到 底 是 用 来 干什么 的 呢 ? 怎么 想 
也 想 不 通 啊 ， 特 地 定义 这 个 变量 保存 了 一 个 值 ， 实 
际 上 却 根本 没有 用 到 ! 

因此 ， 我 们 干脆 不 用 sht_cons[] 了 ， 如 果 顺 利 的 话 ， 
命令 行 窗 口 将 不 再 有 数量 的 限制 ， 只 要 内 存 空间 足 
人 够 ， 就 可 以 想 开 多 少 开 多 少 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 

struct SHEET *sht_back, *sht_mouse; /* Af T 
sht_cons[2]*/ 

《中略 ) 


/* sht _ cons */ 
key _ win = open_console(shtctl, memtotal); 


CHH) 


sheet_slide(sht_back, ©, @); 
sheet_slide(key_win, 32, 4); PAZE, 
sheet_slide(sht_mouse, mx, my); 
sheet_updown(sht_back, @); 

sheet_updown(key_win, 1); [PRE #7 
sheet_updown(sht_mouse, 2); 

keywin_on(key_win); 


中略) 


for (33) { 
(中 上 略 ) 
if (fifo32 status(&fifo) == 0) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CREK) 
if (i == 256 + Ox3c && key_shift != 0) 
{ /* Shift+F2 */ 
/* 目 动 将 输入 焦点 切换 到 新 打开 的 命令 行 窗 
口 〈 这 样 比较 方便 吧 ? ) */ 
/* 从 此 开始 */ keywin off(key win); 
key win = open_console(shtctl, 
memtotal ); 
sheet slide(key win, 32, 4); 
/* 到 此 结束 */ sheet_updown(key_win, shtctl->top); 
keywin_on(key_win) ; 


} 
CHE ) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
中略 ) 


程序 写 好 了 ， 之 前 的 程序 中 我 们 是 先 癌 sht_cons[] 赋 
值 ， 然 后 再 由 sht_cons[] 赋 值 给 key_win， 现 在 我 们 
改 成 直接 向 key_win 赋 值 了 。 


这 样 能 不 能 行 呢 ? MENW, EAA AJE O 
呢 。 不 过 这 样 也 无 济 于 事 ， 还 是 “make run”— Fit 
试看 吧 ...... RR, KHS! 我 们 可 以 打开 好 多 个 命 
令 行 窗 口 了 ， 运 行 多 个 应 用 程序 也 没 问 题 哦 ， 太 棒 
J! 


console 


启动 成 功 


运行 3 个 应 用 程序 


7 关闭 命令 行 窗口 (1) 
(harib23g ) 


现在 ， 我 们 对 新 开 命令 行 窗口 这 个 功能 已 经 很 满意 
了 ， 不 过 如 果 一 高 兴 条 个 住 车 打开 太 多 命令 行 窗 口 
Ha, WTA SARS AH, FRI HR Be N 
存 ， 所 以 我 们 得 想 个 办 法 来 关闭 命令 行 窗 口才 行 。 


在 Windows 的 命令 行 窗口 中 ， 输 入 “exit” 命 令 束 可 以 
天 闭 当 前 窗口 ， 我 们 也 来 照 猫 男 席 ， 给 “ 纸 娃 娃 系 


统 ” 增 加 一 个 exit 命 令 吧 。 


在 关闭 一 个 命令 行 窗 口 时 系统 需要 做 些 什 么 事 呢 ? 
首先 需要 将 创建 该 窗口 时 所 占用 的 内 存 空 间 全 部 释 
放出 来 ， 然 后 还 需要 释放 窗口 的 图 层 和 任务 结构 。 
喷 ， 问 题 来 了 ， 在 创建 任务 时 我 们 为 命令 行 窗 口 准 
备 了 专用 的 栈 ， 却 没有 将 这 个 栈 的 地 址 保存 起 来 ， 
这 样 的 话 束 无 法 执行 释放 操作 了 。 怎 么 办 呢 ? 我 们 
可 以 在 TASK 结构 中 添加 一 个 cons_stack 成 员 ， 用 来 
保存 栈 的 地 址 。 


好 ， 我 们 先进 行 以 下 修改 。 


本 次 的 bootpack.h 节 选 


struct TASK { 
int sel, flags; /* sel 为 GDT 编 写 */ 
int level, priority; 
struct FIFO32 fifo; 


struct TSS32 tss; 
struct CONSOLE *cons; 
int ds_base, cons_stack; esp Use aay | 


本 次 的 bootpack.c 节 选 


struct SHEET *open_console(struct SHTCTL *shtctl, 
unsigned int memtotal) 


CHH) 
task->cons_stack = memman_alloc_4k(memman, 64 * 
1024); /* 从 此 开始 */ 
task->tss.esp = task->cons stack + 64 * 1024 - 12; 
/* 到 此 结束 */ 


CHPH) 
} 
void close constask(struct TASK *task) 
{ 


struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

task _sleep(task) ; 

memman_free_4k(memman, task->cons_stack, 64 * 
1024); 

memman_free_4k(memman, (int) task->fifo.buf, 128 * 
4); 

task->flags = 0; /*FaK#(ttask_free(task); */ 

return; 


} 


void close console(struct SHEET *sht) 


{ 
struct MEMMAN *memman = (struct MEMMAN *) 


MEMMAN_ADDR; 
struct TASK *task = sht->task; 
memman_free_4k(memman, (int) sht->buf, 256 * 165); 
sheet_free(sht) ; 
close _constask(task) ; 
return; 


一 上 来 笔者 只 写 了 一 个 用 来 结束 命令 行 窗口 任务 的 
close_constask 函 数 ， 不 过 关闭 命令 行 窗口 还 需要 关 
闭 图 层 ， 于 是 束 又 号 了 一 个 close_console 图 数 ， 在 
关闭 图 层 之 后 调用 close_constask。 其 实 ， 将 这 个 两 
个 功能 都 整合 到 Close_console 里 面 也 可 以 ， 不 过 我 
们 后 面 还 需要 只 关闭 任务 不 关闭 图 层 的 功能 ， 因 此 
在 这 里 我 们 先 分 成 两 个 函数 来 写 。 


在 close_constask 中 ， 一 开始 我 们 先 让 任务 进入 休眠 
状态 ， 这 是 为 了 将 任务 从 等 待 切换 列表 中 安全 地 剥 
离 出 来 ， 因 为 这 样 一 来 束 绝 对 不 会 切换 到 该 任务 ， 
我 们 束 可 以 安全 地 释放 栈 和 FIFO 绥 冲 区 了 。 当 全 部 
内 存 空间 都 释放 完毕 之 后 ， 为 了 task_alloc 下 次 能 够 
重新 利用 这 些 内 存 空间 ， 我 们 还 需要 将 flags 置 为 

0。 


到 这 里 bootpack.c 的 准备 就 完成 了 ， 下 面 我 们 来 编 


写 exit 命 令 。 
TTT 


本 次 的 console.c 节 选 


void cons_runcmd(char *cmdline, struct CONSOLE *cons, 
int *fat, int memtotal) 


CHH) 
} else if (strcmp(cmdline, "exit") == 0) { 
cmd_exit(cons, fat); 
} else if (cmdline[9@] != ð) { 
CHH) 
} 


void cmd_exit(struct CONSOLE *cons, int *fat) 


{ 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

struct TASK *task = task_now(); 

struct SHTCTL *shtctl = (struct SHTCTL *) *((int *) 
@xefe4); 

struct FIFO32 *fifo = (struct FIFO32 *) *((int *) 
exefec); 

timer_cancel(cons->timer) ; 

memman_free_4k(memman, (int) fat, 4 * 2880); 

io_cli(); 

fifo32_put(fifo, cons->sht - shtctl->sheets@ + 
768); /* 768~1023 */ 

io_sti(); 

for (33) { 

task_sleep(task) ; 


} 


exit 命 令 的 执行 部 分 中 ， 首 先 我 们 需要 取消 控制 光 
标 办 烁 的 定时 器 ， 然 后 将 FAT 用 的 内 存 空间 释放 ， 

最 后 调用 close_console 关 闭 命 令 行 窗 口 和 上 自身 的 任 
TR? 这 里 看 出 问题 了 吗 ? 


如 果 在 cmd_exit 中 调用 close_console 的 话 ， 就 相当 
于 close_constask 中 的 task_sleep 对 上 自己 这 个 任务 本 母 
执行 休眠 ， 那 么 之 后 的 程序 就 都 无 法 继续 执行 下 去 
了 了。 因此， 我 们 需要 让 task_a 来 蔡 我 们 执行 这 个 操 
YE GE: 虽然 现在 已 经 没有 task_a 这 个 窗口 了 ， 但 
是 task_a 这 个 任务 依然 存在 ， 它 负 贡 处 理 女 标 指针 
的 、 将 键盘 输入 的 数据 分 配给 各 命令 行 窗 口 等 
ALTE) is 


AL FRAT BY UA Mts > T af FES Ja] task_att $ AIK 
一 个 数据 ， 请 task_a 帮 忙 关 闭 命 令 行 窗 口 任务 。 
task_a 的 FIFO 地 址 保存 在 0x0fec 这 个 地 址 (等 一 下 
我 们 会 修改 bootpack.c 让 它 将 地 址 写 入 这 里 ) ， 只 
要 读 取 出 来 并 发 送 数据 就 可 以 了 。 为 了 防止 发 送 数 
据 期 间 产 生 中 断 请 求 导致 发 送 失败 ， 我 们 将 发 送 数 
据 的 程序 两 边 加 上 di 和 sti。 


发 送 完成 之 后 ， 既 然 结束 任务 的 处 理 已 经 交 给 
task_a， 那 么 命令 行 窗 口 任务 本 身 也 没有 什么 可 做 


WS, Be POR Ee RABAT UT o 


我 们 还 需要 修改 HariMain 使 其 能 够 处 理 来 自命 令 行 
窗口 的 768 一 1023 的 数据 ， 另 外 ， 从 现在 开始 可 能 
会 出 现 画 面 上 一 个 窗口 都 没有 的 情况 〈 如 果 关 闭 了 
所 有 的 命令 行 窗口 的 话 ) ， 因 此 我 们 必须 对 这 样 的 
情况 做 出 应 对 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


(省 略 ) 
*((int *) @x@fec) = (int) &fifo; fe AT 
for (33) { 
(中 上 略 ) 
if (fifo32 status(&fifo) == 0) { 
CREK) 
} else { 
CREK) 
if (key_win != 6 && key win->flags == 0) { 
/* 窗 口 被 关闭 */ /* 从 此 开始 */ 
if (shtctl->top == 1) { /* 当 画面 上 只 剩 鼠 
标 和 背景 时 */ 
key _ win = Q; 
} else { 
key win = shtctl->sheets[shtctl- 
>top - 1]; 


keywin_on(key_win) ; 


/* 到 此 结束 */ 
} 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CHH ) 
if (s[@] != 6 && key win != 6) { /* 一 般 
字符 、 退 格 键 和 回 车 键 */ J Ery 
fifo32_put(&key_win->task->fifo, 
s[6] + 256); 


if (i == 256 + 0xof && key win != 6) { 
/* Tab 键 */ eee ae | 
CHH) 


} 
《中 略 ) 
if (i == 256 + @x3b && key shift != 6 
&& key_win != O) { /* Shift+F1 */ /* 这 里 ! */ 
(中 上 略 ) 
} 
if (i == 256 + Ox3c && key shift != ð) 
{ /* Shift+F2 */ 
/* 目 动 将 输入 焦点 切换 到 新 打开 的 命令 行 窗 
口 〈 这 样 比较 方便 吧 ? ) */ 


if (key win != @) { 
7* 从 此 开始 */ 
keywin_off(key_win) ; 
} 
/* 到 此 结束 */ 
key_win = open_console(shtctl, 
memtotal ); 
sheet slide(key win, 32, 4); 
sheet_updown(key_win, shtctl->top) ; 
keywin_on(key_win) ; 


} 
CHE ) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 


据 */ 


中略 ) 
} else if (768 <= i && i <= 1023) { /* 命 令 行 
窗口 关闭 处 理 */ JERKE L7 
close console(shtct]l->sheets@ + (i - 
768)); /* 这 里 ! */ 


} 


} 


我 们 先 来 看 最 后 关于 “命令 行 窗 口 天 闭 处 理 ” 那 一 
段 。 这 段 程序 比较 人 简单， 只 是 完成 命令 行 窗 口 所 委 
托 的 操作 而 已 。 人 至 于 要 关闭 的 图 层 句 顶 ， 古 通过 将 
命令 行 窗口 及 送 过 来 的 数据 减 去 768 计 算出 来 的 。 


除 此 之 外 ， 我 们 还 修改 了 关于 key_win 的 部 分 ， 当 
画面 上 一 个 窗口 都 没有 的 情况 下 ， 自 然 也 没有 窗口 
处 于 输入 模式 ， 这 时 我 们 将 key_win 置 为 0， 而 通常 
情况 下 key_win 是 不 可 能 为 0 的 ， 这 样 就 可 以 清楚 地 
区 列 开 来 。 当 key_ win 为 0 时 ， 字 人 符 输入 和 Shift+F1 
没有 任何 作用 ， 因 此 我 们 对 于 这 两 种 键盘 输入 不 进 
行 任何 处 理 。 


现在 到 了 欢乐 的 “make rum”* 时 间 ， 首 先是 刚刚 启动 
完毕 的 画面 。 


刚刚 启动 结束 的 样子 
然后 ， 我 们 按 ShifttrF2 新 开 几 个 窗口 ， 并 在 窗口 中 


输入 exit 命 令 。 


console Ea 
console 


要 执行 e exit ai x S 哦 
AAN 


命令 行 窗 口 成 功 关 闭 了 了， 成 功 了 ! 


看 ， 命 令 行 窗口 关闭 了 哦 


如 果 把 所 有 的 窗口 都 关闭 的 话 就 是 下 面 这 个 样子 。 
当然 ， 即 便 窗 口 都 没有 了 ， 我 们 还 可 以 按 Shift+F2 
重新 打开 窗口 ， 没 有 问题 。 


a | — 


将 所 有 的 命令 行 窗口 都 关闭 了 


8 关闭 命令 行 窗 口 (2) 
(harib23h) 


做 到 这 一 步 ， 接 下 来 我 们 就 来 实现 用 鼠标 关闭 命令 
行 窗口 的 功能 。 当 鼠标 点 击 窗口 上 的 “x” 按 钮 时 ， 
癌 命令 行 窗口 任务 发 送 4 这 个 数据 ， 命 令 行 窗口 接 
收 到 这 个 数据 后 则 开始 执行 exit 命 令 的 程序 。 


话说 ， 鼠 标的 点 击 是 在 task_a 中 处 理 的 ， 为 什么 不 
直接 在 task_a 中 调用 close_console， 而 要 绕 这 么 个 弯 
Fle? 因为 如 果 直 接 在 task_a 中 关闭 命令 行 窗 口 的 
话 ， 由 窗口 自身 所 管理 的 释放 定时 器 及 FAT 内 存 空 
则 的 部 分 束 难 以 实现 了 ， 因 此 我 们 还 是 选择 问 命 令 
行 窗口 发 送 通 知 数 据 这 种 方式 。 


由 于 这 次 我 们 只 需要 将 已 经 实现 的 功能 通过 鼠标 来 
进行 操作 ， 所 以 修改 起 来 比较 简单 。 


本 次 bootpack.c 节 选 


void HariMain(void) 


CRH) 
for (33) { 
CRH) 
if (fifo32_status(&fifo) == 0) { 
(中 上 略 ) 


} else { 


CREK) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CREK) 
} else if (512 <= i && i <= 767) { /* RR% 
据 */ 
if (mouse decode(&mdec, i - 512) != @) 
{ 
(中 上 略 ) 
if ((mdec.btn & 6x61) != 6) { 
/* 按 下 左 键 的 情形 */ 
if (mmx < @) { 
CREK) 
for (j = shtctl->top - 1; j 
> ð; j--) { 
CHEK) 


if (O <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 
CHH ) 
if (sht->bxsize 
- 21 <= x && x < sht->bxsize - 5 && 5 <= y && y < 19) 


{ 

/* 点 击 “x” 按 
钮 */ 

if ((sht- 
>flags & 0x10) != @) { /*# 是 否 为 应 用 程序 
窗口 ? */ 

task = 

sht->task; 


cons_putstr@(task->cons, "\nBreak(mouse) :\n"); 


io_cli();  /# 茶 止 在 强制 结束 处 理 时 切换 任务 */ 


task- 
>tss.eax = (int) &(task->tss.esp@) ; 

task- 
>tss.eip = (int) asm_end_app; 
io_sti(); 

/* 从 此 开始 */ } else { 

/* 命 令 行 窗口 */ 

task = 
sht->task; 
io_cli(); 


fifo32_put(&task->fifo, 4); 


/* 到 此 结束 */ 
io_sti(); 
} 
} 
break; 
} 
} 
} 
} else { 
《中 上 略 》 
} 
} else { 
《中 上 略 》 
} 


} else if (768 <= i && i <= 1023) { /* 命 令 行 
窗口 关闭 处 理 */ 
(中 上 略 》 
} 


} | 
我 们 在 bootpack.c 中 仅仅 增加 了 5 行 代 码 。 
接 下 来 是 console.c， 这 里 其 实 仅仅 增加 了 3 行 代 码 。 


本 次 console.c 节 选 
void console task(struct SHEET *sheet, int memtotal) 


(中 上 略 ) 
for (;;) { 
(中 上 略 ) 
if (fifo32_status(&task->fifo) == @) { 
CREK) 
} else { 
CREK) 
if (i == 4) { /* 点 击 命令 行 窗口 的 “x” 按 钮 */ 
/* 从 此 开始 */ 


cmd_exit(&cons, fat); 


} 
/* 到 此 结束 */ 
CHAM 


好 ， 完 工 了 ， 人 简单 加 是 好 啊 ， 如 果 一 直 都 这 么 简单 
的 话 ， 笔 者 也 能 轻松 多 了 ..………. 哦 ， 对 了 ， 我 们 还 是 
先 “make run”* 吧 。 哇 ， 按 “x” 按 钮 可 以 顺利 关闭 命令 
TRAST, 成功 了 |! 

[TT 


console 


WEE, FEM ARRESTS, RTE ASAT 
窗口 的 “x” 按 钮 是 不 会 关闭 命令 行 窗口 的 。 因 为 如 
东 应 用 程序 运行 中 关 财 了 命令 行 窗口 ， 万 一 程序 调 
用 了 显示 字符 的 API， 就 不 知道 会 造成 什么 后 果 
if 


应 用 程序 运行 时 点 击 “x>” 按 钮 命令 行 窗口 也 不 会 天 
闭 


9 startir Charib23i) 


今天 时 间 也 不 早 了 ， 差 不 多 该 结束 了 ， 不 过 30 天 大 
限 将 至 ， 我 们 还 剩 好 多 东西 没有 做 呢 ， 因 此 今天 大 
APF FB, FTE TIE. 


我 们 在 26. 577 中 提起 过 ， Windows 的 命令 行 窗 口 里 
有 一 个 start 命 令 ， 它 的 功能 是 可 以 打开 一 个 新 的 命 
omens 口 并 运行 指定 的 应 用 程序 。 讲 这 么 多 不 如 自 
己 实践 一 下 ， 在 Windows 中 输入 “start make run” 试 
Ware. 


如 全" 纸 姓 娃 条 统 " 世 有 这 个 功能 该 多 方便 啊 ， 那 我 
们 束 来 编写 一 个 start 命 令 吧 。 


本 次 的 console.c 节 选 


void cons_runcmd(char *cmdline, struct CONSOLE *cons, 
int *fat, int memtotal) 


(省 略 ) 
} else if (strncmp(cmdline, "start ", 6) == @) { 
cmd_start(cons, cmdline, memtotal); 
} else if (cmdline[Q@] != ð) { 
(省 略 ) 
} 


void cmd start(struct CONSOLE *cons, char *cmdline, int 
memtotal) 


{ 


struct SHTCTL *shtctl = (struct SHTCTL *) *((int *) 


OxOFed4) ; 


struct SHEET *sht = open_console(shtctl, memtotal) ; 

struct FIFO32 *fifo = &sht->task->fifo; 

int i; 

sheet_slide(sht, 32, 4); 

sheet_updown(sht, shtctl->top); 

/*# 将 命令 行 输入 的 字符 串 逐 字 复 制 到 新 的 命令 行 窗口 中 */ 

for (i = 6; cmdline[i] != 6; i++) { 
fifo32_put(fifo, cmdline[i] + 256); 


} 

fifo32_put(fifo, 10 + 256); /* 回 车 刍 */ 
cons_newline(cons); 

return; 


好 ， 完 工 了 ， 很 简单 吧 。 我 们 来 “make run”, 4 
N “start color2”...... 哦 ， 成 功 了 ! 


console 


>start colora 


执行 start 命 令 


10 ncst 命 令 Charib23j) 
本 市 要 进行 今天 的 最 后 一 项 修改 。 


用 start 命 令 启 动 应 用 程序 看 起 来 很 不 错 ， 但 如 果 运 
行 color 这 样 的 程序 的 话 ， 我 们 并 不 希望 真 的 新 开 一 
个 命令 行 窗口 出 来 ， 反 倒是 没有 这 个 多 余 的 窗口 比 
较 好 。 那 么 下 面 我 们 就 来 做 一 个 不 打开 新 命令 行 窗 
口 的 start 命 令 吧 ， 给 它 起 个 名 字 ， 叫 做 “no console 
start”， 人 简称 ncst 命 令 。 


这 样 ， 我 们 可 以 根据 需要 来 选择 用 哪个 命令 : 当 项 
望 运行 程序 的 同时 打开 新 的 命令 行 窗 口 时 ， 用 start 
命令 ;而 当 不 需要 打开 新 的 命令 行 窗口 时 ， 束 用 
ncst 命 令 。 


不 过 ， 不 打开 命令 行 窗口 而 直接 运行 应 用 程序 到 底 
应 该 怎样 实现 呢 ? 想来 想 去 ， 总 觉得 要 改 的 地 方 实 
在 太 多 了 ， 我 们 还 是 一 步 一 步 慢 慢 来 吧 。 其 实 我 们 
可 以 换个 思路 ， 不 要 一 味 去 想 “ 没 有 命令 行 窗 口 该 
怎样 处 理 ”?， 而 可 以 “ 想 办 法 禁止 向 命令 行 显示 内 
容 ”( 换 句 话 说 ， 用 ncst 命 令 启 动 的 应 用 程序 会 忽略 
字符 串 显 示 API 的 调用 )。 


好 了 ， 我 们 先 从 添加 ncst 命 令 开 始 做 起 吧 。 

窗口 的 命令 行 任务 的 cons 一 >sht 规 定 为 
0。 在 没有 窗口 的 情况 下 ， AA ean R 

也 没有 用 ， 因 此 我 们 将 这 些 命令 全 部 忽略 。 


本 次 的 console.c 节 选 


void cons_runcmd(char *cmdline, struct CONSOLE *cons, 
int *fat, int memtotal) 


{ 


if (strcmp(cmdline, "mem") == © && cons->sht != @) 
{ /* 从 此 开始 */ 
cmd mem(cons, memtotal); 
} else if (strcmp(cmdline, "cls") == © && cons->sht 
l= Ø) 
cmd_cls(cons); 
} else if (strcmp(cmdline, "dir") == © && cons->sht 
l= @) { 
cmd_dir(cons) ; 
} else if (strncmp(cmdline, "type ", 5) == 6 && 
cons->sht != 0) {  /* 到 此 结束 */ 
cmd type(cons, fat, cmdline); 
y else if (strcmp(cmdline, "exit") == @) { 
cmd_exit(cons, fat); 
} else if (strncmp(cmdline, "start ", 6) == @) { 
cmd_start(cons, cmdline, memtotal) ; 
} else if (strncmp(cmdline, "ncst ", 5) == 0) { 
PORE AT 
cmd_ncst(cons, cmdline, memtotal) ; 
ome] 
} else if (cmdline[Q@] != ð) { 
《中 略 ) 


} 


void cmd_ncst(struct CONSOLE *cons, char *cmdline, int 
memtotal) 
{ 

struct TASK *task = open_constask(@, memtotal); 

struct FIFO32 *fifo = &task->fifo; 

int i; 

/* 将 命令 行 输入 的 字符 串 逐 字 复 制 到 新 的 命令 行 窗口 中 */ 

for (i = 5; cmdline[i] != 6; i++) { 

fifo32 put(fifo, cmdline[i] + 256); 


} 

fifo32_put(fifo, 10 + 256); /* 回 车 刍 */ 
cons_newline(cons) ; 

return; 


cmd_ncst 是 照 着 cmd_start 的 样子 写 的 ， 其 中 
open_constask 这 个 函数 我 们 接 下 来 会 写 在 bootpack.c 
HH 


当 cons 一 >sht 为 0 时 ， 要 禁用 命令 行 窗口 的 字符 显示 
等 所 有 操作 ， 因 此 我 们 需要 修改 与 其 相关 的 函数 。 


本 次 的 console.c 节 选 


void cons_putchar(struct CONSOLE *cons, int chr, char 
move ) 


中略) 


if (s[6] == @x@9) { /* 制 表 符 */ 


for (33) { 

if (cons->sht != @) { /* 从 此 开 

始 */ 
putfouts8 asc sht(cons->sht, cons- 

>cur x, cons->cur y, COL8 FFFFFF, COL8 9@00e0e0e, " ", 
1); 

} /* 到 此 结 
束 */ 


cons->cur x += 8; 
CHER ) 
} 
} else if (s[@] == 6x6a) { /* 换 行 */ 
cons_newline(cons) ; 
} else if (s[@] == Ox@d) { /* 回 车 */ 
/* 不 执行 任何 操作 */ 
} else { /* 一 般 字 符 */ 
if (cons->sht != 6) { /* 从 此 开 
Wy 
putfouts8 asc sht(cons->sht, cons->cur_x, 
cons->cur_y, COL8 FFFFFF, COL8 900000, s, 1); 


} /* 到 此 结 
束 */ 
if (move != 6) { 
(中 上 略 ) 
} 
} 
return; 
} 


void cons_newline(struct CONSOLE *cons) 
{ 
int x, y; 
struct SHEET *sheet = cons->sht; 
if (cons->cur_y < 28 + 112) { 
cons->cur_y += 16; /* 到 下 一 行 */ 


} else { 


/# 滚 动 */ 
if (sheet != 6) { VA 
*/ 
for (y = 28; y < 28 + 112; y++) { 
《中 略 ) 
} 
for (y = 28 + 112; y < 28 + 128; y++) { 
《中 略 ) 
} 
sheet refresh(sheet, 8, 28, 8 + 240, 28 + 
128); 
} ASR] 
*/ 
} 
cons->cur_X = 8; 


return; 


本 以 为 相关 的 函数 很 多 ， 所 以 要 改动 的 地 方 也 会 很 
多 ， 不 过 这 么 一 看 其 实 也 没 多 少 嘛 。 


接 下 来 我 们 来 修改 console_task。 修 改 的 要 点 是 ， 当 
不 显示 命令 行 窗口 时 ， 禁 用 一 些 不 必要 的 处 理 ， 并 
且 当 命令 执行 完毕 时 ， 立 即 结束 命令 行 窗口 任务 
(应 用 程序 运行 完毕 后 ， 这 个 命令 行 窗口 任务 就 派 
不 上 什么 用 场 了 。 因 为 画面 上 不 显示 命令 行 窗口 ， 
也 就 无 法 输入 其 他 命令 ， 也 不 能 执行 关闭 操作 ， 所 


以 我 们 需要 使 其 在 命令 执行 完毕 时 目 动 终止 任 
务 ) 。 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, int memtotal) 


(中 上 略 ) 
if (sheet != @) { 
/* 从 此 开始 */ 
cons.timer = timer_alloc(); 
timer_init(cons.timer, &task->fifo, 1); 
timer_settime(cons.timer, 50); 


} 
/* 到 此 结束 */ 
中略) 
for (;;) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
task_sleep(task) ; 
io_sti(); 
} else { 
CHH ) 
if (256 <= i && i <= 511) { /* 键 盘 数据 (通过 
任务 A) */ 
CHH ) 
if (i == 8 + 256) { 
CHH) 
} else if (i == 10 + 256) { 
/* 回 车 键 */ 
/* 用 空白 探 除 光标 后 换行 */ 
cons_putchar(&cons, ' ', @); 
cmdline[cons.cur_x / 8 - 2] = ð; 
cons_newline(&cons) ; 


cons_runcmd(cmdline, &cons, fat, 
memtotal); /* 执 行 命令 */ 
if (sheet == ð) { 


/* 从 此 开始 */ 
cmd exit(&cons, fat); 
} 
/* 到 此 结束 */ 
/* 显 示 提 示 符 */ 
cons_putchar(&cons, '>', 1); 
} else { 
CRH) 
} 
} 
/# 重 新 显示 光标 *#/ 
if (sheet != 0) { 
/* 从 此 开始 */ 


if (cons.cur_c >= @) { 
boxfill8(sheet->buf, sheet->bxsize, 
cons.cur_c, 
cons.cur_x, cons.cur_y, 
cons.cur_x + 7, cons.cur_y + 15); 


sheet_refresh(sheet, cons.cur_x, 
cons.cur_y, cons.cur_x + 8, cons.cur_y + 16); 


} 
/* 到 此 结束 */ 
} 


} 


cmd_exit 也 需要 修改 一 下 ， 添 加 用 于 无 命令 行 窗口 


情况 下 的 任务 结束 处 理 。 


本 次 的 console.c 节 选 
void cmd_exit(struct CONSOLE *cons, int *fat) 


{ 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

struct TASK *task = task_now(); 

struct SHTCTL *shtctl = (struct SHTCTL *) *((int *) 
@xefe4); 

struct FIFO32 *fifo = (struct FIFO32 *) *((int *) 
exefec); 

if (cons->sht != @) { 

timer_cancel(cons->timer) ; 


memman_free_4k(memman, (int) fat, 4 * 2880); 


io_cli(); 
if (cons->sht != 6) { /* 从 此 开始 */ 
fifo32 put(fifo, cons->sht - shtctl->sheets@ + 
768) ; /* 768~1023 */ 
} else { 
fifo32_put(fifo, task - taskctl->tasks®@ + 
1024); /*1024~2023*/ 
} /* 到 此 结束 */ 
io_sti(); 
for (33) { 
task_sleep(task) ; 


有 命令 行 贸 口 时 ， 我 们 可 以 通过 图 层 的 地 址 告诉 
task_a 需 要 结束 哪个 任务 ， 而 无 命令 行 窗 口 的 情况 


下 ， 这 种 方法 束 用 不 了 了 ， 因 此 在 这 里 我 们 将 
TASK 结 构 的 地 址 告诉 task_a。 


接 下 来 轮 到 bootpack.c 了 ， 首 先 来 编写 与 
open_constask 相 关 的 部 分 。 


本 次 的 bootpack.c 节 选 


struct TASK *open_constask(struct SHEET *sht, unsigned 
int memtotal) 


{ 


struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 

struct TASK *task = task_alloc(); 

int *cons_fifo = (int *) memman_alloc_4k(memman, 
128 * 4); 

task->cons_stack = memman_alloc_4k(memman, 64 * 
1024); 

task->tss.esp = task->cons_ stack + 64 * 1024 - 12; 

task->tss.eip = (int) &console_ task; 


task->tss.es = 1 * 8; 
task->tss.cs = 2 * 8; 
task->tss.ss = 1 * 8; 
task->tss.ds = 1 * 8; 
task->tss.fs = 1 * 8; 


task->tss.gs = 1 * 8; 

*((int *) (task->tss.esp + 4)) = (int) sht; 
*((int *) (task->tss.esp + 8)) = memtotal; 
task_run(task, 2, 2); /* level=2, priority=2 */ 
fifo32_init(&task->fifo, 128, cons fifo, task); 
return task; 


} 


struct SHEET *open_console(struct SHTCTL *shtctl, 
unsigned int memtotal) 


{ 
struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 
struct SHEET *sht = sheet alloc(shtct]); 
unsigned char *buf = (unsigned char *) 
memman_alloc_4k(memman, 256 * 165); 
sheet_setbuf(sht, buf, 256, 165, -1); /* 无 透明 色 */ 
make_window8(buf, 256, 165, "console", @); 
make_textbox8(sht, 8, 28, 240, 128, COL8 9200000); 
sht->task = open_constask(sht, memtotal) ; 
sht->flags |= 0x20; /#*+ 有 光标 */ 
return sht ; 


AIEEE SS HE? 其实 我 们 把 之 前 open_console 

的 一 部 分 内 容 拿 出 来 放 到 open_constask 中 了 ， 正 如 
把 关闭 命令 行 窗口 的 函数 close_console 中 的 一 部 分 

分 离 到 close_constask 中 一 样 。 


最 后 我 们 来 修改 HariMain， 只 要 在 结束 命令 行 窗口 
任务 的 部 分 添加 一 些 代 码 即 可 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 
{ 


(中略 》 
for (;;) { 
(中略 》 
if (fifo32 status(&fifo) == 0) { 
CHEA) 
} else { 
CHEA) 
if (256 <= i && i <= 511) { /+ 键盘 数据 */ 
CHEA) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 


CHI ) 


} else if (768 <= i && i <= 1023) { /* 命 令 行 
窗口 关闭 处 理 */ 
close _console(shtct1->sheetse + (i - 
768) ) ; 
} else if (1024 <= i && i <= 2023) { 
/* 从 此 开始 */ 


close constask(taskctl->tasks@ + (i - 


1624) ) ; /* 到 此 结束 */ 


了 呼 ， 修 改 全 部 完成 了 ， 好 宗 。 
COLI 


好 了 ， 我 们 来 “make run” 吧 。 首 先 试 一 下 “ncst 
color”...... WE! BMI SAS! 碍 眼 的 命令 行 窗口 没 
有 弹出 来 ， 画 面 上 只 有 应 用 程序 的 窗口 。 开 心 之 


BAA, 


应 用 程序 运行 画面 清 清谈 来 ! 


E? 用 鼠标 点 击 应 用 程序 窗口 的 “x” 按 钮 无 法 关闭 
窗口 ! 用 Shift+F1 强 制 关 闭 也 不 行 。 这 是 怎么 回 
事 ! 不 过 ， 按 回 车 键 总 算 可 以 正常 退出 了 ， 今 晚 就 
FIFE i FIE. 


it, MOAR YS, ADE HO BR S o 
大 家 晚安 ， 这 个 bug 我 们 留 到 明天 解决 吧 。 


第 27 天 LDT 与 库 


。 先 来 修复 bug Charib24a) 

。 应 用 程序 运行 时 关闭 命令 行 窗口 (harib24b) 
。 保护 应 用 程序 (1) (harib24c) 

。 保护 应 用 程序 (2) Charib24d) 

。 优 化 应 用 程序 的 大 小 (harib24e) 

e JÆ Charib24f) 

。 整理 make 环 境 (harib24g) 


1 先 来 修复 bug (harib24a ) 


大 家 早上 好 ， 我 们 今天 的 第 一 个 任务 就 是 修复 昨天 
晚上 的 那个 bug。 是 个 什么 bug 来 着 ? 就是 用 nsct 命 
令 运行 的 应 用 程序 ， 无 论 是 按 Shift+F1 还 是 点 击 窗 
口 的 “x” 按 钮 都 没有 有 反应 的 那个 bug 啦 。 


我 们 得 先 来 找到 出 问题 的 原因 ， 然 后 才能 采取 对 
束 。 从 昨天 晚上 到 今天 早上 笔者 一 直 在 思考 这 个 问 
题 ， 想 来 想 去 暂时 能 得 到 的 结论 是 ， 昨 天 编写 的 内 
容貌 似 没 有 什么 问题 ， 因 此 这 个 bug 可 能 之 前 束 已 
经 存在 了 ， 只 是 我 们 没有 发 现 而 已 。 

所 以 次 ， 今 天 早上 我 们 不 能 局 限 在 昨天 修改 过 的 苍 
围 中 ， 而 是 要 扩大 一 下 思路 。 哦 ， 终 于 找到 了 ! 其 
实 只 要 修改 两 行 代码 束 可 以 了 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CRH) 
for (33) { 
CRH) 
if (fifo32_status(&fifo) == 0) { 
《中 略 ) 
} else { 
《中 略 ) 


if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CHH ) 
if (i == 256 + @x3b && key shift != 6 
&& key win != 0) { /* Shift+F1 */ 
task = key_win->task; 
if (task != ð && task->tss.ss@ != 


o) { 

cons_putstr@(task->cons, 
"/\Break(key) :/\"); 

io_cli(); /* 强 制 结束 处 理 时 禁止 
切换 任务 */ 


task->tss.eax = (int) &(task- 
>tss.esp@) ; 

task->tss.eip = (int) 
asm_end_app; 

io_sti(); 

/* 这 里 ! */ task_run(task, -1, ©); /* 为 了 确 
实 执行 结束 处 理 ， 如 果 处 于 休眠 状态 则 唤醒 */ 
} 


} 
中略 ) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 


CHH ) 
if (mouse _decode(&mdec, i - 512) != ð) 


CHH) 
if ((mdec.btn & 0x01) != 6) { 
/* 按 下 左 键 的 情形 */ 
if (mmx < @) { 
(CHE) 
for (j = shtctl->top - 1; j 


据 */ 


> ð; j--) { 

CHH) 

if (O <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 


if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 
CHH ) 
if (sht->bxsize 
- 21 <= x && x < sht->bxsize - 5 && 5 <= y && y < 19) { 


/* 点 击 “x” 按 
钮 */ 
if ((sht- 
>flags & 0x10) != @) { /*# 是 否 为 应 用 程序 
窗口 */ 
task = 
sht->task; 


cons_putstr@(task->cons, "/\Break(mouse) :/ \"); 


io cli();  /* 强 制 结束 处 理 时 禁止 切换 任务 */ 


task- 
>tss.eax = (int) &(task->tss.esp@) ; 
task- 
>tss.eip = (int) asm_end_app; 
io_sti(); 
/* 这 XH! */ 
task_run(task, -1, 0); 
} else { 
/*an 47 Bi O*/ 
CRH) 
} 
} 
break 
} 
} 
} 
} else { 


} 
} else { 
CREK) 
} 


} else if (768 <= i && i <= 1023) { /* 命 令 行 
窗口 结束 处 理 */ 
Close_console(shtct1->sheetse + (i - 
768) ); 
} else if (1024 <= i && i <= 2023) { 
close _constask(taskctl->tasks@ + (i - 
1024)); 


BOAT SY T E FJ 48 task_run(task, -1, 0);， 它 

的 功能 当然 是 将 休眠 的 任务 唤醒 ， 不 过 为 什么 加 上 
这 两 句 问题 就 解决 了 呢 ? 下 面 我 们 来 一 起 探讨 一 

Te 


到 底 为 什么 需要 唤醒 任务 呢 ? 尽管 我 们 特地 在 TSS 
中 改写 了 EIP 和 EAX 以 便 执 行 结束 任务 的 处 理 ， 可 
如 果 任 务 一 直 处 于 休眠 状态 的 话 结束 任务 的 处 理 就 
永远 不 会 开始 执行 ， 因 此 我 们 需要 唤醒 它 ， 使 得 结 
束 处 理 确实 能 够 被 执行 。 


可 是 之 前 一 直 没 有 这 个 语句 ， 强 制 结束 功能 也 没 出 
过 问题 ， 这 是 怎么 回 事 呢 ?” 因 为 命令 行 窗 口 会 触 友 


用 来 控制 光标 闪烁 的 定时 器 中 断 〈 在 命令 行 窗 口 
中 ， 不 显示 光标 时 也 会 每 0.5 秒 触发 一 次 定时 器 中 
Wt) ， 当 产生 定时 器 中 断 时 ， 定 时 器 超时 时 会 向 
FIFO 写 入 数据 ， 于 是 任务 束 被 目 动 唤醒 了 。 


在 之 前 没有 这 个 语句 的 情况 下 ， “不 使 用 ncst 的 时 
候 ) 即便 看 上 去 可 以 正常 执行 强制 结束 ， 但 其 实 距 
离 应 用 程序 真正 结束 还 是 会 产生 最 大 0.5 秒 的 延迟 。 
因此 通过 这 次 的 修改 ，Shiftt+rF1 和 “x” 按 钮 的 反应 速 
度 应 该 也 会 有 所 改善 。 


好 ， 我 们 来 “make run”， 试 试看 用 ncst 运 行 的 应 用 程 
序 是 否 也 可 以 通过 点 击 “x” 按 钮 天 闭 。 哦 哦 ， 成 功 
了 ! 咽 咽 ， 感 学 从 点 击 按钮 到 程序 关闭 所 经 过 的 时 
间 也 确实 比 之 前 要 短 了 。 


console 


nest color? 


2 应 用 程序 运行 时 关闭 命令 行 窗 口 
(harib24b ) * 


终于 除 反 了 bug， 神 清 气 夷 。 命 令 行 窗口 的 功能 

经 实现 得 兰 不 多 了 ， 不 过 还 有 一 个 地 方 不 太 满 意 ， 
就 是 在 应 用 程序 运行 的 时 候 无 法 关闭 所 对 应 的 命 人 
行 窗口 。 


我 们 先 不 考虑 ncst 命 令 ， 普通 的 方法 运行 应 用 程 
序 的 时 候 ， 在 应 用 程序 退出 之 前 ， 我 们 是 无 法 关闭 
用 来 启动 这 个 程序 的 命令 行 窗 口 的 。 直 到 程序 运行 
之 后 才 觉 得 命令 行 窗口 太 碍 事 了 ， 但 事 已 至 此 也 不 
想 再 重新 启动 应 用 程序 〈 比 如 说 ， 热 水 已 经 倒 好 

了 ， 和 总 不 能 这 个 时 候 重 新 局 动 noodle.hrb 吧 ! ) ， 

于 是 就 只 好 将 就 了 。 


因此 还 是 想 办 法 解决 这 个 问题 比较 好 。 


TELT 
首先 我 们 来 修改 bootpack.c。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 
{ 


中略) 


struct SHEET *sht = @, *key_win, *sht2; /*# 添 加 
sht2 */ 
(中 上 略 ) 
for (33) { 
(中 上 略 ) 
if (fifo32 status(&fifo) == 0) { 
CREK) 
} else { 
CREK) 
if (256 <= i && i <= 511) { /# 键 盘 数据 */ 
CREK) 
} else if (512 <= i && i <= 767) { /* 鼠 标 数 
据 */ 
CREK) 
if (mouse_decode(&mdec, i - 512) != ð) 
{ 
CHAS ) 
if ((mdec.btn & 0x01) != 6) { 
/* 按 下 左 键 的 情形 */ 
if (mmx < @) { 
CREK) 
for (j = shtctl->top - 1; j 
> ð; j--) { 


CHH) 
if (@ <= x && x < sht- 
>bxsize && 6 <= y && y < sht->bysize) { 
if (sht->buf[y * 
sht->bxsize + x] != sht->col_inv) { 
CHH ) 
if (sht->bxsize 
- 21 <= x && x < sht->bxsize - 5 && 5 <= y && y < 19) { 
/* A” 
4 
if ((sht- 
>flags & 0x10) != 0) {  /* 是 否 为 应 用 程序 窗口 */ 


中略) 


} else { 
/* 命 令 行 窗 口 */ 
task = 

sht->task; 

/* 从 此 开始 */ 
sheet_updown(sht, -1); /* 和 暂且 隐藏 该 图 层 */ 
keywin_off(key_win); 

key_win 

= shtctl->sheets[shtctl->top - 1]; 

/* 到 此 结束 */ 
keywin_on(key_win); 
io_cli(); 
fifo32_put(&task->fifo, 4); 
io_sti(); 

} 
} 
break; 
} 
} 
} 
} else { 
CHH ) 
} 
} else { 
CHH ) 
} 
} else if (768 <= i && i <= 1023) { /* 命 令 行 

结束 处 理 */ 


close _console(shtctl->sheets® + (i - 


768) ) ; 
} else if (1024 <= i && i <= 2023) { 
close _constask(taskctl->tasks@® + (i - 
1024) ); 
} else if (2024 <= i && i <= 2279) { /* 
只 关闭 命令 行 窗口 */ /* 从 此 开始 */ 
sht2 = shtctl->sheets@ + (i - 2024); 
memman_free_4k(memman, (int) sht2->buf, 
256 * 165); 
sheet_free(sht2) ; 


/* 到 此 结束 */ 
} 


我 们 修改 了 bootpack.c 中 的 两 个 地 方 。 前 面 一 个 地 
方 的 修改 是 让 系统 在 按 下 “x” 按 钮 时 和 暂且 将 命令 行 
窗口 从 男 面 上 隐藏 起 来 。 为 什么 要 要 这 样 一 个 小 陪 
HANG? 这 是 因为 关闭 有 的 应 用 程序 的 命令 行 窗口 时 
需要 消耗 一 定 的 时 间 ， 如 果 点 了 按钮 还 不 关闭 用 户 
会 觉得 很 烦躁 ， 先 隐藏 窗口 束 可 以 避免 这 样 的 问 
题 。 总 之 这 只 是 一 个 小 技巧 而 已 ， 并 不 是 本 次 修改 
的 重点 。 


后 面 一 处 修改 是 当 FIFO 接 收 到 从 console.c 发 送 

的 “关闭 窗口 ”请 求 数 据 时 所 进行 的 处 理 ， 主 要 是 释 
放 指 定 的 图 屋 。 关 于 这 一 处 修改 的 内 容 ， 看 了 对 
console.c 进 行 修改 的 部 分 之 后 会 更 容易 理解 。 


PTL 
下 面 就 是 对 console.c 的 修改 。 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, int memtotal) 


{ 
(中 上 略 ) 
if (cons.sht != @) { /* 这 里 ! */ 
(中 上 略 ) 
} 
(中 上 略 ) 
for (;;) { 
io_cli(); 
if (fifo32_status(&task->fifo) == @) { 
CREK) 
} else { 
CREK) 
if (i <= 1 && cons.sht != 0) { /* 光 标 用 定时 
a */ /* 这 里 ! */ 
CREK) 
} 
(CREK) 
if (i == 3) {  /* 光 标 OFF */ 
if (cons.sht != 60) { 
[FREN] 


boxfill8(cons.sht->buf, cons.sht- 
>bxsize, COL8_000000, /* 这 里 ! */ 
cons.cur_x, cons.cur_y, 
cons.cur_x + 7, cons.cur_y + 15); 
} 


cons.cur_c = -1; 


任务 A) */ 
/* 这 里 ! */ 
/* 这 里 ! */ 


CHH ) 
if (256 <= i && i <= 511) { /# 键 盘 数据 (通过 


if (i == 8 + 256) { 
(中 上 略 ) 

} else if (i == 10 + 256) { 
(中 上 略 ) 
if (cons.sht == @) { 


cmd_exit(&cons, fat); 


} 
CHAS ) 
} else { 
CHAS ) 
} 


} 
/* 重 新 显示 光标 */ 
if (cons.sht != 0) { 


if (cons.cur_c >= @) { 
boxfill8(cons.sht->buf, cons.sht- 


>bxsize, cons.cur_c, /* 这 里 ! */ 


cons.cur_xX, CONS.CUr y， 


cons.cur_x + 7, cons.cur_y + 15); 


FEAET #7 


sheet_refresh(cons.sht, cons.cur_x, 


cons.cur_y, cons.cur_x + 8, cons.cur_y + 16); 


修改 的 要 点 是 将 变量 sheet 的 部 分 改 用 变量 cons.sht 


代 蔡 。 虽 然 两 个 变量 的 值 基本 上 是 一 致 的 ， 但 
coneshie 命令 行 窗 口 天 闭 后 会 被 置 为 0， 而 sheet 则 
不 变 ， 因 此 在 这 里 我 们 需要 使 用 前 者 。 


接 下 来 我 们 来 修改 API 中 键盘 输入 的 部 分 。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CPH) 
struct FIFO32 *sys_fi 
*) OXOfec ) ; 
CHH) 
} else if (edx == 15) { 
for (;;) { 
CHH ) 
if (i == 4) { 只 关闭 命令 行 窗 口 */ 
/* 从 此 开始 */ 
timer_cancel(cons->timer) ; 
io_cli(); 
fifo32_put(sys_ fifo, cons->sht - 
shtctl->sheets® + 2024); /*2024~2279*/ 
cons->sht = 9; 
io_sti(); 


} 
/* 到 此 结束 */ 
CHAI 


} 
} else if (edx == 16) { 
CRH) 


在 等 待 键盘 输入 期 间 ， 如 果 FIFO 中 接收 到 4 这 个 数 
据 ， 则 表示 收 到 了 关闭 命令 行 窗 口 的 信号 ， 此 时 取 
消 定 时 器 ， 并 发 出 清理 图 层 的 消息 ， 然 后 将 cons 一 
>sht 置 为 0。 


好 ， 大 功 告 成 了 ， 我 们 来 “make run” 吧 。 


我 们 故意 不 使 用 ncst 命 令 ， 而 是 用 一 般 的 方法 运行 
笔者 最 喜欢 的 color2.hrb， 程 序 局 动 后 尝试 关闭 命令 
行 窗口 .…... 耶 ! 


color2.hrb 启 动 时 的 样子 


3 保护 应 用 程序 (1) (harib24c) 


嘿嘿 咽 ， 没 想到 吧 ， 我 胡 汉 三 又 回来 了 ! 最 近 “ 纸 
娃娃 系统 ”进步 很 快 嘛 ， 命 令 行 窗口 也 增加 了 呢 ， 
这 样 一 来 我 搞 起 破坏 来 也 更 有 成 就 感 啦 ， 嘿 嘿 。 


这 次 我 可 是 想 出 了 新 的 攻击 方法 哦 ， 一 定 要 给 大 家 

露 一 于 。 现 在 有 了 了 寞 第 保护 功能 ， 大 家 已 经 对 安全 

很 放心 了 吧 ? 我 就 是 要 彻 展 粉 僧 你们 的 心理 防线 ， 

品 咖 只 。 啊 ， 妆 然 ， 我 是 不 会 用 但 改 操作 系统 那 种 

no R a H AeA H ET E Ds A 
哦 。 


详细 的 原理 我 们 后 面 再 说 ， 先 来 看 下 面 这 个 应 用 程 
Fen, TE o 


本 次 的 crack7.nas 


[FORMAT "WCOFF"] 
[INSTRSET "i486p"] 
[BITS 32] 

[FILE "“crack7.nas" | 


GLOBAL _HariMain 
[SECTION .text] 


_HariMain: 


MOV AX, 1005*8 


MOV DS, AX 

CMP DWORD [DS:0x@004], 'Hari' 

JNE fin ; 不 是 应 用 程序 ， 因 此 
不 执行 任何 操作 

MOV ECX, [DS :6x6666] ; 读 取 该 应 用 程序 数据 
段 的 大 小 

MOV AX, 2005*8 

MOV DS, AX 
crackloop: ; 整个 用 123 填 充 

ADD ECX, -1 

MOV BYTE [DS:ECX],123 

CMP ECX, 0 

JNE crackloop 
fin: ; 结束 

MOV EDX ,4 

INT 0x40 


个 要 怎么 用 呢 ? 首先 “make run” 并 局 动 
人 (不 使 用 ncst) ， 然后 打开 一 个 新 的 命 命令 行 


窗口 ， 在 新 窗口 中 运行 crack7.hrb。 这 样 一 来 ， 会 发 
生 很 了 不 得 的 事情 哟 ! 哈哈 哈 ! 


console 


IR? 你 说 什么 都 没 发 生 ? 你 太 天 真 了 哦 ， 不 信 你 把 
鼠标 移动 到 ]ines 的 窗口 上 试 试 看 ? BAIE, ARR 
ao J UE! 


console x| 


移动 鼠标 之 后 .……… 


这 次 我 们 只 攻击 了 lines.hrb， 但 对 于 其 他 的 应 用 程 
序 ， 用 同样 的 手段 也 可 以 破坏 它们 哦 。 当 然 ， 对 于 
不 同 的 应 用 程序 ， 其 出 现 运行 混乱 的 现象 也 不 一 样 
A J o ee 


I, RENT, MITS TII I IRER IA ALE ! 
CLLD 


哎呀 ， 那 个 坏人 又 来 了 ， 而 且 还 成 功 地 攻击 了 我 们 
的 系统 ， 真 不 甘心 ! 


这 人 次 破坏 行动 的 特征 是 ， 由 于 无 法 破坏 操作 系统 本 
吴 ， 转 而 破坏 运行 中 的 应 用 程序 ， 也 就 是 找 软 柿子 
担 嘛 。 运 行 中 的 应 用 程序 存在 被 破 坏 的 风险 ， 如 末 
我 们 不 拿 出 对 策 的 话 ， 用 户 可 能 就 不 取 同 时 运行 多 
个 应 用 程序 了 一 一 如 果 因 为 一 个 程序 的 bug， 而 叶 
致 列 的 程序 也 受到 牵连 ， 其 至 出 错 退 出 的 话 ， 那 就 
个 好 了 了。 


这 个 揭 乱 的 程序 到 后 做 了 什么 坏事 呢 ?” 首 先 它 从 
1005 写 段 的 第 4 字 市 谈 取 数据 ， 判 断 其 是 否 

为 “Hari”。 这 个 1005 其 实 是 代表 第 一 个 打开 的 命令 
行 窗口 所 运行 的 应 用 程序 的 代码 段 编号 。 


1003: task_a 用 (没有 应 用 程序 ， 不 使 用 ) 


1004: idle 用 (没有 应 用 程序 ， 不 使 用 ) 
1005: 第 一 个 命令 行 窗口 的 应 用 程序 代码 段 
1006: 第 二 个 命令 行 窗口 的 应 用 程序 代码 段 


如 果 从 那个 段 读 出 “Hari” 这 个 字符 串 ， 说 明 应 用 程 
序 正 在 运行 的 可 能 性 很 高 ， 接 下 来 承 读 取 段 开头 的 
4 个 字 节 ， 即 应 用 程序 用 数据 段 的 大 小 。 


随后 我 们 切换 到 2005 号 段 ， 并 将 其 中 的 内 容 全 部 用 
123 这 个 数值 填充 。 当 然 ，123 这 个 值 并 没有 什么 特 
别 的 意义 ， 用 234、255 或 者 其 他 什么 的 都 可 以 ， 目 
的 只 是 履 盖 应 用 程序 数据 段 原 有 的 内 容 ， 使 其 无 法 
正常 运行 。 这 招 好 狠 啊 ! 


对 于 CPU 来 说 ， 应 用 程序 访问 应 用 程序 用 的 段 是 理 
所 当然 的 事情 ， 所 以 不 会 产生 异种 。 


我 们 当然 不 能 束 这 么 败 下 阵 来 ， 得 好 好 想 想 办 法 才 
行 。 要 防御 这 样 的 攻击 ， 我 们 只 要 禁止 应 用 程序 随 
意 访 问 其 他 任务 所 拥有 的 内 存 段 就 可 以 了 。 这 样 一 
来 ， 揭 乱 的 程序 惑 只 能 攻击 上 自己 了 ， 结 果 只 能 是 目 
AIK TIAL 


4 保护 应 用 程序 (2) (harib24d) 


到 拭 该 怎样 阻止 应 用 程序 攻击 别 的 应 用 程序 呢 ? 我 
们 倒是 有 一 个 办 法 ， 残 古 通 过 改 号 GDT 的 设置 ， 只 
将 正在 运行 的 那个 程序 的 段 设 置 为 应 用 程序 用 ， 其 
他 的 应 用 程序 段 都 暂时 设置 为 操作 系统 用 。 不 过 ， 

用 这 个 方法 的 话 ， 需 要 在 每 次 任务 切换 时 都 改写 

GDT 的 设置 ， 话 说 我 们 现在 每 个 任务 也 就 只 有 两 个 
应 用 程序 段 ， 这 样 看 来 这 个 方法 也 并 不 是 不 可 行 。 


不 过 其 实 CPU 已 经 为 我 们 准备 好 了 这 个 问题 的 解决 
方案 ， 那 融 是 LDT。 难 得 有 这 么 好 的 功能 ， 我 们 当 
FREE FC) All HH Mhi o 


GDT 是 “global (segment) descriptor table” hág 
号 ，LDT 则 是 “local (segment) descriptor table”) 
见 写 。 相 对 于 global 代 表 “ 全 局 *?，local 则 代表 “局 
部 ”的 意思 ， 即 GDT 中 的 段 设 置 是 供 所 有 任务 通用 
的 ， 而 LDT 中 的 段 设 置 则 只 对 有 茶 个 应 用 程序 有 效 。 


如 果 将 应 用 程序 段 设 置 在 LDT 中 ， 其 他 的 任务 由 于 
无 法 使 用 该 LDT， 世 就 不 用 担心 它们 来 搞 破 坏 了 。 


和 GDT 一 样 ，LDT 的 容量 也 是 64KB (可 容纳 设置 
8,192 个 段 ) ， 不 过 在 “ 纸 娃 娃 系 统 ” 中 我 们 现在 只 需 
要 设置 两 个 段 所 以 只 使 用 了 其 中 的 16 个 字 市 ， 我 
们 把 这 16 个 字 节 的 信息 放 在 struct TASK 中 。 


我 们 可 以 通过 GDTR 这 个 寄存 右 将 GDT 的 内 存 地 址 
告知 CPU， 而 LDT 的 内 存 地 址 则 是 通过 在 GDT 中 创 
建 LDT 段 来 告知 CPU 的 。 也 就 是 说 ， 在 GDT 中 我 们 
可 以 设置 多 个 LDT (当然 ， 不 能 同时 使 用 两 个 以 上 
的 LDT) ， 这 和 TSS 非 常 相似 。 


下 面 我 们 在 bootpack.h 中 添加 用 于 设置 LDT 的 段 属 
性 编号。 


本 次 的 bootpack.h 节 选 


/* dsctbl.c */ 


(中 上 略 ) 
#define ADR_IDT Qx0026F800 
#define LIMIT_IDT Qx800007 FF 
#define ADR_GDT 0x00270000 
#define LIMIT_GDT Ox000OFFFF 
#define ADR_BOTPAK 0x00280000 


#define LIMIT_BOTPAK 9Xx6667ffff 

#define AR_DATA32 RW Ox4692 

#define AR CODE32 ER @x409a 

#define AR LDT 0x0082 /* 这 里 ! */ 
#define AR_TSS32 Qx0089 

#define AR_INTGATE32 @xe@e8e 


/* mtask.c */ 


《中 上 略 》 
struct TASK { 
int sel, flags; /* sel 代 表 GDT 编 写 */ 
int level, priority; 
struct FIFO32 fifo; 
struct TSS32 tss; 
struct SEGMENT DESCRIPTOR ldt[2]; /* 这 里 ! */ 
struct CONSOLE *cons; 
int ds_base, cons_stack; 


接 下 来 我 们 修改 mtask.c 以 便 设 置 LDT。 我 们 可 以 将 
LDT 编 写 写 入 tss.ldtrr， 这 样 在 创建 TSS 时 就 顺 便 在 
GDT 中 设置 了 LDT，CPU 也 就 知道 这 个 任务 应 该 使 
用 哪个 LDT 了 。 


本 次 的 mtask.c 节 选 


struct TASK *task_init(struct MEMMAN *memman) 


CHH) 
for (i = ð; i < MAX_TASKS; i++) { 

taskctl->tasks@[i].flags = 0; 

taskctl->tasks@[i].sel = (TASK_GDT@ + i) * 8; 

taskctl->tasks@[i].tss.ldtr = (TASK_GDT6 + 
MAX_TASKS + i) * 8; /+* 这 里 ! */ 

set_segmdesc(gdt + TASK GDTO + i, 103, (int) 
&taskctl->tasks@[i].tss, AR_TSS32); 

set_segmdesc(gdt + TASK_GDT@ + MAX_TASKS + i, 
15, (int) taskctl->tasks@[i].1ldt, AR_LDT); 

A 


} 
CHATS 


} 
struct TASK *task_alloc(void) 


(中 上 略 ) 
for (i = ð; i < MAX_TASKS; i++) { 
if (taskctl->tasks@[i].flags == 0) { 
CREK) 


task->tss.fs = Q; 
task->tss.gs = Q; 
/# 删 掉 原 来 的 task- 
>tss.ldtr = 0;*/ 
0x40000000 ; 


task->tss.iomap 
task->tss.ss@ = 
return task; 


ð; 


} 
} 
return 0; /* 已 经 全 部 正在 使 用 */ 


最 后 我 们 来 修改 console.c， 使 得 应 用 程序 段 创 建 在 
LDT 中 。 


本 次 的 console.c 节 选 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


CHH) 
if (finfo !=s @) { 
/* 找 到 文件 的 情况 */ 
CHH) 
if (finfo->size >= 36 && strncmp(p + 4, "Hari", 
A) == @ && *p == 0x00) { 


CREK) 
set_segmdesc(task->ldt + @, finfo->size - 
1, (int) p, AR_CODE32_ER + 0x60); /* 这 里 ! */ 
set_segmdesc(task->ldt + 1, segsiz - 1, 
(int) q, AR _DATA32_RW + 0x60); /* 这 里 ! */ 
for (i = ð; i < datsiz; i++) { 
qlesp + i] = p[dathrb + i]; 


start_app(@x1b, © * 8+ 4, esp, 1* 8 + 4, 
&(task->tss.esp@) ); /*IXB! */ 
CHH ) 
} else { 
cons_putstr@(cons, ".hrb file format 
error.\n"); 


} 
CHAM 
} 
(中 上 略 )》 


在 start_app 的 地 方 ， 我 们 指定 的 段 写 是 4 (=0x8+ 
4) 和 12 (=1x8+4) ， 这 里 乘 以 8 的 部 分 和 GDT 是 
一 样 的 ， 但 不 一 样 的 是 还 加 上 了 4， 这 是 代表 “该 段 
写 不 是 GDT 中 的 段 写 ， 而 是 LDT 内 的 段 号 ”的 意 
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不 过 如 果 用 这 样 的 号 法， 在 多 个 应 用 程序 同时 运行 
时 ， 应 用 程序 用 的 代码 段 号 就 都 为 4， 数 据 段 号 都 
为 12， 这 不 就 跟 我 们 之 前 遇 到 的 一 个 pug 差 不 多 了 
嘛 (参阅 25.7 节 )〉 。 其 实 不 然 ， 由 于 这 里 我 们 使 用 
的 是 LDT 的 段 写 ， 而 每 个 任务 都 有 上 自己 专用 的 


LDT， 因 此 这 样 写 完全 没有 问题 。 耶 ! 


于 是 我 们 辟 共 只 修改 了 8 行 代码 束 完 成 了 对 LDT 的 
文 持 ， 赶 又 来 测试 一 下 吧 。 


我 们 来 “make run”， 当 然 ， 之 前 能 实现 的 功能 现在 
也 完全 没 问 题 。 


然后 我 们 运行 lines.hrb， 再 运行 crack7.hrb。 哦 哦 ， 
crack7 产 生 异 常 了 ， 这 是 因为 1005 和 2005 号 段 现 在 
并 不 是 应 用 程序 用 的 代码 段 和 数据 段 了 。 


console Xx 


lines x| 


D 
crack7.hrb Æ E J IR 


那么 如 果 我 们 将 crack7.nas 中 的 段 号 从 1005*8 和 
2005*8 改 为 4 和 12 会 怎么 样 呢 ? 


修改 的 crack7.nas 节 选 


_HariMain: 


MOV AX,4 3; eH! 

MOV DS, AX 

CMP DWORD [DS:@x@004], ‘Hari’ 

JNE fin ; 不 是 应 用 程序 ， 因 此 
不 执行 任何 操作 

MOV ECX, [DS :6x6666] ; 读 取 该 应 用 程序 数据 
段 的 大 小 

MOV AX,12 pe El 

MOV DS, AX 


这 样 的 话 束 变 成 自己 攻击 自己 了 ， 对 lines.hrb 没 有 
任何 影响 ， 所 以 坏人 被 我 们 打败 了 。 


不 过 对 于 坏人 来 说 还 有 一 个 漏洞 可 以 利用 ， 那 束 是 
CPU 中 的 LLDT 指 令 ， 用 这 个 指令 可 以 改变 LDTR 寄 
存 器 《用 于 保存 当前 正在 运行 的 应 用 程序 所 使 用 的 
LDT 的 寄存 器 〉 的 值 ， 这 样 的 话 就 可 以 切换 到 其 他 
应 用 程序 的 LDT， 从 而 引发 问题 。 但 是 大 家 别 担 

心 ， 因 为 这 个 指令 是 系统 专用 指令 ， 位 于 应 用 程序 
段 内 的 程序 是 无 法 执行 的 ， 即 时 要 强行 执行 这 个 指 
令 ， 也 会 像 执 行 CLI 指 令 那 样 产 生 异 常 〈 参 阅 22.1 
节 ) ， 的 乱 的 程序 就 会 被 强制 结 


于 是 我 们 终于 成 功 地 保卫 了 “世界 和 平 "， 可 早 可 六 
ZE 


5 优化 应 用 程序 的 大 小 Charib24e ) 


话说 ， 我 们 的 “ 纸 娃娃 系统 ” 开 肥 计划 已 经 差不多 接 
近 尾 声 了 ， 第 29 天 和 第 30 天 我 们 主要 是 来 编写 一 些 
应 用 程序 的 ， 对 于 操作 系统 本 喘 的 开 友 也 融 只 剩 下 
今明 两 天 的 时 间 了 。 正 琢磨 着 这 1 天 半 里 还 能 做 点 
什么 的 时 候 ， 笔 者 忽然 想起 操作 系统 的 大 小 来 了 。 
截止 到 harib24d 时 的 haribote.sys 大 小 为 33 3317-74, 
Ht 7E32.5KB. WERD, ARRE, ADA 
件 也 已 经 具备 了 操作 系统 的 基本 功能 了 。 


而 另 一 方面 ， 应 用 程序 的 大 小 又 如 何 呢 ? 不 看 不 知 
道 ， 一 看 吓 一 跳 ，hello3.hrb 居 然 有 520 字 节 那 么 大 
了 ， 在 21.2 节 的 时 候 明 明 才 只 有 100 字 节 来 着 ! 后 来 
我 们 也 只 是 将 结束 应 用 程序 的 方式 改 为 了 API 方 式 
而 已 ， 居 然 会 增 大 到 520 字 节 ， 这 也 太 不 可 思议 


究 其 原因 ， 主 要 是 因为 创建 hello3.hrb 时 所 引用 的 
a_nask.nas 变 大 了 。 也 惑 是 说 ， 在 hello3.hrb 中 ， 除 
了 包含 像 api_putchar 和 _api end 这 样 真 正 需 要 用 到 
的 函数 之 外 ， 还 包含 了 像 _api openwin 和 
_api_linewin 这 些 在 这 个 应 用 程序 中 根本 用 不 到 的 函 
数 。 


这 实在 是 对 空间 的 浪 颖 ， 我 们 得 想 个 办 法 才 行 。 如 
东 能 够 只 将 需要 用 到 的 部 分 包含 在 可 执行 文件 中 ， 
就 可 以 解决 这 个 问题 了 。 


那么 我 们 该 怎么 办 呢 ? 我 们 可 以 将 这 些 函 数 做 成 不 
同 的 .obj 文 件 ， 将 _api_putchar 等 需要 用 到 的 函数 和 
_api_openwin 等 不 需要 用 到 的 函数 分 离开 。 连 接 器 
(Linker, BHobj2bim) 的 功能 只 是 决定 是 人 否 将 .obj 

文件 连接 上 去 ， 而 不 会 在 一 个 包含 多 个 函数 的 .obj 

文件 中 挑 出 需要 使 用 的 部 分 ， 并 舍弃 不 需要 使 用 的 
部 分 〈 这 并 不 是 因为 obj2bim 的 功能 不 够 强大 ， 一 

般 的 连接 右 都 是 这 样 设计 的 ) 。 


因此 ， 我 们 将 函数 都 拆 开 吧 。 


本 次 的 api001.nas 


[FORMAT "WCOFF"] 
[INSTRSET "i486p"] 
[BITS 32] 

[FILE “api661.nas"] 


GLOBAL _api putchar 
[SECTION .text] 


_api_putchar: ; void api_putchar(int c); 
MOV EDX, 1 


MOV AL, [ESP+4] E: 
INT 0x40 
RET 


本 次 的 api002.nas 


[FORMAT "WCOFF"] 
[INSTRSET "i486p" | 
[BITS 32] 

[FILE "“api@e2.nas" | 


GLOBAL _api_putstr@ 
[SECTION .text] 


_api_putstr@: ; void api_putstr@(char *s); 
PUSH EBX 
MOV EDX, 2 
MOV EBX, [ESP+8] 
INT 0x40 
POP EBX 
RET 


本 次 的 api003.nas 


[FORMAT "WCOFF"] 
[INSTRSET "i486p"] 
[BITS 32] 

[FILE “api663.nas"] 


GLOBAL _api putstr1 


[SECTION .text] 


_api_putstr1: ; void api_putstri(char *s, int 1); 


PUSH EBX 

MOV EDX, 3 

MOV EBX, [ESP+ 8] E 
MOV ECX, [ESP+12] ; 1 
INT 0x40 

POP EBX 


照 这 样 全 部 写 出 来 的 话 太 浪费 纸张 了 ， 后 面 的 就 省 
略 了 哦 (全 部 是 从 a_nask.nas 中 原封 不 动 拆 出 来 
的 ) 。 依 此 类 推 ， 我 们 将 这 些 函 数 拆 分 成 
api001.nas~api020.nas. 


由 于 hello3.hrb 所 需要 的 .obj 文 件 只 有 api001.obj 和 
api004.obj， 因 此 我 们 来 修改 一 下 Makefile。 


修改 后 的 Makefile 节 选 


hello3.bim : hello3.obj api661.obj api664.obj Makefile 
$(OBJ2BIM) @$(RULEFILE) out:hello3.bim 


map:hello3.map hello3.obj api@@1.obj api0Q@4.obj 


这 样 一 make，hello3.hrb 束 只 有 112 字 节 了 ， 减 少 了 
408 字 节 ， 撒 花 ! 


我 们 索性 将 其 他 的 应 用 程序 也 全 部 重新 修改 一 下 
吧 。 首 先是 ahrbp， 它 所 需 的 .obj 文 件 也 是 api001 和 


api004， 上 所 以 像 上 面 一 样 修改 就 可 以 了 。 


修改 后 的 Makefile 节 选 


a.bim : a.obj api661.obj api664.obj Makefile 


$(OBJ2BIM) @$(RULEFILE) out:a.bim map:a.map a.obj 
api0Q@1.obj api004.obj 


然后 是 beepdown.hrb， 它 用 人 到 了 api004、api015、 
api016、api017、api018 和 api020。 


修改 后 的 Makefile 节 选 


beepdown.bim : beepdown.obj api664.obj api615.obj 
api016.obj api@17.obj\ 
api@18.obj api020.obj Makefile 
$(OBJ2BIM) @$(RULEFILE) out:beepdown.bim stack:1k 


map:beepdown.map \ 

beepdown.obj apiðð4.obj api015.obj api@16.obj 
api017.obj api@18.obj \ 

api@20.obj 


Fl FRIES Be, AN 
还 是 觉得 好 麻烦 啊 。 在 此 之 前 我 们 什么 都 不 用 想 ， 
只 要 将 a_nask.obj 连 接 上 去 就 好 了 ， 而 现在 还 要 根 
据 程 序 来 确认 所 使 用 的 API。 于 是 ， 笔 者 想 了 一 个 
偷懒 的 办 法 。 


其 实 obj2bim 这 个 连接 器 有 一 个 功能 ， 如 果 所 指定 
的 .obj 文 件 中 的 函数 并 没有 被 程序 所 使 用 ， 那 么 这 
个 .obj 文 件 是 不 会 被 连接 的 ， 所 以 我 们 把 用 不 到 
的 .obj 文 件 写 进 去 也 没有 问题 。 其 实 市 面 上 大 多 数 
连接 器 都 没有 这 个 功能 ， 只 要 指定 好 的 .obj 文 件 就 
都 会 连接 进去 ， 而 笔者 编写 的 这 个 obj2bim 则 会 先 
判断 一 下 。 

利用 这 一 特性 我 们 就 可 以 偷懒 了 ， 也 就 是 说 ， 我 们 
可 以 不 管 三 七 二 十 一 ， 把 api001 到 api020 全 都 写 上 
去 。 比 如 说 ，a.hrb 的 话 可 以 这 样 写 : 


修改 后 的 Makefile 节 选 
a.bim : a.obj api661.obj api@@2.obj (IK) api819.obj 


api020.obj Makefile 
$(OBJ2BIM) @$(RULEFILE) out:a.bim map:a.map a.obj 


api@01.obj api@@2.obj \ 
(HHS) api6e19.obj api626.obj 


虽然 这 样 写 很 长 ， 不 过 连接 起 来 并 没有 什么 问题 
(而 且 a.hrb 也 不 会 因此 变 大 ) 。 长 是 长 了 点 ， 不 过 
用 文本 编辑 如 的 复制 粘贴 功能 还 古 很 快 就 能 搞定 
的 。 


在 将 这 一 修改 应 用 到 所 有 的 程序 之 前 ， 笔 者 还 是 觉 
得 Makefile 太 长 的 话 不 易于 理解 ， 因 此 我 们 还 是 想 
个 办 法 改 短 一 点 吧 。 


本 次 的 Makefile 节 选 


OBJS API = api661.obj api@e@2.obj (FW) api619.obj 
api@20.obj 


a.bim : a.obj $(OBJS API) Makefile 
$(OBJ2BIM) @$(RULEFILE) out:a.bim map:a.map a.obj 
$(OBJS_APT) 


这 样 一 来 ， 今 后 如 果 奶 加 了 api021.obj， 我 们 也 只 要 
在 Makefile 里 修改 一 行 代码 束 可 以 了 。 


我 们 将 Makefile 中 的 a_nask.obj 全 部 符 换 为 
$(OBJS_APD 之 后 ， 应 用 程序 果然 变 小 了 很 多 ， 而 
且 运 行 起 来 坚 无 问题 ， 搬 花 ! 


a_nask.obj， 因 此 文件 大 小 不 变 
mw | | | 
eam | 0 | | 
ET 
ja_nask.obj， 因 此 文件 大 小 不 变 
ET 
am | aa 
ET 
[sant | sm | 
mw | 2 | | 
ET 
三 = 前 

| 
ee 


walk.hrb 715 > 487 
noodle.hrb 1969 = 1773 


beepdowm.hrb 576 — 224 


color2.hrb 796 +512 


Se 
> ja_nask.obj， 因 此 文件 大 小 不 变 
FEM ESI RACH, ALAS DARE aE CIE IE 


工作 的 。 比 如 hello.hrb 和 hello2.hrb 并 不 ae 
生成 的 ， 因 此 运行 时 会 报 hrb 文 件 格式 错误 。 

外 ， 我 们 现在 已 经 支持 了 LDT，crack7. E 
么 用 了 。 因 此 ， 上 面 3 个 文件 我 们 会 在 harib24f 中 删 
除 。 


6 JÆ Charib24f) 


如 果 像 上 一 和 那样 ， 把 函数 拆 分 开 来 ， 并 用 连接 器 
来 进行 连接 的 话 ， 我 们 需要 创建 很 多 很 多 个 .obj 文 
件 。 当 然 ， 如 有 果 不 拆 分 函数 ， 而 是 做 成 一 个 大 
的 .obj 文 件 也 可 以 (如 同 a_nask.obj〉， 但 这 样 的 话 
应 用 程序 没有 引用 的 函数 也 会 被 包含 进去 ， 生 成 的 
应 用 程序 文件 就 会 像 之 前 那样 无 问 增 大 很 多 。 


作为 一 个 操作 系统 来 说 ， 现 在 我 们 的 “ 纸 娃娃 系 
统 ” 规 模 还 不 算 大 ， 但 如 果 我 们 要 实现 Windows 和 
Linux 这 样 的 操作 系统 中 的 全 部 API 函 数 ， 最 终 需 要 
多 少 个 .obj 文 件 呢 ?大 概 得 有 几 和 干 个 吧 ， 只 是 想 想 
头 束 大 了 


要 解决 这 个 问题 ， 我 们 可 以 使 用 “* 库 ”。 库 的 英文 名 
称 是 "library”， 原 本 是 图 书馆 的 意思 ， 在 这 里 它 的 
用 途 是 将 很 多 个 .obj 文 件 打包 成 一 个 文件 〈 这 种 管 
理 方 式 的 确 有 点 像 图 书馆 吧 ) ， 这 样 一 来 文件 的 数 
量 惑 变 少 了 ， 整 个 系统 的 结构 也 精简 了 。 


要 创建 一 个 库 ， 我 们 首先 需要 .obj 文 件 作 为 原 材 
料 ， 除 此 之 外 ， 我 们 还 需要 一 个 叫做 库 管 理 喜 的 程 
序 。 库 管理 器 更 文 是 “librarian”， 原 本 是 网 书 馆 管理 
员 的 意思 。 其 实 ，tolset 中 已 经 包含 笔者 编写 的 库 
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好 了 ， 我 们 马上 来 创建 一 个 库 吧 。 在 Makefile 中 加 
上 下 面 的 代码 。 


本 次 的 Makefile 节 选 


GOLIB = $(TOOLPATH) golib@Q@.exe 


apilib.lib : Makefile $(OBJS APT) 
$(GOLIB) $(OBJS API) out:apilib.1lib 


完工 了 ， 通 过 短 短 几 行 代码 我 们 就 得 到 了 apilib.lib 
这 样 一 个 文件 。 

我 们 可 以 在 obj2bim 中 指定 刚刚 生成 的 这 个 apilib.lib 
来 代 蔡 那 一 串 .obj 文 件 。 wei 话 好 像 
也 没有 太 大 的 好 处 ， 不 过 只 用 一 个 .ib 文件 束 能 代 
MBAS obj CF, A wae (RBG YK 


Æ A Makefile js iz 


a.bim : a.obj apilib.1lib Makefile 
$(OBJ2BIM) @$(RULEFILE) out:a.bim map:a.map a.obj 


apilib.1lib 


借 此 机 会 ， 我 们 顺便 写 一 个 apilib.h。 


本 次 的 apilib.h 


void api_putchar(int c); 

void api_putstr@(char *s); 

void api_putstri(char *s, int 1); 

void api_end(void) ; 

int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); 

void api_putstrwin(int win, int x, int y, int col, int 
len, char *str); 

void api_boxfilwin(int win, int x@, int y@, int x1, int 
y1, int col); 

void api_initmalloc(void) ; 

char *api_malloc(int size); 

void api_free(char *addr, int size); 

void api_point(int win, int x, int y, int col); 

void api_refreshwin(int win, int xð, int yO, int x1, 
int y1); 

void api_linewin(int win, int x@, int y@, int x1, int 
y1, int col); 

void api_closewin(int win); 

int api_getkey(int mode); 

int api_alloctimer(void) ; 

void api_inittimer(int timer, int data); 

void api_settimer(int timer, int time); 

void api_freetimer(int timer) ; 

void api_beep(int tone); 


AS, RIIHEN ay DA tie xe DY A REAP AY 
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#include "“apilib.h" 


例如 ，beepdown.c 就 可 以 简化 成 下 面 这 样 了 。 


本 次 的 beepdown.c 节 选 


#include "apilib.h" /* 这 里 ! */ 


void HariMain(void) 


CHH) 


这 样 的 代码 非常 易 读 ， 因 此 我 们 把 其 他 应 用 程序 也 
PRIA I, ARS IR, H! 
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下 面 我 们 来 详细 讲解 一 下 库 的 知识 。 


在 很 久 很 信 以 前 ， 程 序 都 是 一 个 整 块 ， 也 融 是 次 ， 
编程 的 时 候 必 须 完整 地 从 头 写 到 尾 ， 这 种 编程 的 方 
法 目 然 是 十 分 抹 烦 的 。 


后 来 ， 有 人 提出 了 一 种 新 的 编程 方法 : 将 程序 的 功 
能 拆 分 为 小 的 部 件 〈 函 数 ) ， 然 后 再 组 合 起 来 构成 
一 个 完整 的 程序 。 这 样 ， 编 写 好 的 部 件 还 可 以 保存 
起 来 ， 下 次 可 以 用 在 其 他 程序 上 面 。 这 种 编程 方法 
被 称 为 “结构 化 编程 >。“ 纸 娃娃 系统 ”的 核心 以 及 各 


个 应 用 程序 就 是 由 无 数 个 函数 组 合 而 成 的 ， 这 便 是 
结构 化 编程 理念 的 体现 。 


依据 结构 化 编程 的 思想 ， 把 将 来 可 以 用 于 其 他 程序 
的 部 件 组 织 起 来 就 构成 了 库 。 结 构 化 编程 中 库 是 一 
个 很 宽泛 的 概念 ， 除 了 .lib 文件 ，.obj 文 件 本 身 也 可 
和 
ae) 


我 们 不 仅 在 ac 中 使 用 过 用 来 调用 API 的 函数 ， 在 其 
他 程序 的 开发 中 也 使 用 过 。 之 前 我 们 也 没有 特别 提 
过 ， 大 家 可 能 认为 前 面 编写 过 的 部 分 后 面 可 以 直接 
拿 过 来 用 是 理所当然 的 ， 但 其 实 这 就 是 结构 化 编程 
的 技术 之 一 。 


不 断 扩充 的 库 束 像 自 己 所 拥有 的 财产 一 样 ， 手 上 拥 
有 的 部 件 种 类 越 多 ， 后 面 的 各 种 开发 工作 就 会 越 轻 
松 、 迅 速 。 而 且 库 不 一 定 要 目 己 来 编写 ， 我 们 也 可 
以 使 用 别人 编号 的 库 。 例 如 ， 在 “ 纸 娃 娃 系 统 ” 中 ， 
我 们 所 用 到 的 sprintf 和 rand 等 函数 就 属于 这 一 类 。 

我 们 并 没有 在 本 书 中 特地 编写 这 些 函 数 ， 但 依然 能 
够 正常 地 使 用 它们 。 因 此 ， 库 也 可 以 说 是 人 类 的 公 
共 财 产 ( 束 像 公 共 图 书馆 一 样 〉。 


在 结构 化 编程 的 思想 中 ， 库 越 容 易 使 用 越 好 。 如 末 
文件 数量 太 多 ， 一 不 小 心 丢 掉 了 其 中 一 个 又 没有 发 
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然 也 是 文件 数量 越 少 越 好 ， 与 人 方便 ， 目 己方 便 ， 
因此 像 这 种 .lib 形 式 的 库 是 十 分 常用 的 。 


对 了 ，sprintf 和 rand 其 实 包 含 在 tolset 的 
z_tool/haribote 目 录 下 的 golibc.lib 中 。 


顺便 说 一 句 ， 随 着 结构 化 编程 的 普及 ， 人 类 的 程序 
开发 能 力 大 幅 近 升 ， 众 多 的 开 友 者 编写 出 了 无 数 的 
库 。 但 随 看 时 代 进 步 ， 函 数 的 数量 实在 太 多 了 ， 无 
法 对 每 个 图 数 的 使 用 方法 进行 有 效 的 管理 。 为 了 解 
决 这 个 问题 ,，“ 面 同 对 象 编程 ”的 新 思想 应 运 而 生 
(当然 ， 这 其 实 是 结构 化 编程 的 扩展 版 ， 是 在 结构 
化 编程 思想 的 基础 上 友 展 而 来 的 ) 。 关 于 面 癌 对 象 
编程 的 具体 内 容 ， 在 这 里 束 不 详细 讲解 了 因为 本 
cals 面 问 对 象 编程 的 方法 所 开发 的 程 
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7 整理 make 环 境 Charib24¢ ) 


也 许 是 笔者 的 电脑 性 能 比较 拳 ， 最 近 感 觉 “make 
run” 和 需要 的 时 间 很 长 。 为 外 ， 操 作 系 统 、 应 用 程序 
和 库 的 源 文 件 者 混在 一 起 ， 看 起 来 非常 混乱 。 
此 ， 我 们 来 把 它们 各 归 各 位 吧 。 


har ib24g 包含 全 部 内 容 的 磁盘 映像 (haribote.img) 
haribote 操作 系统 核心 (ipl10.bin 、haribote.sys ) 
apilib API 库 (apilib.li 


(apilib.lib ) 


a 应 用 程序 (ahrb ) 
hel 103 应 用 程序 (hello3.hrb) 


(中 略 ) 
应 用 程序 (colorhrb ) 
应 用 程序 (color2.hrb ) 


O oO 
oo 
oo 
N 


我 们 先 从 操作 系统 的 部 分 开始 吧 。 在 harib24g 中 创 
建 一 个 名 为 中 haribote” 的 目录 ， 将 操作 系统 核心 的 源 
ARNG VW Ke Makefile a) Six A, WR, ARE fo iX 
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进行 相应 的 修改 。 这 个 Makefile 只 是 将 原来 的 文件 
稍 作 修改 而 已 ， 具 体 的 代码 我 们 束 省 略 了 哦 。 


现在 如 果 我 们 要 只 make 操 作 系 统 的 话 ， 只 要 双击 
haribote 目 录 中 的 !cons.bat 文 件 ， 并 输入 “make” 束 可 
Df 


由 于 这 个 目录 中 只 包含 操作 系统 核心 部 分 ， 可 以 使 
用 的 命令 只 有 “make” “make clean” 以 及 “make 
src_only”。 如 果 要 执行 相当 于 “make run” 的 操作 的 
话 ， 则 需要 在 harib24g 中 输入 “make run” RAT F 
后 我 们 会 详细 讲解 ) 。 


接 下 来 是 库 ， 我 们 创建 一 个 名 为 “apilib” 的 目录 ， 将 
库 相 关 的 源 代 码 以 及 Makefile 移 动 进 去 。 喇 ， 看 上 
去 也 很 清 砚 ， 真 不 错 。 这 里 的 Makefile 也 是 将 原来 
的 文件 稍 作 修 改 而 已 ， 有 具体 代码 省 略 。 


apjlib 中 的 命令 也 只 有 “make” “make clean” V4 
及 “make src_only”， 当 然 ， 对 于 库 我 们 也 不 需要 执 
行 “make run" (SE) 。 


接 下 来 轮 到 应 用 程序 了 。 应 用 程序 的 Makefile 比 较 
短 而 且 很 有 意思 ， 我 们 还 是 写 出 来 吧 。 下 面 这 个 是 
ahrb 的 Makefile。 


ahrb 用 的 Makefile 
APP 本 
STACK = 1k 


include ../app_make.txt 


EAR? 算 上 空 行 也 才 只 有 5 行 。 不 过 话说 回来 ， 
其 实 app_make.txt 还 是 很 长 的 ， 实 际 上 也 没有 变 

短 ， 只 是 “看 上 去 变 短 了 ”而 已 。 之 所 以 要 用 
include， 是 因为 所 有 的 应 用 程序 的 Makefile 都 大 同 
小 异 ， 如 果 将 其 中 相同 的 部 分 改 为 include 方 式 来 引 
用 束 可 以 缩短 Makefile， 而 且 如 果 以 后 要 对 Makefile 
进行 修改 的 话 ， 只 需要 修改 app_make.txt 就 可 以 应 
用 到 所 有 的 应 用 程序 ， 修 改 起 来 会 非常 省 事 。 


app_make.txt 的 内 容 如 下 ， 这 个 稍微 有 点 长 。 


本 次 的 app_make.txt 


TOOLPATH = ../../z tools/ 

INCPATH = ../../z_tools/haribote/ 
APILIBPATH = ../apilib/ 
HARIBOTEPATH = ../haribote/ 

MAKE = $(TOOLPATH)make.exe -r 
NASK = $(TOOLPATH)nask.exe 

CC1 = $(TOOLPATH)cc1.exe -I$(INCPATH) -I../ -Os - 
Wall -quiet 

GAS2NASK = $(TOOLPATH)gas2nask.exe -a 
OBJ2BIM = $(TOOLPATH)obj2bim.exe 
MAKEFONT = $(TOOLPATH)makefont.exe 
BIN20BJ = $(TOOLPATH)bin2obj.exe 
BIM2HRB = $(TOOLPATH)bim2hrb.exe 
RULEFILE = ../haribote.rul 


EDIMG = $(TOOLPATH)edimg.exe 
IMGTOL = $(TOOLPATH)imgtol.com 
GOLIB = $(TOOLPATH)go0lib@0.exe 
COPY = copy 

DEL = del 

# 默 认 动 作 

default : 


$(MAKE) $(APP).hrb 
# 文 件 生成 规则 


$(APP) .bim : $(APP).obj $(APILIBPATH)apilib.1ib 
Makefile ../app_make.txt 
$(OBJ2BIM) @$(RULEFILE) out:$(APP).bim 
map:$(APP).map stack:$(STACK) \ 
$(APP).obj $(APILIBPATH)apilib.lib 


$(APP).hrb : $(APP).bim Makefile ../app_make.txt 
$(BIM2HRB) $(APP).bim $(APP).hrb $(MALLOC) 


haribote.img : ../haribote/ip1l10.bin 
../haribote/haribote.sys $(APP).hrb \ 
Makefile ../app_make.txt 
$(EDIMG) imgin:../../z_tools/fdimg@at.tek \ 
wbinimg src:../haribote/ip11@.bin len:512 
from:0 to:@ \ 
copy from:../haribote/haribote.sys to:@: \ 
copy from:$(APP).hrb to:@: \ 
imgout :haribote. img 


# 一 般 规则 


%.gas : %.c ../apilib.h Makefile ../app_make .txt 
$(CC1) -o $*.gas $*.c 


%.nas : %.gas Makefile ../app_make.txt 
$(GAS2NASK) $*.gas $*.nas 


%.obj : %.nas Makefile ../app_make.txt 
$(NASK) $*.nas $*.obj $*.1st 
# 命 令 
run : 
$(MAKE) haribote. img 
$(COPY) haribote.img .. \.. 
\z_tools\qemu\fdimage@. bin 
$(MAKE) -C ../../z_tools/qemu 


full : 
$(MAKE) -C $(APILIBPATH) 
¢$(MAKE) $(APP).hrb 


run_full : 
$(MAKE) -C $(APILIBPATH) 
$(MAKE) -C ../haribote 
$(MAKE) run 


clean : 
-$(DEL) *.1st 
-$(DEL) *.obj 
-$(DEL) *.map 
-$(DEL) *.bim 


-$(DEL) haribote.img 


src_only : 
$(MAKE) clean 
-$(DEL) $(APP).hrb 


这 里 的 重点 是 ， 可 以 使 用 的 命令 增加 了 。 一 般 

的 “make” 命 令 会 后 成 ahrb， 这 是 理所当然 的 啦 。 如 
果 执 行 “make run” 的 话 ， 则 会 生成 一 个 包 合 
haribote.sys 和 a.hrb 的 精 徐 版 磁盘 上 映像， 然后 调用 
QEMU 来 运行 。 


而 这 次 我 们 又 在 此 基础 上 新 增 了 “make 
full” 和 “make run_full* 两 个 命令 。 生 成 a.hrb 时 需要 
引用 apilib.lib， 但 也 可 能 出 现在 “make”a.hrb 时 
apilib.lib 还 未 完成 的 情况 ， 这 时 我 们 应 该 用 “make 
full”。 在 “make full* 中 ， 有 “$CMAKE) -C 
$(APILIBPATH)” 这 样 一 条 语句 ， 表 示 “ 先 执行 apilib 
的 make” 的 意思 ， 而 如 果 已 经 存在 apilib.lib 的 话 ， 这 
条 语句 将 不 执行 任何 操作 。 因 此 如 果 不 放心 的 话 ， 
一 直 用 “make full” 来 代替 “make” 也 是 可 以 的 。 

而 “make run_full” 则 是 “make run” 的 full 版 ， 即 将 
apilib 和 系统 核心 都 make 之 后 ， 再 执行 原本 的 “make 
run” 操 作 。 


最 后 来 介绍 一 下 harib24g 的 Makefile。 


harib24g 的 Makefile 

TOOLPATH = ../z_tools/ 

INCPATH = ../z_tools/haribote/ 
MAKE = $(TOOLPATH)make.exe -r 
EDIMG = $(TOOLPATH)edimg.exe 


IMGTOL = $(TOOLPATH)imgtol.com 
COPY = copy 

DEL = del 

# 默 认 动 作 

default : 


$(MAKE) haribote. img 
# 文 件 生成 规则 


haribote.img : haribote/ipl10.bin haribote/haribote.sys 
Makefile\ 

a/a.hrb hello3/hello3.hrb hello4/hello4.hrb 
hello5/helloS.hrb \ 

winhelo/winhelo.hrb winhelo2/winhelo2.hrb 
winhelo3/winhelo3.hrb \ 

stari/stari.hrb stars/stars.hrb 
stars2/stars2.hrb \ 

lines/lines.hrb walk/walk.hrb noodle/noodle.hrb 
\ 

beepdown/beepdown.hrb color/color.hrb 
color2/color2.hrb 

$(EDIMG) imgin:../z_tools/fdimg@at.tek \ 

wbinimg src:haribote/ip11@.bin len:512 from:@ 
to:@ \ 

copy from:haribote/haribote.sys to:@: \ 

copy from:haribote/ipl1@.nas to:@: \ 

copy from:make.bat to:@: \ 

copy from:a/a.hrb to:@: \ 

copy from:hello3/hello3.hrb to:@: \ 

copy from:hello4/hello4.hrb to:@: \ 

copy from:hello5/hello5.hrb to:@: \ 

copy from:winhelo/winhelo.hrb to:@: \ 

copy from:winhelo2/winhelo2.hrb to:@: \ 

copy from:winhelo3/winhelo3.hrb to:@: \ 


copy from:stari/star1.hrb to:@: \ 
copy from:stars/stars.hrb to:@: \ 
copy from:stars2/stars2.hrb to:@: \ 
copy from:lines/lines.hrb to:@: \ 
copy from:walk/walk.hrb to:@: \ 
copy from:noodle/noodle.hrb to:@: \ 
copy from:beepdown/beepdown.hrb to:@: \ 
copy from:color/color.hrb to:@: \ 
copy from:color2/color2.hrb to:@: \ 
imgout :haribote. img 
# 命 令 
run : 
$(MAKE) haribote. img 
$(COPY) haribote.img ..\ z_tools\gemu \ 
fdimage@.bin 
$(MAKE) -C ../z_tools/qemu 


install : 
$(MAKE) haribote.img 
$(IMGTOL) w a: haribote.img 


full : 
$(MAKE) -C haribote 
$(MAKE) -C apilib 
$(MAKE) -C a 


$(MAKE) -C hello3 
$(MAKE) -C hello4 
$(MAKE) -C hello5 
$(MAKE) -C winhelo 
$(MAKE) -C winhelo2 
$(MAKE) -C winhelo3 
$(MAKE) -C star1 
$(MAKE) -C stars 


$(MAKE) -C stars2 
$(MAKE) -C lines 
$(MAKE) -C walk 
$(MAKE) -C noodle 
$(MAKE) -C beepdown 
$(MAKE) -C color 
$(MAKE) -C color2 
$(MAKE) haribote.img 


run_full : 
$(MAKE) full 
$(COPY) haribote.img ../z_tools\qemu\fdimage®. bin 
$(MAKE) -C ../z_tools/qemu 


install full : 
$(MAKE) full 
$(IMGTOL) w a: haribote.img 


run_os : 
$(MAKE) -C haribote 
$(MAKE) run 


clean : 
# 不 执行 任何 操作 
src_only : 


$(MAKE) clean 
-$(DEL) haribote.img 


clean full : 
$(MAKE) -C haribote clean 
$(MAKE) -C apilib clean 
$(MAKE) -C a clean 
$(MAKE) -C hello3 clean 
$(MAKE) -C hello4 clean 


$(MAKE) -C helloS clean 


$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 


src_only full : 


$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 


$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 
$(MAKE) -C 


winhelo 
winhelo2 
winhelo3 
star1 
stars 
stars2 
lines 
walk 
noodle 
beepdown 
color 
color2 


haribote 
apilib 

a 

hello3 
hello4 
hello5 


winhelo 
winhelo2 
winhelo3 
star1 
stars 
stars2 
lines 
walk 
noodle 
beepdown 
color 
color2 


-$(DEL) haribote.img 


refresh : 


clean 
clean 
clean 
clean 
clean 
clean 
clean 
clean 
clean 
clean 
clean 
clean 


src_only 
src_only 
src_only 
src_only 
src_only 
src_only 


src_only 
src_only 
src_only 
src_only 
src_only 
src_only 
src_only 
src_only 
src_only 
src_only 
src_only 
src_only 


$(MAKE) full 
$(MAKE) clean_full 
-$(DEL) haribote.img 


在 这 里 我 们 可 以 使 用 很 多 命令 。 


像 之 前 一 样 ， 生 成 一 个 包含 操作 系统 内 核 及 全 部 应 用 程序 的 磁盘 映像 


程序 全 部 make 后 生成 磁盘 映像 


“make full* 后 “make run” 
“make full” 后 “make install” 


将 操作 系统 核心 make 后 执行 “make run"， 当 只 对 操作 系统 核心 进行 修改 时 
可 使 用 这 个 命令 

本 来 clean 命 令 是 用 于 清除 临时 文件 的 ， 但 由 于 在 这 个 Makefile 中 并 不 生成 临 
F， 因 此 这 个 命令 不 执行 任何 操作 


操作 系统 核心 、apilib 和 应 用 程序 全 部 执行 “make clean”， 这 样 将 清 
临时 文件 


二 操作 系统 核心 、apilib 和 应 用 程序 全 部 执行 “make src_only”, 这 样 将 清除 
所 有 的 临时 文件 和 最 终生 成 物 。 不 过 执行 这 个 命令 后 ，“make” 和 “make 
run" 就 无 法 使 用 了 《用 带 fall 版 本 的 命令 代替 即 可 ) ，make 时 会 消耗 更 多 的 
时 间 
“make full” ja“make clean_full*。 从 执行 过 “make src_only_full” 的 状态 执行 这 
个 命令 的 话 ， 就 会 恢复 到 可 以 直接 “make” 和 “make run” 的 状态 


像 这 样 划分 好 不 同 的 目录 后 ， 程 序 看 起 来 更 加 清 来 
了 ，make 所 用 时 间 也 缩短 了 。 例 如 ， 当 编写 了 一 个 
新 的 应 用 程序 时 ，harib24f 的 话 需 要 全 部 重新 生成 
一 遍 (NAAI Makefile) ， 但 现在 由 于 操作 系 
统 核心 和 应 用 程序 的 Makefile 是 分 开 的 ， 因 此 不 需 
要 每 次 新 增 应 用 程序 都 重新 生成 一 过 ，make 的 速度 


ERER, Hp! 


器， 在 整理 的 时 候 发 现 有 几 个 应 用 程序 有 点 问题 ， 
比如 说 winhelo.hrb 这 个 程序 ， 窗 口 弹 出 之 后 马上 惑 
结束 了 ， 看 不 清 窗口 上 面 的 内 容 ， 因 此 我 们 按照 
lines.c 的 方式 将 winhelo.c 修 改 一 下 。 


本 次 的 winhelo/winhelo.c 
#include "apilib.h" 
char buf[156 * 50]; 


void HariMain(void) 


{ 


int win; 
win = api_openwin(buf, 150, 50, -1, "hello"); 


for (33) { /* 
从 此 开始 */ 
if (api_getkey(1) == @x@a) { 
break; /* 按 下 回 车 键 则 break; */ 
} 


} 
到 此 结束 */ 
api_end(); 


winhelo2、winhelo3、star1、stars 和 stars2 也 有 同样 
的 问题 ， 顺 便 全 都 改 了 一 下 。 


好 了 ， 我 们 来 “make run full’. RIR, i247 IE 


第 ， 撤 花 ! 为 了 庆 视 成功， 我 们 把 修改 过 的 
stars.hrb 和 winhelo3.hrb 也 运行 一 下 ， 摆 出 来 装点 门 
面 。 


hello 
hello, world 


好 多 应 用 程序 


ATs ah 中 的 harib24g 是 执行 过 “make refresh” HJAR 
， 因 此 大 家 可 以 直接 执行 “make run”， 而 不 用 执 
We 


好 啦 ， 今 天 我 们 已 经 很 努力 了 ， 束 到 这 里 吧 。 明 天 
Ae, HG ELAR | 


第 28 天 文件 操作 与 文字 显示 


alloca (1) (harib25a) 

alloca (2) (harib25b) 

文件 操作 API (harib25c) 
命令 行 API Charib25d) 

日 文 文字 显示 (1) Charib25e) 
日 文 文字 显示 (2) Charib25f) 
日 文 文字 显示 (3) Charib25¢g) 


1 alloca (1) Charib25a) 


今天 我 们 准备 来 实现 读 取 文件 的 功能 和 显示 文字 的 
功能 ， 不 过 在 做 这 些 看 上 去 很 酷 的 事情 之 前 ， 我 们 
先 来 解决 一 些 基 本 的 问题 ， 就 当 是 热 号 吧 。 


首先 ， 我 们 来 编写 一 个 简单 的 应 用 程序 。 


SOSU.C 


#include <stdio.h> 
#include "“apilib.h" 


#define MAX 1000 


void HariMain(void) 
{ 
char flag[MAX], s[8]; 
int i, j; 
for (i = ð; i < MAX; i++) { 
flag[i] = 9; 


for (i = 2; i < MAX; i++) { 
if (flag[i] == 6) { 
/* 没 有 标记 的 为 质数 */ 


sprintf(s, "%d ", i); 

api_putstro(s) ; 

for (j = i * 2; j < MAX; j += i) { 
flag[j] = 1; /* 给 它 的 倍数 做 上 标记 */ 


} 
} 
api_end(); 
} 


这 个 程序 的 功能 是 显示 1000 以 内 的 质数 ， 所 谓 质 
数 ， 就 是 “只 能 被 1 及 其 本 号 整除 的 大 于 1 的 自然 
数 ”， 例 如 2、3、5、7 都 是 质数 2 ， 而 4 可 以 被 2 整 
除 ，6 可 以 被 2 和 3 整除 ， 因 此 它们 不 是 质数 。 


“质数 义 称 又 数 。 为 什么 这 样 的 数 会 被 称 为 系数 
Ne? 因为 凡是 2 以 上 的 整数 都 可 以 写成 两 个 素数 的 
乘积 ， 也 就 是 说 ， 系 数 相 当 于 构成 整 效 世 界 的 “元 
素 ” 的 意思 吧 。 话 说 ， 如 果 不 用 乘法 而 是 用 加 法 分 
解 整 数 的 话 ， 那 么 系数 就 只 有 1 一 个 了 ， 不 过 这 样 
没什么 研究 价值 ， 因 此 数学 上 就 不 研究 它 了 。 


将 这 个 程序 “make run” 一 下 ， 当 然 会 顺利 运行 啦 。 


congeal = 


Ti 683 691 701 709 7? 
T39 743 751 75? 761 


787 797 809 


iS? 811 821 8 
23 827 8290 839 853 857 859 BAS 
877 881 883 887 907 911 919 9 
29 937 941 947 953 967 971 977 
983 99] 997 


ME, EERDE. XER, “ 纸 娃娃 系统 ”不 但 
能 用 来 给 泡 面 计时 ， 还 能 用 来 求 质数 了 ， 太 好 了 。 


下 面 我 们 稍微 修改 一 下 这 个 程序 ， 让 它 显 示 1 万 以 
内 的 质数 。 程 序 的 修改 很 简单 ， 只 要 把 开头 一 句 改 
成 “#define MAX 10000” 就 行 了 ， 然 后 另存 为 
sosu2.c。 哦 对 了 ， 这 个 程序 需要 在 栈 中 保存 很 多 变 


量 〈 光 flag[10000] 就 需要 大 概 10KB 的 空间 ) ， 因 此 
在 Makefile 中 指定 的 栈 大 小 改 为 11k 了 。 


然后 我 们 来 “make run”— F. IR? 出 现 了 一 条 神秘 
的 警告 : “Warming: can’t link _alloca”。 我 们 不 管 
E3 继 乡 AMAT » 可 运行 后 显示 出 奇怪 的 内 容 ， 然后 
就 停止 不 动 了 。 没 办 法 ， 我 们 用 Shift+F1 强 制 结 

TR 


显示 1000 以 内 的 质数 运行 很 正常 ， 为 什么 Sosu2.hrb 
其 实 我 们 刚刚 忽略 的 那 条 警告 信息 中 
售 玄 机 ， 它 其 实 是 在 提醒 我 们 缺少 一 个 叫 
“loatt 数 。 


电脑 上 所 使 用 的 C 语 言 编译 器 规定 ， 如 果 栈 中 的 变 
量 超过 4KB， 则 需要 调用 alloca 这 个 函数 。 这 个 函 
数 的 主要 功能 是 根据 操作 系统 的 规格 来 获取 栈 中 的 
空间 。 在 Windows 和 Linux 中 ， 如 果 不 调用 这 个 函 
数 ， 而 是 仅 对 ESP 进 行 减法 运算 的 话 ， 貌 似 无 法 成 
功 获 取 内 存 空间 (小 于 4KB 时 只 要 对 ESP 进 行 减法 
运算 即 可 ) 。 


不 过 ， 在 “ 纸 娃娃 系统 ”中 ， 对 于 栈 的 管理 并 没有 什 
么 特殊 的 设计 ， 因此 也 用 不 着 去 调用 _alloca 函 
数 ， 可 C 语 言 A 的 编译 器 义 不 是 “ 纸 娃 娃 系 统 ; :专用 
H, TERZE HAHHAA o R, CES 


还 是 不 让 人 省 心 啊 。 


为 了 解决 这 个 问题 ， 我 们 需要 编写 一 个 _alloca 函 
数 ， 只 对 ESP 进 行 减法 运算 ， 而 不 做 其 他 任何 多 余 
的 操作 。 


好 了 ， 那 我 们 就 来 编写 _alloca 吧 ...... 慢 着 ， 在 编 
写 这 个 函数 之 前 ， 我 们 可 以 先 想 个 办 法 在 程序 中 获 
取 这 10KB 的 内 存 空间 。 其 实 ， 笔 者 曾经 写 不 出 成 
功 的 _alloca， 当 时 就 是 用 下 面 的 方法 将 就 的 
(Rs 


sosu3.c 


#include <stdio.h> 
#include "“apilib.h" 


#define MAX 10000 


void HariMain(void) 


{ 
char *flag, s[8]; /* 这 里 ! */ 
int i, j; 
api_initmalloc(); /* 从 此 开始 */ 
flag = api_malloc(MAX); /* 到 此 结束 */ 
for (i = ð; i < MAX; i++) { 

flag[i] = 9; 

} 


for (i = 2; i < MAX; i++) { 


if (flag[i] == { 
/* 没 有 标记 的 为 质数 */ 
sprintf(s, "%d ", i); 
api_putstre(s); 
for (j =i*2;j< MAX; j += i) { 
flag[j] = 1; /* 给 它 的 倍数 做 上 标记 */ 


} 


} 
api_end(); 


ROE AE Ar IML LT ESN AT T, 我 们 来 试 试 


看 , “make run”. 


1 万 以 内 的 质数 


果然 成 功 了 ! 这 样 看 来 ， 问 题 果 然 出 在 alloca 上 
《而 并 不 是 算法 的 局 限 所 导致 的 ) 。 


2 alloca (2) (harib25b) 
即便 没有 _ alloca， 只 要 用 malloc 束 可 以 搞定 了 了， 我 
们 就 到 这 里 结束 吧 ..….. 等 等 ， 我 可 没有 这 么 说 哦 
(SE) 。 栈 中 使 用 的 变量 一 多 ， 程 序 束 无 法 正常 运 
行 了 ， 这 可 说 不 过 去 呀 。 


alloca.nas 


[FORMAT "WCOFF"] 
[INSTRSET "i486p"] 
[BITS 32] 

[FILE "alloca.nas"] 


GLOBAL _ alloca 
[SECTION .text] 
EAX, -4 


ESP, EAX 
DWORD [ESP+EAX] ; 代替 RET 


于 是 我 们 编写 了 包含 上 述 内 容 的 alloca.nas， 并 将 它 
放 在 了 apilib 中 。 虽 然 它 并 不 能 称 为 API， 但 是 另外 
归 类 实在 太 欣 烦 了 ， 我 们 就 先 放 在 apilib 中 好 了 。 


这 个 程序 实际 上 只 有 3 行内 容 ， 却 颇 有 内 涵 ， 下 面 
我 们 来 讲解 一 

alloca 会 在 下 述 情况 下 被 C 语 言 的 程序 调用 (采用 
near-CALL 的 方式 ) 。 


。 要 执行 的 操作 从 栈 中 分 配 EAX 个 字 节 的 内 存 空 
间 (ESP -= EAX:) 

。 要 遵守 的 规则 不 能 改变 ECX、EDX、EBX、 
EBP、ESI、EDI 的 值 (可 以 临时 改变 它们 的 
值 ， 但 要 使 用 PUSH/POP 来 复原 ) 


看 到 这 里 大 家 可 能 会 想 “ 什 么 啉 ? 这 么 简单 ”， 于 是 
束 编 写 出 下 面 这 样 的 程序 : 
错误 的 alloca 示 例 (1) 


SUB ESP, EAX 
RET 


但 这 个 程序 是 无 法 运行 的 ， 因 为 RET 返 回 的 地 址 保 
存在 了 ESP 中 ， 而 ESP 的 值 在 这 里 被 改变 了 ， 于 是 
读 取 了 错误 的 返回 地 址 〈 注 意 : “RET” 指 令 实际 上 
相当 于 “POP EIP”) 。 


既然 这 个 不 行 ， 我 们 又 想到 了 列 的 办 法 。 


错误 的 alloca 示 例 (2) 


SUB ESP, EAX 
JMP DWORD [ESP+EAX] ; 代 蔡 RET 


这 个 貌似 不 错 ，JMP 的 目标 地 址 从 [ESP] 变 成 了 
[ESP+EAX]， 而 ESP+EAX 的 值 正好 是 减法 运算 之 
前 的 ESP 值 ， 也 束 是 正确 的 地 址 。 


不 过 这 样 还 是 有 个 问题 ，“RET” 指 令 相 当 于 “POP 
EIP”， 而 “POP EIP” 实 际 上 又 相当 于 下 面 两 条 指 


MOV EIP, [ESP] ; 没有 这 个 指令 ， 用 JMP [ESP] 代 替 
ADD ESP ,4 


也 就 是 说 ， 刚 刚 我 们 态 记 给 ESP 加 上 4， 因 此 ESP 的 
(ADA SRE. 

IBA BANTER OER, REP RAR RM S FXE. 
错误 的 alloca 示 例 (3) 

SUB ESP ,EAX 


JMP DWORD [ESP+EAX] ; 代 蔡 RET 
ADD ESP,4 


这 个 程序 的 问题 在 于 ADD 指 令 的 位 置 ， 将 ADD 指 
令 放 在 了 JMP 指 令 的 后 面 ， 所 以 是 不 可 能 被 执行 
的 ， 因 此 也 失败 了 。 


这 人 次 我 们 一 定 得 解决 这 个 问题 ， 于 是 我 们 将 程序 改 
成 了 下 面 这 样 。 


基本 正确 的 alloca 示 例 

SUB ESP, EAX 

ADD ESP,4 

JMP DWORD [ESP+EAX-4]  ; ÆRET 


这 个 程序 可 以 成 功 运 行 ， 太 好 了 ! 因此 将 这 个 程序 
直接 作为 alloca.nas 也 没 问 题 。 这 里 的 要 点 是 : 先 加 
上 4， 然 后 在 JMP 指 令 的 地 址 计算 中 再 减 掉 4. 


讲 到 这 里 ， 再 回头 看 看 前 面 实 际 的 _alloca， 怎 么 
样 ， 更 加 简短 吧 ? 不 错 不 错 。 


这 样 一 来 sosu2.hrb 应 该 束 可 以 正常 运行 了 ， 我 们 来 
试 试 看 ，“make run”. 


| 


CONSE alia 


19 9661 9677 9679 9689 9697 97 

19 9721 9733 9739 91 143 9749 97 

? 9769 9781 Q787 | 9803 98 

817 982 Q Qi 2 ¢ 0830 0851 ge 

r 90859 £ 9883 9887 9901 99 

OF 9923 9929 9931 5041 9949 99 
i QQgys 


看 ， 成 功 了 ! 


运行 成 功 ， 耶 ! 


话说 ，sosu2.hrb 和 sosu3.hrb 在 运行 结果 上 就 没有 什 
么 区 别 了 ， 那 么 程序 的 大 小 如 何 呢 ? 


sosu2.hrb: 1484 r 


sosu3.hrb: 1524 47 


虽然 差距 不 大 ， 但 还 是 sosu2.hrb 更 胜 一 筹 。 


既然 如 此 ， 我 们 让 winhelo 也 从 栈 中 分 配 buf 的 空间 
吧 。HariMain 函 数 中 声明 的 变量 在 程序 结束 前 是 不 
会 被 释放 的 ， 因 此 完全 可 以 代 蔡 。 


本 次 的 winhelo.c 
#include "“apilib.h" 


void HariMain(void) 
{ 
int win; 
char buf[156 * 50]; 
ARL 


win = api_openwin(buf, 150, 50, -1, "hello"); 
for (33) { 
if (api_getkey(1) == @x@a) { 
break; /* 按 下 回 车 键 则 break;*/ 


} 
} 
api_end(); 


在 Makefile 中 设 定 “STACK = 8k”， 然 后 “make 
run” 一 下 (buf 大 约 需 要 7.5KB 的 空间 ) 。 哦 哦 ， 运 
行 成 功 了 ， 而 且 程 序 大 小 变 为 174 字 节 了 ， 要 知道 
修改 前 的 大 小 有 7664 字 节 呢 (因为 有 “RESB 
7500”) ， 真 是 个 重大 改进 。 由 于 担心 磁盘 空间 不 
够 (考虑 到 后 面 我 们 还 要 加 入 字库 ) ， 因 此 应 用 程 


序 当 然 是 越 小 越 好 。 


console x] 


17471 AEP a PY PA SLE D fe ! 


说 实话 ， 本 来 winhelo.hrb 一 开始 就 是 从 栈 中 为 buf 
分 配 衬 间 的 ， 不 过 buf 差 不 多 要 占用 7.5KB， 超 过 

AKB 了， 没有 alloca 的 话 是 不 会 成 功 运 行 的 。 如 果 
在 22.5 节 那个 阶段 惑 引 入 alloca 的 话 ， 整 体 的 条 理 
束 会 补 打 乱 ， 因 此 笔者 才 不 得 已 将 buf 的 声明 放 到 
函数 外 面 ， 揭 强 算 是 挺 过 了 那 一 关 《〈C 语 言 中 ， 

在 函数 外 部 声明 的 变量 和 带 static 的 变量 一 样 ， 都 
会 被 解释 为 DB 和 RESB; 在 函数 内 部 不 带 static 声 

明 的 变量 则 会 从 栈 中 分 配 空 间 ) 。 


随后 ， 在 23.1 节 中 由 于 我 们 引入 了 malloc， 上 所 以 即 
便 没 有 alloca 也 可 以 尽量 缩小 应 用 程序 的 大 小 ， 于 
是 就 没有 机 会 讲解 aloca 了 。 在 这 里 笔者 想 说 的 
是 ， 现 在 我 们 终于 让 winhelo.hrb 恢 复 到 它 本 来 的 
RPS, Any. 


下 面 ， 我 们 顺便 将 winhelo2.hrb 也 修改 一 下 。 


本 次 的 winhelo2.hrb 
#include "“apilib.h" 


void HariMain(void) 
{ 
int win; 
char buf[150 * 50]; 
XEL 7 
win = api_openwin(buf, 150, 50, -1, "hello"); 
api_boxfilwin(win, 8, 36, 141, 43, 3 /* 黄 色 */); 
api_putstrwin(win, 28, 28, © /*#4f*/, 12, "hello, 
world"); 
for (33) { 
if (api_getkey(1) == @x@a) { 
break; /* 按 下 回 车 键 则 break;*/ 
} 


} 
api_end(); 


大 功 告 成 。 说 是 修改 ， 其 实 也 区 是 移动 了 1 行 代 码 
而 已 。 我 们 来 “make run”— P...... IE, — Pe 
常 ? 哎呀 不 好 ， 忘 记 将 STACK 设 定 为 8k 了 。 


设 定 为 8k 之 后 就 可 以 正常 运行 了 ， 程 序 只 有 315 字 
ace TALE ! 


改 展 前 的 winhelo2.hrb: 7808 


改 民 后 的 winhelo2.hrb: 315 字 节 


winhelo3.hrb (用 malloc 方 式 ) : 359 字 节 


3 文件 操作 API Charib25c) 


好 了 ， 让 我 们 进入 今天 的 第 一 个 主题 一 一 文件 操作 
API 吧 。 所 谓 文 件 操 作 API， 就 是 可 以 指定 文件 ， 并 
能 自由 读 写 文件 内 容 的 API。 现 在 我 们 的 “ 纸 娃娃 系 
统 ” 还 不 能 对 磁盘 进行 号 入 操作 ， 因 此 只 要 能 读 取 
SOE A AAT DAT o 


一 般 的 操作 系统 中 ， 输 入 输出 文件 的 API 基 本 上 都 
有 下 面 这 些 功 能 (当然 ， 还 有 其 他 一 些 次 要 的 功 


Nx 


e E(V...... seek 


o EHL... read 


e 天 加. close 


打开 和 关闭 API 用 来 对 要 读 写 的 文件 进行 打开 和 天 
闭 的 操作 。 一 个 文件 必须 先 打开 才能 进行 读 写 操 
作 ， 因 为 在 打开 时 ， 操 作 系 统 需 要 对 读 写 文件 进行 


准备 工作 ， 关 闭 时 也 要 进行 一 些 善后 处 理 。 


打开 文件 时 需要 指定 文件 名 ， 如果 打开 成 功 ， 操 作 
系统 将 返回 文件 句柄 。 在 随后 的 操作 中 ， 只 要 提供 
这 个 文件 句柄 就 可 以 进行 读 写 操作 了， 操作 结束 后 
将 文件 关闭 。 


定位 API 的 功能 是 指定 下 次 访 取 、 写 入 命令 需要 操 
作 的 目标 位 于 文件 中 的 哪个 位 置 。 说 句 题 外 话 ， 表 
示 定 位 API 的 更 文 单词 seek 原 本 是 “检索 ”的 意思 ， 在 
文件 中 定位 束 和 在 人 磁盘 中 检索 文件 天 不 多 ， 不 过 实 
际 上 的 感 党 更 像 是 检索 指定 文件 位 置 所 在 的 而 区 。 


读 取 和 写 入 API 基 本 上 需要 指定 需要 读 取 〈( 写 入 ) 
的 数据 长 度 以 及 内 存 地 址 ， 文 件 的 内 容 会 被 传送 至 
内 存 〈 写 入 操作 时 是 由 内 存 传送 至 文件 ) 。 


TT 
根据 以 上 内 容 ， 我 们 将 API 设 计 成 下 面 这 样 。 
FTP CEE 
EDX=21 


EBX= 文 件 名 


EAX= 文 件 句 柄 〈 为 0 时 表示 打开 失败 ) (由 操作 
系统 返回 ) 


RAAF 
EDX=22 


EAX= 文 件 句柄 


文件 定位 

EDX=23 

EAX= 文 件 句柄 

ECX= 定 位 模式 
=0: 定位 的 起 点 为 文件 开头 
=1: 定位 的 起 点 为 当前 的 访问 位 置 
=2: 定位 的 起 点 为 文件 末尾 


EBX= 定 位 偏 移 量 


获取 文件 大 小 
EDX=24 
EAX= 文 件 句 柄 
ECX= 文 件 大 小 获取 模式 
=0: 普通 文件 大 小 
=1: 当前 读 取 位 置 从 文件 开头 起 算 的 偏 移 


=2: 当前 读 取 位 置 从 文件 末尾 起 算 的 偏 移 


EAX= 文 件 大 小 《〈“ 由 操作 系统 返回 ) 


文件 读 取 
EDX=25 

EAX= 文 件 句柄 
EBX= 绥 冲 区 地 址 


ECX= 最 大 访 取 字 节 数 
EAX= 本 次 读 取 到 的 字 节 数 〈“ 由 操作 系统 返回 ) 
CLLD 


我 们 修改 一 下 bootpack.h 和 console.c 来 添加 这 些 
API. 


本 次 的 bootpack.h 节 选 


struct TASK { 

int sel, flags; /* sel 为 GDT 编 写 */ 

int level, priority; 

struct FIFO32 fifo; 

struct TSS32 tss; 

struct SEGMENT DESCRIPTOR ldt[2]; 

struct CONSOLE *cons; 

int ds_base, cons_stack; 

struct FILEHANDLE *fhandle; /* 从 此 开始 */ 

int *fat; /* 到 此 结束 */ 
}; 


struct FILEHANDLE { /* 从 此 开始 */ 
char *buf; 
int size; 
int pos; 


}; /* 到 此 结束 */ 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, int memtotal) 


CFA ) 
struct FILEHANDLE fhandle[8]; 


《中略 》 
for (i = ð; i < 8; i++) { 
fhandle[i].buf = 0; /* 未 使 用 标记 */ 

} 
task->fhandle = fhandle; 
task->fat = fat; 

(中略 》 

} 


int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


CHH) 
if (finfo != 6) { 
/* 找 到 文件 的 情况 */ 
CHH) 


if (finfo->size >= 36 && strncmp(p + 4, "Hari", 
4) == @ && *p == 0x00) { 
CREK) 
start_app(@x1b, © * 8 + 4, esp, 1 * 8 +4, 
&(task->tss.esp@) ); 
CREK) 
for (i = 03 i < 8; i++) {  /* 将 未 关闭 的 文件 
大 网 #/ /* 从 此 开始 */ 
if (task->fhandle[i].buf != ð) { 
memman_free_4k(memman, (int) task- 
>fhandle[i].buf, task->fhandle[i].size); 
task->fhandle[i].buf = Q; 


} 


} 
/* 到 此 结束 */ 
(中 上 略 ) 


} else { 
CREK) 


} 
中略 ) 


} 
CHATS 
} 


int *hrb api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CHH) 
struct FILEINFO *finfo; 
struct FILEHANDLE *fh; 
struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 
CHH) 
} else if (edx == 21) { 
for (i = ð; i < 8; i++) { 
if (task->fhandle[i].buf == 0) { 
break; 
} 
} 
fh = &task->fhandle[i]; 
reg[7] = ð; 
if (i < 8) { 
finfo = file_search((char *) ebx + ds_base, 
(struct FILEINFO *) (ADR_DISKIMG + 
@x@02600), 224); 
if (finfo != 0) { 
reg[7] = (int) fh; 
fh->buf = (char *) 
memman_alloc_4k(memman, finfo->size) ; 
fh->size = finfo->size; 
fh->pos = ð; 
file loadfile(finfo->clustno, finfo- 


>size, fh->buf, task->fat, (char *) 
(ADR_DISKIMG + 0x@@3e@@) ) ; 
} 
} 
} else if (edx == 22) { 
fh = (struct FILEHANDLE *) eax; 
memman_free 4k(memman, (int) fh->buf, fh- 
>size); 
fh->buf = ©@; 
} else if (edx == 23) { 
fh = (struct FILEHANDLE *) eax; 
if (ecx == @) { 
fh->pos = ebx; 
} else if (ecx == 1) { 
fh->pos += ebx; 
} else if (ecx == 2) { 
fh->pos = fh->size + ebx; 
} 
if (fh->pos < 0) { 


fh->pos ð; 


} 
if (fh->pos > fh->size) { 
fh->pos = fh->size; 
} 
} else if (edx == 24) { 
fh = (struct FILEHANDLE *) eax; 
if (ecx == @) { 
reg[7] = fh->size; 
} else if (ecx == 1) { 
reg[7] = fh->pos; 
} else if (ecx == 2) { 
reg[7] = fh->pos - fh->size; 
} 
} else if (edx == 25) { 
fh = (struct FILEHANDLE *) eax; 


for (i = ð; i < ecx; i++) { 
if (fh->pos == fh->size) { 
break; 


} 
*((char *) ebx + ds base + i) = fh->buf[fh- 
>pos ] ; 


fh->pos++; 
} 
reg[7] = i; 
return ð; 


我 们 在 struct TASK 中 添加 了 fhandle 和 fat 两 个 元 素 ， 
这 是 为 了 让 hrb_api 也 能 够 使 用 console_task 中 声明 的 
变量 cmd_app 也 可 以 使 用 ) 。fhandle 用 来 存放 应 
用 程序 所 打开 文件 的 信息 。 在 cmd_app 中 新 添加 的 


~ 是 为 了 目 动 天 闭 应 用 程序 没有 关闭 的 文件 句 
两 。 


接 下 来 我 们 来 添加 apilib 的 函数 ， 以 便 C 语 言 可 以 使 
用 新 的 API。 


api021.nas {i 1% 

_api_fopen: 3 int api_fopen(char *fname) ; 
PUSH EBX 
MOV EDX, 21 


MOV EBX, [ESP+8 ] ; fname 


INT 0x40 
POP EBX 
RET 


api022.nas 75 iz 
_api_fclose: ; void api_fclose(int fhandle); 
MOV EDX, 22 
MOV EAX, [ESP+4 ] ; fhandle 
INT 0x40 
RET 
api023.nas 75 iz 
_api_fseek: ; void api_fseek(int fhandle, int 
offset, int mode); 
PUSH EBX 
MOV EDX, 23 
MOV EAX, [ESP+8] ; fhandle 
MOV ECX, [ESP+16 ] ; mode 
MOV EBX, [ESP+12] ; offset 
INT 0x40 
POP EBX 
RET 
api024.nas 75 i 
_api_fsize: ; int api_fsize(int fhandle, int 
mode) ; 
MOV EDX, 24 
MOV EAX, [ESP+4 ] ; fhandle 
MOV ECX, [ESP+8 ] ; mode 


INT 0x40 


RET 


api025.nas 75 X 


_api_fread: ; int api_fread(char *buf, int 
maxsize, int fhandle); 

PUSH EBX 

MOV EDX, 25 

MOV EAX, [ESP+16] ; fhandle 


MOV ECX, [ESP+12] ; maxsize 
MOV EBX, [ESP+8 ] ; buf 

INT 0x40 

POP EBX 

RET 


这 几 个 都 很 简单 ， 就 不 详细 讲解 了 。 
CLLD 


最 后 我 们 编写 一 个 测试 用 的 应 用 程序 ， 这 个 程序 的 
功能 是 将 ip110.nas 的 内 容 type 出 来 。 


typeipl.c 


#include "“apilib.h" 


void HariMain(void) 
{ 
int fh; 
char C; 
fh = api_fopen("ipl11@.nas"); 
if (fh != 0) { 


for (33) { 
if (api_fread(&c, 1, fh) == @) { 
break; 


} 
api_putchar(c); 
} 


} 
api_end(); 


正如 大 家 所 看 到 的 ， 这 是 个 非常 简单 的 程序 。 


我 们 来 “make run” 试 试看 吧 。 哦 哦 ， 运 行 很 成 功 ， 
真 不 错 。 


显示 出 文件 内 容 了 哦 


typeipl.hrb 是 程序 ， 所 以 可 以 通过 Shift+F1 来 强制 结 
束 ， 从 这 一 点 来 看 它 比 命令 行 窗 口内 置 的 type 命 令 
要 好 用 一 些 。 


4 命令 行 API (harib25d) 


typeipl.hrb 看 起 来 相当 不 错 ( 尤 其 是 可 以 强制 结 

这 一 点 很 好 ) ， 我 们 不 妨 就 用 这 个 程序 米 丛 代 type 
命令 吧 。 首 先 ， 我 们 需要 从 命令 行 窗口 中 删除 type 
命令 。 从 console.c 中 删 挥 cmd_type， 然 后 将 函数 
cons_runcmd 中 用 于 调用 cmd_type 的 部 分 也 删 掉 。 
w, BERET 〈 这 里 只 是 删 掉 几 个 语句 ， 束 不 
将 代码 列 出 来 了 ) 。 


现在 typeipl.hrb 还 只 能 显示 ipl10.nas 这 个 文件 ， 而 我 
们 需要 实现 能 任意 指定 文件 名 的 功能 ， 人 否则 它 葡 无 
法 完全 蔡 代 type 命 令 。 为 此 ， 我 们 十 要 在 用 户 输 

入 “type ipl10.nas” 这 样 的 命令 时 获取 后 面 的 文件 

名 ， 这 个 功能 被 称 为 获取 命令 行 。 因 此 我 们 就 要 编 
写 一 个 API 来 获取 命令 行 。 


不 同 的 操作 系统 下 获取 命令 行 的 形式 也 不 尽 相 同 ， 

Windows 的 API 在 获取 命令 行 时 并 非 只 返回 后 面 的 

文件 名 部 分 ， 而 是 返回 包含 应 用 程序 名 (也 就 是 这 
里 的 type) 在 内 的 完整 命令 行内 容 ， 我 们 就 来 模仿 
这 种 方式 吧 ...... 其 实 这 只 是 一 个 借口 啦 〈 笑 ) ， 归 
根 结 底 还 是 因为 返回 完整 命令 行内 容 的 API 编 写 起 
来 比较 简单 。 


获取 命令 行 
EDX=26 
EBX= 存 放 命 令 行 内 容 的 地 址 


ECX= 最 多 可 存放 多 少 


1 +t 


(由 操作 系统 返 


EAX= 实 际 存放 了 多 少 字 
对 程序 进行 的 修改 不 多 。 


本 次 的 bootpack.h 节 选 


struct TASK { 
CHH) 


char *cmdline; 


}; 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, int memtotal) 


{ 


CHH) 
task->cons = &cons; 
task->cmdline = cmdline; /# 这 里 ! */ 
CHH) 


} 


int *hrb api(int edi, int esi, int ebp, int esp, int 


ebx, int edx, int ecx, int eax) 


CRH) 
} else if (edx == 26) { 
i = @; 
for (;;) 4 
*( (char *) ebx + ds_base + i) = task- 


>cmdline[i]; 
if (task->cmdline[i] == 6) { 
break; 


if (i >= ecx) { 
break; 


好 ， 完 工 了 ， 很 简单 吧 ?” cmdline SJH Z!lstruct 
TASK 中 是 为 了 把 console_ task 的 cmdline 传 递 给 
hrb_api. 


|} ti yt | 
下 面 我 们 来 添加 apilib 的 函数 。 


api026.nas 广 选 


_api_cmdline: 3 int api_cmdline(char *buf, int 


maxsize); 


PUSH EBX 

MOV EDX, 26 

MOV ECX, [ESP+12 ] 3 maxsize 
MOV EBX, [ESP+8 ] ; buf 

INT 0x40 

POP EBX 

RET 


然后 我 们 来 编写 应 用 程序 ， 就 叫 type.c。 


type.c 


#include "“apilib.h" 


void HariMain(void) 


int fh; 
char c, cmdline[30], *p; 


api_cmdline(cmdline, 30); 
for (p = cmdline; *p > ' '; p++) { } /* 跳 过 之 前 的 
内 容 ， 直 到 遇 到 空格 */ 
for (; *p == ' '; p++) { } /* 跳 过 空格 */ 
fh = api_fopen(p); 
if (fh != @) { 
for (33) { 
if (api_fread(&c, 1, fh) == 0) { 
break; 


api_putchar(c); 


} 
} else { 
api_putstre@("File not found.\n"); 


} 
api_end(); 
} 


获取 命令 行内 容 之 后 进行 的 p 的 计算 可 能 不 容易 看 
明白， 所 以 我 们 稍微 讲解 一 下 。 


之 前 在 命令 行 窗口 中 ， 我 们 直接 指定 了 p = cmdline 
+ 5;， 这 是 为 了 跳 过 “type” 直 接 取 出 用 户 所 指定 的 文 
件 名 。 而 这 次 我 们 是 通过 应 用 程序 来 实现 的 ， 用 户 
完全 可 能 通过 “type.hrb 文件 名 ”这 种 形式 来 运行 ， 
这 样 一 来 我 们 束 不 是 跳 过 5 个 字符 ， 而 是 要 跳 过 9 个 
字符 了 。 上 此外， 用 户 也 是 可 以 改变 应 用 程序 名 称 
的 ， 例 如 可 以 改 成 像 Linux 那 样 的 cat.hrb。 


为 了 在 任何 情况 下 都 能 顺利 运行 程序 ， 我 们 要 逐 字 
该 取 cmdline 的 内 容 ， 遇 到 比 空 格 的 字符 编码 大 的 字 
符 连 续 出 现时 ， 将 它们 全 部 跳 过 ， 这 样 一 来 无 论 
是 “type”、 “type.hrb” 还 是 “cat” 都 可 以 跳 过 去 了 。 


跳 过 应 用 程序 名 之 后 ， 还 要 跳 过 空格 ， 然 后 我 们 惑 
可 以 将 文件 名 的 部 分 剥离 出 来 了 。 


我 们 来 “make run” 试 试看 。type.hrb 的 大 小 为 256 字 
节 ， 还 是 相当 小 的 ， 不 错 〈 如 果 用 汇编 语言 编写 的 


话 ， 应 该 还 能 更 小 吧 ) 。 运 行 也 很 成 功 ， 而 且 由 于 
这 是 一 个 应 用 程序 ， 还 可 以 在 中 途 强 制 结束 ， 撤 
化 ! 


5 十 


>type ipl 10.nas 
; hari 
; TAB=4 


type ipl10.nas 
运行 “type ipll0.nas” HY 的 情形 


另外 ， 由 于 去 反 了 type 命 令 的 功能 ， 操 作 系 统 核心 
的 haribote.sys 也 从 原来 的 33871 字 节 减 少 到 了 33716 
字 节 。 由 于 添加 了 新 的 API， 所 以 只 减少 了 155 字 
节 ， 不 过 整体 上 还 是 稍微 变 小 了 一 点 ， 也 不 错 啦 ! 


5 日 文 文字 显示 (1) Charib25e) 
<sup>1</sup> 


1 本 章 中 作者 为 大 家 讲解 了 如 何 实现 对 日 文 显示 
的 文 持 ， 由 于 本 书 涉 及 大 量 操作 系统 底层 功能 的 
实现 ， 可 谓 罕 一 发 而 动 全 身 ， 因 此 在 翻译 过 程 中 
我 们 原原本本 地 呈现 了 关于 日 文 显示 的 内 容 。 和 
中 文 一 样 ， 在 日 文中 也 有 大 量 的 汉字 ， 因 此 日 文 
显示 和 中 文 显示 实现 起 来 有 很 多 相似 的 地 方 ， 而 
且 中 文 显 示 比 日 文 显 示 在 实现 上 还 相对 简单 一 

些 。 我 们 在 相关 章节 中 补充 了 一 些 关 于 中 文 显示 
的 内 容 供 大 家 参考 ， 硕 望 大 家 本 痢 求同存异 的 原 
则 ， 能 够 对 相关 知识 有 一 个 更 加 深入 的 了 解 。 


我 们 终于 等 到 了 这 个 时 刻 ， 那 就 是 对 日 文 显 示 的 文 
持 ， 估 计 很 多 人 早 束 摩拳擦掌 有 盼 厦 实 现 这 个 功能 
IE, HKE RARE. A SCAN, ESET BES 
只 要 准备 好 相应 的 字库 束 好 J。 


如 果 将 字库 内 置 到 操作 系统 核心 中 的 话 ， 操 作 系 统 
会 变 得 很 大 ， 而 且 要 更 换 新 字体 时 还 必须 重新 make 
一 和 届 。 因 此 我 们 不 将 日 文字 库 内 置 到 haribote.sys 
中 ， 而 是 单独 生成 一 个 名 叫 nihongo.fnt 的 文件 ， 

在 “ 纸 娃娃 系统 ”局 动 时 先 检 栓 是 侣 存在 该 文件 ， 如 


果 存 在 则 自动 将 其 读 入 内 存 。 
E E EEA 


那么 这 样 一 个 字库 文件 到 搬 有 多 大 呢 ? 我 们 人 不妨 来 
计算 一 下 。 日 文 的 字符 基本 上 都 是 用 全 角 来 显示 
的 ， 相 对 于 8 x 16 点 阵 的 半角 字符 来 说 ，1 个 全 角 字 
符 的 大 小 为 16x16 点 阵 。 如 条 1 个 半角 字符 的 字库 数 
据 需 要 16 字 节 的 话 ， 那 么 1 个 全 角 字 符 融 需要 32 字 
市 。 


日 文 汉字 编码 表 按照 使 用 频率 分 类 ， 常 用 的 汉字 为 
第 一 水 准 ， 侦 尔 使 用 的 汉字 为 第 二 水 准 ， 基 本 上 不 
会 用 到 的 汉字 为 第 三 水 准 ， 用 得 更 少 的 为 第 四 水 准 
这样 的 分 关 是 以 总 体 使 用 情况 为 基准 的 ， 如 果 你 
的 名 字 或 者 住址 里 面 用 到 了 第 四 水 准 汉 字 ， 那 对 于 
A o 
况 哦 ) 。 


在 JIS 制 定 的 汉字 编码 表 中 ， 非 汉字 加 上 第 一 水 准 汉 
字 一 第 三 水 准 汉 字 一 共有 94x94 二 8836 个 字符 (再 
加 上 第 四 水 准 汉 字 的 话 束 更 多 了 ) 。 如 果 我 们 要 用 
上 所 有 的 这 8836 个 字符 的 话 ， 束 需要 32x8836 二 
282752 字 节 的 容量 ， 也 就 是 276KB! ? 


2 在 中 文 汉字 编码 标准 GB2312 中 ， 也 按照 汉字 的 


常用 度 划 分 了 一 级 汉字 和 二 级 汉字 ， 其 中 一 级 汉 
字 3755 人 个， 二 级 汉字 3008 人 个， 再 加 上 非 汉 字 〈 拉 
本 字母、 和 希腊 字母 等 ) 字符 682 个 ， 一 共有 7445 个 
字符 ， 基 本 上 与 上 述 JIS 编 码 中 非 汉 字 加 第 一 一 第 
三 水 准 汉 字 的 容量 相当 。 一 一 译 者 注 


276KB 实 在 是 太 大 了 ， 虽 然 这 个 大 小 还 能 够 装 进 软 
时， 但 差不多 消耗 了 软盘 总 容量 的 20%。 这 人 么 大 的 
文件 ， 用 type ip110.nas 是 不 行 了 ， 必 须要 在 局 动 时 
该 取 更 多 的 局 区 ， 可 这 样 一 来 在 芮 机 环境 下 的 局 动 
和 骂 了 ， 看 来 我 们 必须 要 给 字库 文件 瘦 瘦 


根据 JIS 规 格 ， 全 角 字 符 的 编码 以 “点 、 区 、 面 ”为 单 
位 来 进行 定义 ， 点 和 区 的 关系 类 似 于 几 号 楼 几 单 
元 ， 比 如 说 “3 号 楼 4 单元 ”可 以 类 比 成 “3 区 4 点 ”， 而 
面 则 是 比 它 们 更 大 的 一 个 单位 。 

。 1 个 点 束 对 应 1 个 全 角 字 符 

。 1 个 区 中 包含 94 个 点 

。 1 个 面 中 包含 94 个 区 


一 水 惟一 第 三 水 准 全 部 位 于 1 面 ， 第 四 水 准 全 


部 位 于 2 面 3 


3 这 一 段 是 不 是 有 点 看 不 懂 呢 ? 其 实 以 前 的 编码 
表示 方法 更 加 简单 一 些 。 例 如 , “H” GE: AM 
PRZ, BEW) 这 个 字 
0x2422, “ 川 ” 的 编码 为 0x406e， 这 种 方法 比较 简 
单 吧 ， 因 为 每 一 个 字符 都 有 它 对 应 的 一 个 编号 。 
但 现在 我 们 所 使 用 的 表示 方法 和 以 前 不 同 ， 按 照 
e 的 方法 ,， “为” 的 字符 编码 为 1 面 04 区 02 
，“ 咱 ”的 字符 编码 为 1 面 32 区 78 点 。 


其 实 将 以 前 的 编码 转换 为 现在 的 编码 也 不 难 ， 只 
要 将 二 进 制 的 4 位 数字 编码 中 前 两 位 和 后 两 位 拆 
开 ， 再 各 目 减 摊 0x20 就 可 以 了 。 例 如 “加 ?是 
0x2422， 转 换 后 得 到 0x04、0x02， 将 这 两 个 数字 
转换 为 10 进 制 束 分 别 对 应 了 区 号 和 点 写 。“ 川 ”也 
一 样 ， 将 0x406e 拆 开 并 各 目 减 挥 0x20， 得 到 0x20 
和 0x4e， 因 此 是 32 区 78 点 。 


字符 编码 大 致 可 分 为 下 面 几 类 。 
01 区 一 13 区 : 非 汉字 

14 区 一 15 区 : 第 三 水 准 汉字 
16 区 一 47 区 : 第 一 水 准 汉字 


48 区 一 84 区 : 第 二 水 准 汉 字 


84 区 一 94 区 : 第 三 水 准 汉 字 4 


4 有 人 可 能 会 问 ，84 区 不 是 已 经 包 售 在 第 二 水 准 
汉字 中 了 吗 ? 这 里 再 补充 说 明 一 下 ， 根 据 定 义 ， 
84 区 前 面 为 第 二 水 准 汉字 ， 后 面 为 第 三 水 准 汉 
= 


这 次 我 们 为 了 节省 容量 ， 准 备 只 将 01 区 一 47 区 闭 入 
nihongo.fnt 中 ， 这 样 的 话 就 只 需要 47x94x32 三 
141376 字 市 ， 也 就 是 之 前 的 差不多 一 半 大 小 ， 启 动 
时 间 也 应 该 不 会 很 长 了 。 如 果 大 家 觉得 这 样 不 好 ， 
想 要 把 第 二 、 第 三 水 准 汉字 也 全 部 显示 出 来 的 话 ， 
不 要 客气 ， 欢 迎 大 胆 改造 哦 。。 


? 在 GB2312 汉 字 标 准 中 ， 字 符 的 定位 也 是 采用 类 
似 日 文 “点 区 面 * 的 方式 ， 不 过 GB2312 中 没有 面 的 
概念 (或 者 可 以 说 ，GB2312 的 字符 集 只 有 1 个 

面 ) ， 而 区 和 点 我 们 称 为 “区 位 >， 和 日 文 一 样 ， 

每 个 区 包含 94 个 位 〈 即 94 个 字符 ) ， 例 如 “ 啊 ” 字 
位 于 16 区 1 位 。GB2312 中 的 字符 也 可 以 采用 二 进 
制 编码 的 方式 来 表示 ， 相 对 于 日 文 JS 标准 中 将 区 
和 点 的 编号 加 上 0x20 的 做 法 ，GB2312 中 是 将 区 和 
位 的 编写 加 上 0xa0， 例 如 “ 啊 ” 字 区 位 编码 加 上 

0xa0 后 为 : 0x10 (16) +0xa0=Oxb0, 0x01 (1) 


十 0xa0 王 0xal， 因 此 “ 啊 ?" 字 的 二 进 制 字符 编码 为 
Oxb0al. 详 者 注 


在 GB2312 中 ， 和 字符 编码 的 分 类 如 下 : 

01 区 一 09 区 : 非 汉 字 

10 区 一 15 区 : 空白 

16 区 一 55 区 : 一 级 汉字 

56 区 一 87 区 : 二 级 汉字 

88 区 一 94 区 : 空白 

如 果 为 了 节省 容量 ， 我 们 可 以 只 使 用 非 汉 字 和 一 级 


汉字 的 部 分 ， 即 01 区 一 55 区 的 部 分 ， 一 共 需 要 
55x94x32 一 165440 字 节 。 


接 下 来 我 们 需要 考虑 的 就 是 字库 的 字模 数据 。 即 便 
我 们 只 选用 01 区 一 47 区 ， 其 中 也 包括 了 47x94 三 
4418 个 字符 。 如 果 要 一 个 一 个 字符 去 设计 字模 的 
话 ， 那 比 编写 一 个 操作 系统 还 要 花 时 间 。 因 此 这 次 
我 们 还 是 和 当初 的 半角 字库 一 样 ， 直 接 从 笔者 正在 
开发 的 OSASK 中 借用 字模 吧 (OSASK 的 日 文字 库 


版 权 属 于 泪 何 水 和 壮 人 [Kiyoto])。 


SASK 中 的 字库 文件 为 jpn16v00.fnt， 大 小 为 

304KB。 不 过 OSASK 和 *“ 纸 娃娃 系统 ”一 样 ， 都 是 以 

安装 在 软盘 上 使 用 为 前 提 而 设计 的 ，304KB 对 于 软 

盘 来 说 负担 重 了 些 ， 因 此 在 OSASK 中 将 这 个 文件 进 

行 了 压缩 ， 大 小 变 成 了 56.7KB5。 于 是 我 们 首先 需 

a 否则 我 们 无 法 拿 到 里 面 
据 ) 


0 jpn16v00.fnt 分 为 两 个 版 本 ， 一 个 只 包含 第 一 水 
HED, A TEE Mo — 到 第 三 水 准 的 全 部 汉 
字 ，56.7KB 的 是 只 包含 第 一 水 准 汉 字 的 版 本 ，48 
区 94 区 的 内 容 是 空 和 的 ， 


笔者 编写 的 大 多 数 工 具 程 序 中 都 内 四 了 解压 缩 的 功 
能 ， 随 便 使 用 任何 一 个 工具 都 可 以 完成 解压 绑 的 操 
作 ， 这 次 我 们 以 edimg 为 例 。 


提示 符 > edimg copy nocmp: from:jpn16v00.fnt 
to:jpn16v00.bin 


(这 里 没有 考虑 文件 路 径 ， 请 大 家 根据 需要 自行 加 
上 路 径 ) 


好 ， 这 样 我 们 就 得 到 了 304KB 的 jpn16v00.bin 文 件 。 


下 面 我 们 将 01 区 一 47 区 的 字模 数据 提取 出 来 ， 只 要 
将 jpn16v00.bin 从 开头 算 起 的 前 141376 字 市 提取 出 
来 就 可 以 了 ， 用 二 进 制 编 辑 器 可 以 轻松 搞定 。 


说 起 日 文 显示 ， 我 们 还 需要 半角 片 假 名 的 字库 。 可 
能 有 人 会 说 ， 我 从 来 不 用 半角 片 假名 。 不 过 ， 能 显 
示 总 比 不 能 显示 要 好 吧 ， 上 所 以 我 们 还 需要 提取 半角 
片 假 名 的 字模 数据 。 在 jpn16v00.bin 中 已 经 包含 了 
显示 日 文 用 的 半角 所 假名 字模 ， 总 共 256 个 字符 ， 
Ni FO04A000~04AFFF, #4096% 75. 


最 终 nihongo.fnt 的 内 容 如 下 。 


666666 一 666FFF: 显示 日 文 用 半角 字模 ， 共 256 
个 字符 (4096 字 节 ) 


001000~02383F: 显示 日 文 用 全 角 字 模 ， 共 4418 
个 字符 (141376 字 节 ) 


至 于 提取 数 据 的 方法 啉 ， 其 实 笔者 束 是 用 二 进 制 编 
辑 器 复制 粘贴 的 〈 笑 ) 。 虽 然 可 能 有 更 棒 的 工具 来 
做 这 件 事 ， 不 过 笔者 认为 没 必 要 在 这 种 事情 上 和 面 花 


太 多 心思 。 


《5 分 钟 之 后 ) 完工 啦 ， 不 错 不 错 。 


7 由 于 作者 开发 的 OSASK 系 统 中 并 不 包含 中 文字 
库 ， 各 位 读者 如 果 和 需要 改造 源 代码 以 实现 中 文 显 
示 的 支持 ， 则 需要 获取 一 个 符合 GB2312 标 准 的 中 
文 点 阵 字 库 文 件 〈 例 如 UCDOS 中 包含 的 
HZK16) ， 并 提取 前 165440 字 节制 作成 一 个 仅 包 
含 一 级 汉字 的 子 集 。 由 于 汉字 显示 不 需要 涉及 半 
角 所 假名 的 问题 ， 因 此 最 终 在 “ 纸 娃娃 系统 ”中 所 
使 用 的 .fnt 文 件 中 000000 一 000FFF 的 256 个 半角 字 
符 部 分 ， 我 们 可 以 直接 使 用 5.5 节 中 生成 的 字模 数 
据 〈 即 “ 纸 娃 娃 系 统 ” 的 内 置 英文 字库 ) 。 综 上 所 
述 ， 要 实现 中 文 显 示 ， 所 需 的 .fnt 文 件 结构 可 以 是 
下 面 这 样 : 

000000 一 000FFF: 英文 半角 字模 ， 共 256 个 字符 
(40967) ， 来 目 系 统 内 置 字库 数据 


001000 一 02963F: 中 文 全 角 字 模 ， 共 5170 个 字符 
(165440 字 节 ) ， 来 自 HZK16 或 其 他 符合 GB2312 
标准 的 汉字 点 阵 字库 


接 下 来 ， 我 们 需要 修改 bootpack.c， 使 操作 系统 可 
以 目 动 装载 字库 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


CHH) 

int *fat; 

unsigned char *nihongo; 
struct FILEINFO *finfo; 
extern char hankaku[4696 ; 


CHH) 


/*#% A nihongo. fnt */ 
nihongo = (unsigned char *) memman_alloc_4k(memman, 
16 * 256 + 32 * 94 * 47); 
fat = (int *) memman_alloc_4k(memman, 4 * 2880); 
file_readfat(fat, (unsigned char *) (ADR_DISKIMG + 
0x000200) ) ; 
finfo = file_search("nihongo. fnt", (struct FILEINFO 
*) (ADR_DISKIMG + 0x002600), 224); 
if (finfo != 0) { 
file loadfile(finfo->clustno, finfo->size, 
nihongo, fat, (char *) (ADR_DISKIMG + 0x0@@3e@0) ); 
} else { 
for (i = ð; i < 16 * 256; i++) { 
nihongo[i] = hankaku[i]; /* 没 有 字库 ， 半 和 角 部 分 
直接 复制 英文 字库 */ 
} 
for (i = 16 * 256; i < 16 * 256 + 32 * 94 * 47; 


i++) { 
nihongo[i] = Oxff; /* 没 有 字库 ， 全 角 部 分 以 8@xff 
填充 */ 
} 
} 
*((int *) @x@fe8) = (int) nihongo; 
memman_free_4k(memman, (int) fat, 4 * 2880); 


中略 ) 
} 


首先 分 配 出 用 于 存放 nihongo.fnt 内 容 的 内 存 空间 ， 
然后 寻找 文件 ， 如 果 找 到 的 话 则 载 入 内 存 。 如 果 没 
有 找到 字库 文件 ， 则 只 好 用 内 置 的 半角 字库 代 蔡 日 
文 半角 字库 ， 并 用 方块 填充 全 角 字 库 的 部 分 。 最 
后 ， 将 用 于 存放 nihongo.fnt 内 容 的 内 存 地 址 写 入 
0x0fe8 作 为 记录 。 


下 面 我 们 该 实现 用 日 文字 库 来 显示 字符 了 。 字 符 显 
示 是 由 graphic.c 中 的 putfonts8_asc 来 负责 的 ， 所 以 我 
们 就 先 修改 这 里 吧 。 


本 次 的 bootpack.h 节 选 


struct TASK { 
《中略 ) 


char langmode; 


}; 


本 次 的 graphic.c 节 选 


void putfonts8 asc(char *vram, int xsize, int x, int y, 
char c, unsigned char *s) 
{ 
extern char hankaku[ 4096] ; 
/* 这 里 没有 修改 */ 


struct TASK *task = task_now(); 
char *nihongo = (char *) *((int *) @x@fe8); 


if (task->langmode == @) { 
for (; *s != 0x00; s++) { 
/* 从 这 里 起 没有 修改 */ 
putfont8(vram, xsize, x, y, c, hankaku + *s 
* 16); 
x += 8; 


} 
/* 到 这 里 为 止 没 有 修改 */ 


if (task->langmode == 1) { 
for (; *s != 0x00; s++) { 
putfont8(vram, xsize, x, y, c, nihongo + *s 
* 16); 
x += 8; 


} 


} 


return; 
/* 这 里 没有 修改 */ 
} 


我 们 在 struct TASK 里 添加 了 一 个 langmode《〈 即 
language mode， 语 言 模式 ) 变量 ， 用 于 指定 一 个 任 
务 是 使 用 内 置 的 英文 字库 还 是 使 用 nihongo.fnt 的 日 
文字 库 。 通 过 在 struct TASK 中 添加 这 个 变量 ， 我 们 
可 以 对 每 个 任务 单独 设置 语言 模式 ， 例 如 为 某 个 应 
用 程序 设置 日 文 模式 ， 而 为 男 一 个 应 用 程序 设置 严 
文 模式 。 


既然 我 们 设计 了 这 个 语言 模式 的 变量 ， 那 么 残 需 要 
一 个 命令 来 对 模式 进行 设 定 。 


本 次 的 console.c 节 选 


void cons runcmd(char *cmdline, struct CONSOLE *cons, 
int *fat, int memtotal) 


中略) 
} else if (strncmp(cmdline, "langmode ", 9) == @) { 
cmd_langmode(cons, cmdline) ; 
} else if (cmdline[0] != ð) { 
CHH) 
} 


void cmd langmode(struct CONSOLE *cons, char *cmdline) 


{ 
struct TASK *task = task_now(); 


unsigned char mode = cmdline[9] - 
if (mode <= 1) { 
task->langmode = mode; 
} else { 
cons_putstr@(cons, "mode number error.\n"); 
} 
cons_newline(cons) ; 
return; 


完工 了 ， 现 在 只 要 输入 "angmode 0” 束 代表 设 定 为 
英文 模式 ， 和 输入 "langmode 1” 束 代表 设 定 为 日 文 模 
Bus 


不 过 ， 在 命令 行 窗口 启动 时 没有 设 定 langmode， 这 
有 点 不 方便 ， 我 们 来 设 定 一 个 默认 值 。 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, int memtotal) 


中略) 
unsigned char *nihongo = (char *) *((int *) 
OXxofe8 ; 


CHH) 
if (nihongo[4696] != Oxff) { /# 是 合 载 入 了 日 文字 


Ee ee | 
task->langmode = 1; 
} else { 
task->langmode = @; 


} 
中略) 


这 样 一 来 ， 当 成 功 载 入 日 文字 库 时 ， 默 认 值 为 日 文 
模式 ， 人 否则 默认 为 瑞 文 模式 。 要 想 知 道 是 否 成 功 载 
入 了 日 文字 库 ， 只 要 判断 01 区 01 点 的 内 容 就 可 以 
了 。 如 果 没 有 载 入 字库 ， 这 里 应 该 是 填充 了 0xff， 
如 果 载 入 了 字库 ， 那 么 由 于 01 区 01 点 所 对 应 的 字符 
是 全 角 空格 ， 因 此 这 里 应 该 是 0x00。 


到 这 ， BUN PAE KDI IMS 不 过 task_a 的 
langmode 还 没 设 定 ， 因 此 我 们 再 稍微 修改 一 下 


HariMain. 
本 次 的 bootpack.c 节 选 
void HariMain(void) 
中略) 
init_palette(); 


shtctl = shtctl_init(memman, binfo->vram, binfo- 
>scrnx, binfo->scrny); 


task_a = task_init(memman) ; 
fifo.task = task_a; 
task_run(task_a, 1, 2); 

*((int *) O@x@fe4) = (int) shtctl; 
task_a->langmode 


RE 


CHH) 


x tF taska wre Ape PETE So 


下 面 我 们 可 以 开始 编号 用 来 测试 的 应 用 程序 了 ， 只 
是 现在 我 们 还 无 法 显示 全 角 字 符 ， 只 能 显示 半角 字 
符 。 不 过 即便 如 此 ， 我 们 也 可 以 测试 出 是 否 能 成 功 


载 入 nihongo.fnt (全角 字符 的 显示 在 下 一 节 实 
现 ) 。 


由 于 只 能 显示 半角 字符 ， 因 此 我 们 来 显示 几 个 半角 
PARAS N= ARN h” GE: 读 作 I RO HA HI 
HO HE TO， 是 日 本 平安 时 代 诗 歌 《 伊 吕 波 歌 》 的 
O Ie. 


iroha.c 
#include "“apilib.h" 
void HariMain(void) 


{ 
static char s[9] = { @xb2, Oxdb, Oxca, Oxc6, Oxce, 


@xcd, Oxc4, Ox@a, 0x00 }; 
/#* 半 角 片 假名 了 上 口 和 三 本 人 下 的 字符 编码 + 换行 +8 */ 
api_putstr@(s); 
api_end(); 


FE IX “SEP A BT PH H AHRR R 
示 字 符 串 ， 有 人 可 能 会 资 ， 那 为 啥 不 直接 与 成 下 面 
这 样 呢 ? 


api_putstr@(“40N\= 森 ^k\n”); 


这 样 写 的 话 在 Windows 中 可 能 没 问 题 ， 但 在 Linux 中 
可 能 就 不 行 了 。 准 确 地 说 ， 其 实 这 并 不 是 操作 系统 
的 问题 ， 而 是 字符 编码 方式 的 问题 。 


说 到 底 ， 字 符 串 束 是 一 串 按 顺序 排列 的 字符 编码 ， 
而 对 于 半角 所 假名 应 该 研 子 怎样 的 编码 ， 有 着 不 同 
Wane. FE Windows is FAA) “Shift-JIS’? 4a, =F 
FAIS NS AA RTFM] F Be 
一 样 ， 但 在 Linux 篆 用 的 “日 文 EUC” 编 码 中 ， 则 变 成 
了 形 如 0x8e, Oxb2, 0x8e, 0xdb, 0x8e, Oxca, 0x8e, 
Oxc6, ... 这 样 的 排列 ， 即 在 每 个 半角 片 假 名 前 都 加 
Es —~*0x8e. 


8 其 实 “Shift-JIS“ 这 个 名 称 是 不 正确 的 ， 准 确 名 称 
应 该 是 “MS 汉字 编码 “”， 不 过 反倒 是 “Shift-JIS“ 的 
使 用 最 广泛 。 


最 近 出 现 了 一 些 功 能 强大 的 文本 编辑 器 ， 可 以 选择 
EUC 编 码 保 存 ， 而 在 Linux 中 也 可 以 按 Shift-JIS 编 码 
保存 了 ， 所 以 刚刚 我 们 也 说 了 ， 这 并 不 完全 是 操作 
系统 的 问题 。 


因此 ， 如 果 直 接 写 成 <MS Mincho2” 的 话 ， 根 据 字 
和 从 编码 方式 的 不 同 ， 最 终 形成 的 字符 串 (数值 的 排 
列 ) 也 会 不 同 ， 所 以 我 们 需要 用 二 进 制 数字 逐个 来 
写 出 字符 的 编码 ， 这 样 一 来 ， 即 便 在 Linux 下 make 
er 也 应 该 可 以 得 到 完全 相同 的 可 执行 文 


好 了 ， 我 们 来 “make run” 试 试看 。 能 不 能 成 功 呢 ? 
我 们 已 经 修改 了 Makefile， 将 nihongo.fnt 加 入 到 磁盘 
映像 中 了 ， 因 此 默认 的 语言 模式 应 该 是 日 文 模式 。 
哦 哦 ， 显 示 出 来 了 ! 


如 末 我 们 先 执行 "angmode 0” 然 后 再 运行 iroha.hrb 的 
话 ， 束 会 显示 出 下 面 这 样 的 乱码 ， 这 也 验证 了 我 们 
编 与 的 程序 成 功 运行 了 ， 撒 人 花 ! 


Paa 
ar | 


console 
>iroha 
DIE 
as 


成 功 显示 出 了 半角 片 假名 ! 


| 


5 aes 存在 像 日 文 半 角 乒 假名 这 样 的 特殊 字 
， 所 以 我 们 不 需要 考虑 这 个 问题 。 不 过 ， 本 市 
中 提 到 的 由 于 文字 编码 方式 不 同 导致 实际 生成 的 
字符 编码 数据 不 同 的 问题 ， 在 中 文中 也 是 存在 
的 。 例 如 简体 中 文 的 GB2312 和 繁体 中 文 的 BIG5 
束 是 两 种 不 同 的 编码 方式 ， 相 互 之 间 不 能 兼容 。 
本 节 中 提 到 的 EUC 实际 上 是 “Extended Unix 
Code” 的 缩写 ， 是 一 种 为 了 让 中 日 圩 文字 能 够 兼容 
ASCII 编 码 而 提出 的 一 种 兼容 编码 方式 ， 
GB2312 〈 以 及 后 来 的 GB18030) 都 属于 EUC 方 
式 ， 而 Shift-JIS 则 不 属于 EUC 方 式 。 


6 日 文 文字 显示 (2) (harib25f) 


好 啦 ， 接 下 来 我 们 该 挑战 全 角 字 符 的 显示 了 。 在 全 
角 字 符 显 示 方 面 ，Shift-JIS 和 日 文 EUC 的 处 理 方法 
是 不 同 的 ， 我 们 先 从 Shift-JIS 开 始 。 


各 种 半角 字符 ， 包 括 字 母 、 数 字 、 符 号 、 太 假名 
等 ， 加 起 来 总 的 字符 数 也 不 是 很 多 ， 用 1 个 字 节 完 
全 可 以 容纳 ， 不 过 汉字 就 不 行 了， 汉字 需要 使 用 2 
个 字 节 来 表示 在 攻 些 编码 方式 中 ， 甚 至 会 使 用 3 
个 其 全 更 多 的 字 节 来 表示 〉。 


例如 “加 ”在 Shift-JIS 中 的 编码 为 0x82、0xa0 两 个 字 
节 。 只 要 用 文本 编辑 器 输入 一 个 “加 ”并 保存 ， 再 用 
二 进 制 编辑 器 打开 就 能 看 到 这 个 编码 了 〈 注 : 在 中 
文系 统 下 ， 需 要 用 支持 选择 编码 方式 的 文本 编辑 

器 ， 并 选择 用 Shift-JIS 编 码 保存 〉。 下 面 我 们 来 讲 
解 一 下 如 何 将 0x82、0xa0 这 两 个 字 节 的 编码 转换 为 
区 点 的 编号 。 


我 们 先 来 看 第 一 个 字 节 。 如 果 这 个 字 节 为 0x81， 则 
代表 01 区 或 02 区 ; 0x82 则 代表 03 区 或 04 区 ; 0x83 则 
代表 05 区 或 06 区 ...... 我 们 把 规则 整理 成 下 面 这 张 


表 ， 顺 便 将 0x00 一 0x7f 也 加 进去 了 。 
Shift-JIS 的 第 一 个 字 节 


SS 


3| à 


Oxdd | 半角 片 假名 〈“y>”) 
| Oxde | 半角 片 假名 OO) 
半角 片 假 名 〈“”) 
字符 〈1 面 63 区 一 64 
全 角 字 符 〈1 面 65 区 一 66 
字符 〈1 面 67 区 一 68 
符 〈 空 格 ) CHE) 
符 E 
符 C) | Oxee | 全 角 字 符 (1 面 91 区 ~92 区 ) 
GHIS) 全 角 字 符 (1 面 93 区 ~94 区 ) 
OP) 全 角 字 答 区 ) 
ff im) 4 


4t| de] 4 


az 


wlk 
= 


| a 


Py 


Pet PH 


字 
字 
SRNR 


Efi 


z| a] | 
St] dt] se] 42 


2 


WY 


符 〈1 面 01 区 一 02 


at | | 


>| > 
ae | SF 


LCE 

字符 〈2 面 83 区 一 84 区 ) 
( 
字符 〈2 面 89 区 一 90 
村 (1 面 59 全 角 字 符 〈2 面 91 区 一 92 
村 (1 面 61 全 角 字 符 〈2 面 93 区 一 94 


段 名 Cir) 
RZ (S) 


接 下 来 是 第 二 个 字 节 ， 如 下 表 。 
Shift-JIS 的 第 二 个 字 节 


全 角 字 符 《〈 较 小 的 区 的 65 


0x00 | 不 使 用 0x81 | 点 ) 


0x02 不 合用 | nc. O O 


角 字 符 〈 较 小 的 区 
全 角 字 符 〈 较 小 的 区 


0x42 | 全 角 字 符 ( 较 小 的 区 


全 角 字 符 《〈 较 大 的 区 的 92 


TARR ANEKO 


0x7d 


字符 《〈 较 小 的 区 


参照 上 面 的 两 张 表 ， 我 们 就 可 以 得 到 “为 ”的 编 公 
0x82、0xa0 对 应 04 区 02 点 。 


知道 了 区 点 编号 我 们 就 可 以 计算 出 字模 的 内 存 地 
址 ， 再 显示 出 来 也 束 很 容易 了 。 


我 们 来 修改 一 下 操作 系统 吧 。 


本 次 的 graphic.c 节 选 


void putfonts8_asc(char *vram, int xsize, int x, int y, 
char c, unsigned char *s) 


{ 


extern char hankaku[4696 ; 

struct TASK *task = task_now(); 

char *nihongo = (char *) *((int *) @x@fe8), *font; 
/* 从 此 开始 */ 

int k, t; 
/* 到 此 结束 */ 


if (task->langmode == 86) { 
for (; *s != 0x00; s++) { 
putfont8(vram, xsize, x, y, c, hankaku + *s 
* 16); 
x += 8; 
} 
} 
if (task->langmode == 1) { 
for (; *s != 0x00; s++) { 
if (task->langbyte1 == @) { 
/* 从 此 开始 */ 
if ((6x81 <= *s && *s <= Ox9f) || (Əxeð 
<= *s && *s <= Oxfc)) { 
task->langbytel1 = *s; 
} else { 
putfont8(vram, xsize, X, Yy, C, 
nihongo + *s * 16); 
} 
} else { 
if (0x81 <= task->langbyte1 && task- 
>langbyte1 <= @x9f) { 


k = (task->langbyte1 - @x81) * 2; 
} else { 
k = (task->langbyte1 - @xe@) * 2 + 


62; 
} 
if (0x40 <= *s && *s <= Ox7e) { 
t = *s - 0x40; 
} else if (0x80 <= *s && *s <= Ox9e) { 
t = *s - 0x80 + 63; 
} else { 
t = *s - Ox9Ff; 
k++; 
} 
task->langbytel = Q; 
font = nihongo + 256 * 16 + (k * 94 + 
t) * 32; 


PEN putfont8(vram, xsize, x - 8, y, c, font 
)3 JAER", 
putfont8(vram, xsize, x >» Y, C, font 


+ 16); /* 右 半 部 分 */ 
} 
/* 到 此 结束 */ 


x += 8; 


} 


} 


return; 


本 次 的 bootpack.h 节 选 


struct TASK { 
CHH) 


unsigned char langmode, langbyte1; 


}; 


这 里 的 变量 k 用 来 存放 区 号 ， 变 量 t 用 来 存放 点 号 ， 
为 了 方便 计算 ， 我 们 存放 的 是 减 1 之 后 的 值 。 由 于 
我 们 没有 考虑 第 2 面 的 字符 ， 因 此 如 果 以 后 要 文 持 
第 四 水 准 汉字 会 比较 雄 烦 ， 不 过 要 文 持 第 二 和 第 三 
水 准 汉 字 还 是 比较 容易 的 ， 只 要 修改 载 入 
nihongo.fnt 的 部 分 束 可 以 了 。 


struct TASK 中 的 langbytel 是 当 接 收 到 全 角 字 符 时 用 
来 存放 第 1 个 字 贡 内容 的 变量 。 当 接收 到 半角 字 
侍 ， 或 者 全 角 字 符 显 示 完 成 之 后 ， 该 变量 被 置 为 
0. 


putfonts8_asc 中 每 接收 到 1 个 字 节 就 会 执行 Xx += 8;， 
当 显 示 全 角 字 符 时 ， 需 要 在 接收 到 第 2 个 字 市 之 
后 ， 再 往 左 回 移 8 个 像 系 并 绘制 字模 的 左 半 部 分 。 


采用 这 种 方式 时 ， 如 末 一 开始 langbytel 不 置 为 0， 
显示 就 会 出 问题 ， 因 此 我 们 还 需要 再 修改 一 下 
console.c. 


本 次 的 console.c 节 选 


void console task(struct SHEET *sheet, int memtotal) 


CHH) 
if (nihongo[4696] != Oxff) { /# 是 合 载 入 了 日 文字 
库 ? */ 


task->langmode = 1; 


} else { 
task->langmode = @; 
} 
task->langbyte1 = 6; i 
A / 
CHH) 
} 


int cmd app(struct CONSOLE *cons, int *fat, char 
*cmdline) 


CHH) 
if (finfo != 6) { 
/* 找 到 文件 的 情况 */ 
CHH) 


if (finfo->size >= 36 && strncmp(p + 4, "Hari", 
A) == 6 && *p == 0x00) { 
CHH ) 
start_app(@x1b, © * 8 + 4, esp, 1 * 8 +4, 
&(task->tss.esp@) ); 
CHH ) 
timer_cancelall(&task->fifo) ; 
memman_free_4k(memman, (int) q, segsiz); 
task->langbyte1 = ð; 
a Oe 
} else { 
cons_putstr@(cons, ".hrb file format 
error.\n"); 


} 
(中 上 略 )》 
} 
(中 上 略 ) 


对 console_task 所 做 的 修改 只 是 在 决定 langmode 默 认 
值 时 顺便 将 langbyte1 置 为 0 而 已 。 


当 程 序 出 现 bug 或 者 强制 结束 时 可 能 出 现在 显示 全 
角 字 符 第 1 个 字 节 时 停止 的 情况 ， 而 对 cmd_app 所 做 
的 修改 束 是 为 了 应 对 这 种 情况 。 


不 过 换行 还 有 一 点 问题 ， 当 字符 串 很 长 时 ， 可 能 在 
全 角 字 符 的 第 1 个 字 节 处 就 遇 到 目 动 换行 了 ， 这 样 

一 来 当 收 到 第 2 个 字 节 时 ， 字 模 的 左 半 部 分 惑 会 男 

到 命令 行 窗 口外 面 去 。 所 以 我 们 在 过 到 第 1 个 字 节 

换行 时 ， 可 以 特意 将 cur_ x 再 右 移 8 个 像素 。 


本 次 的 console.c 节 选 


void cons_newline(struct CONSOLE *cons) 


{ 


int x, y; 
struct SHEET *sheet = cons->sht; 
struct TASK *task = task_now(); 
A ey 
if (cons->cur_y < 28 + 112) { 
cons->cur_y += 16; /* 到 下 一 行 */ 


} else { 
/* 屏 幕 滚动 */ 
(中 上 略 ) 
} 


cons->cur x = 8; 
if (task->langmode == 1 && task->langbyte1 != 6) { 
/* 从 此 开始 */ 


cons->cur x += 8; 


} 
/* 到 此 结束 */ 


return; 


完工 了 ， 我 们 来 “make run” 试 试看 。 虽 然 没 有 编写 
用 于 测试 的 应 用 程序 ， 不 过 我 们 可 以 执行 “type 


ipl10.nas”， 如 果 显 示 出 日 文 束 算 成 功 喀 。....….. 出 来 
nh ! 


_ RESB Ox?dfe-$ 
; Oxidfe# TOKT hs 


DB 0x55, Oxaa 


ZRF ab 7s HH Ae 


不 过 现在 高 兴 还 太 早 了 ， 仔 细 看 看 画面 就 发 现 有 什 
么 地 方 不 对 ， 为 什么 “ 埋 ” 这 个 汉字 没有 显示 出 来 
呢 ? k 和 t 的 计算 应 该 没有 问题 啊 ， 咽 ...... 


哦 对 了 了， 一定 是 nihongo.fnt 文 件 太 大 ， 用 ipl10.nas 无 
法 全 部 载 入 。 咽 ， 一 定 是 这 样 ! 


7 日 文 文字 显示 (3) (harib25g) 


为 了 解决 这 个 问题 ， 我 们 先 来 写 一 个 ip120.nas 蔡 换 
原来 的 ipl10.nas， 只 要 将 最 开头 的 地 方 修改 一 下 束 
好 了 。 

ipl20.nas 7 iz 

CYLS EQU 20 ; 要 载 入 多 少数 据 


的 “ipl10” th, 2 换 成 *ip120>” 哦 。 


我 们 再 来 “make run” 一 下 ， 输 入 “type ipl20.nas”。 
mR, HORS, MEETRI] 


_ RESB 
等 下 


| 


Oxyd fe-$ a 
% 0x00 GiB th 4 aa 


DB 0x55, xaa 


汉字 也 显示 出 来 了 ! 
好 ， 下 面 我 们 来 为 Linux 用 户 实现 对 日 文 EUC 的 支 


FE. WR, CABS? 算 了 ， 不 管 了 ， 人 
EBRR, UR NA EK o 


如 果 不 考 虑 对 半角 片 假 名 的 支持 ， 日 文 EUC 比 Shift- 
JIS 要 简单 。EUC 中 半角 片 假 名 占用 2 个 字 节 ， 但 却 
是 一 个 半角 字符 ， 字 节 数 与 字符 宽度 不 匹配 ， 而 我 
们 目前 还 没有 考虑 这 种 情况 ， 所 以 要 文 持 半角 片 假 
名 束 得 做 很 多 改动 才 行 ， 太 厅 烦 了 ， 这 次 就 算 了 
吧 ， 反 正在 EUC 中 也 不 怎么 用 半角 片 假 名 ， 应 该 没 
什么 问题 。 


日 文 EUC 中 k 和 t 的 计算 公式 很 简单 。 


k 
t 


langbyte1 - 0xai; 
*s - QOxal; 


怎么 样 ， 人 简单 吧 ! 第 1 个 字 节 和 第 2 个 字 节 的 范围 都 
在 0xal 一 0xfe， 虽 然 笔 者 现在 已 经 开始 犯困 了 ， 不 
过 对 付 这 么 简单 的 问题 还 不 是 小 菜 一 供 ? 看 ， 三 下 
五 除 二 就 搞定 了 。 


本 次 的 graphic.c 节 选 


void putfonts8 asc(char *vram, int xsize, int x, int y, 
char c, unsigned char *s) 


中略) 


if (task->langmode == 6) { 
CRH) 


} 
if (task->langmode == 1) { 
CHH) 


if (task->langmode == 2) { 
/* 从 此 开始 */ 
for (; *s != 0x00; s++) { 
if (task->langbyte1 == @) { 
if (0x81 <= *s && *s <= Oxfe) { 
task->langbytel1 = *s; 
} else { 
putfont8(vram, xsize, X, Yy, C, 
nihongo + *s * 16); 


} else { 
k = task->langbytel - @xa1; 
t = *s - QOxal; 
task->langbytel1 = ð; 
font = nihongo + 256 * 16 + (k * 94 + 
t) * 32; 
putfont8(vram, xsize, x - 8, y, c, font 
); /* 左 半 部 分 */ 
putfont8(vram, xsize, x >» Y, C, font 
+ 16);  /#* 右 半 部 分 */ 
} 
x += 8; 


} 
} 
/* 到 此 结束 */ 


return; 


} 


虽 ， 话 说 ，putfonts8_asc 这 个 函数 名 现在 看 来 已 经 
不 合适 了 ， 因 为 它 不 仅 文 持 ASCII， 还 能 文 持 Shift- 


JIS 和 日 文 EUC。 不 过 给 函数 改名 实在 太 矿 类 了 ， 上 所 
DA CIX FEM o 


另外 ，langmode 命 令 也 需要 修改 一 下 ， 以 便 可 以 用 
它 指定 模式 2， 也 就 是 说 “langmode 22 代 表 日 文 EUC 
模式 。 


本 次 的 console.c 节 选 


void cmd_langmode(struct CONSOLE *cons, char *cmdline) 

{ 
struct TASK *task = task_now(); 
unsigned char mode = cmdline[9] - 
if (mode <= 2) { 

这 里 ! */ 


task->langmode = mode; 


} else { 
cons_putstr@(cons, “mode number error.\n"); 


} 
cons_newline(cons); 
return; 


好 ， 我 们 来 “make run”...... 先 等 等 ， 在 此 之 前 ， 为 
了 测试 日 sent 要 一 个 用 EUC 编 码 保存 的 文 
a Miles 转 ， 那 我 们 就 先 来 做 一 个 EUC 编 码 的 文本 
文件 吧 。 


打开 二 进 制 编 辑 器 BZ， 选 择 “ 查 看 ”_, “字符 编 

E” “EEUC”， 然 后 在 我 们 平常 不 怎么 注意 的 ， 石 
边 写 着 “0123456789ABCDEF” 的 地 方 点 击 一 下 ,将 
光标 移动 过 去 ， 输 入 “日 本 语 EUC 万 书 WW 苑 妇 大 

上 一 ”( 这 是 用 日 文 EUC 写 的 哦 ) 。 虽 然 这 样 直 接 
结束 也 可 以 ， 不 过 我 们 还 是 再 加 一 个 换行 符 上 去 
吧 。 点 击 左 侧 区 域 最 后 的 地 方 《000010 行 的 +9 
列 ) ， 将 光标 移动 过 去 ， 然 后 输入 0A。 


将 这 些 内 容 保 存 为 euc.txt。 这 个 文件 是 用 EUC 编 码 
保存 的 ， 所 以 如 果 用 Windows 目 和 带 的 记事 本 程序 打 
开会 显示 出 乱码 ， 不 过 用 Internet Explorer 或 者 
Firefox 等 程序 打开 的 话 〈 前 提 是 选择 了 正确 的 字符 
编码 方式 ) 束 可 以 正常 显示 。 


[Bd BZ - euc.txt q 
FIV RRO RTA BW YD AIH 

Sug t bal\nomeao| eo FS 
4 +5 +6 +7 +8 +9 
8 EC 45 55-43 Ad 
F A4 E8 Al-BC OA 


+? +3 + 


+F 0123456789ABCDEF 
4 AARSEUCTHUL 
4 未 一 : 
Ready 00001 A: 0x00 ©) 26 bytes EUC [Fe 4 
保存 为 euc.txt 的 样子 


接 下 来 我 们 修改 Makefile， 来 将 euc.txt 装 入 三 盘 映 
ae 好 ， 完 工 了 ! 我 们 来 “make run” 吧 ! 


我 们 先 在 没有 设 定 langmode 的 情况 下 type 一 下 
euc.txt 看 看 。 嗯 ， 完 全 看 不 异 呢 〈 笑 ) 。 因 为 在 不 


设 定 langmode 的 情况 下 默认 的 语言 模式 是 Shift- 
JIS. 


Shift-JIS 模 式 下 type 的 结 


这 次 我 们 先 来 执行 "angmode 2”， 然 后 再 type 试 试 
看 ..….... 哦 哦 ， 正 常 显示 了 ! HE! 


日 文 EUC 模 式 下 type 的 结果 

如 果 各 位 读者 当中 有 人 经 常 使 用 日 文 EUC 的 话 ， 不 
妨 在 console_task 中 将 设 定 语言 模式 默认 值 的 部 分 修 
改 一 下 ， 默 认 使 用 EUC 束 可 以 了 。 


我 们 前 面 已 经 提 到 过 ， 中 文 GB2312 编 码 采 用 的 是 
EUC 方 式 ， 因 此 中 文人 字符 二 进 制 编码 转换 为 区 位 
码 的 公式 和 日 文 EUC 是 完全 相同 的 ， 再 加 上 中 文 
里 不 需要 涉及 类 似 半角 所 假名 的 问题 ， 因 此 通过 
这 一 节 的 内 容 ， 束 应 该 可 以 完美 地 实现 对 中 文 显 
示 的 支持 了 。 


要 测试 中 文 显示 ， 我 们 可 以 用 记事 本 或 者 其 他 文 
本 编辑 器 编写 一 个 包 侣 中 文 的 文本 文件 ， 然 后 用 
GB2312 编 码 方式 保存 ， 再 参照 本 节 中 的 讲解 将 文 
| 用 type 命 令 束 可 以 显示 出 
S Tog 


虽然 已 经 又 困 又 累 了 ， 不 过 我 们 还 剩 下 一 个 日 文 显 
示 方 面 的 问题 没有 修改 ， 我 们 需要 一 个 可 以 查询 当 
前 所 使 用 的 langmode 的 API。 这 个 API 要 怎么 用 呢 ? 
比如 可 以 这 样 : 让 画面 上 的 文字 提示 信息 可 以 在 英 
文 模式 时 显示 成 英文 ， 在 日 文 模式 下 显示 成 日 文 。 


获取 langmode 
EDX=27 


EAX=langmode (由 操作 系统 返回 )》 


我 们 来 修改 一 下 console.c， 很 简单 。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


(中 上 略 ) 
} else if (edx == 27) { 


reg[7] = task->langmode; 


return ð; 


我 们 还 得 编写 apilib (其 实 不 写 也 可 以 ， 但 不 写 的 话 
项 无 法 从 C 语 言 调 用 了 ) o 
api027.nas 75 iz 


_api_getlang: ; int api_getlang(void); 
MOV EDX, 27 


INT 0x40 
RET 


既然 我 们 新 增 了 API， 最 好 还 是 写 一 个 用 来 测试 的 
应 用 程序 ， 人 否则 出 了 bug 束 麻烦 了 。 


chklang.c 


#include "apilib.h" 


void HariMain(void) 
{ 
int langmode = api_getlang(); 
static char s1[23] = { /*HAHY 7 FIISE—F (HX 
Shift-JIS 模 式 ) */ 
0x93, Oxfa, @x96, Ox7b, Ox8c, Oxea, 0x83, Ox56, 
0x83, 0x74, 0x83, 0x67, 
Ox4a, 0x49, 0x53, 0x83, 0x82, 0x81, Ox5b, 0x83, 
0x68, Ox0a, 0X00 
}; 
static char s2[17] = { /*AHAGREUCE— K (HXEUCH 
a). t7 
Oxc6, Oxfc, Oxcb, Əxdc, Oxb8, Oxec, 0x45, 0x55, 
0x43, Oxa5, Oxe2, Oxal, 
@xbc, Oxa5, Oxc9, Ox@a, OxeO 
}5 
if (langmode == 0) { 
api_putstre@("English ASCII mode\n"); 


} 
if (langmode == 1) { 
api_putstr@(s1); 


if (langmode == 2) { 
api_putstr@(s2); 


api_end(); 


应 该 不 用 特地 解释 了 吧 ， 这 里 s1 和 s2 没 有 直接 写成 
字符 串 是 为 了 在 make 时 避免 党 到 源 代 码 字 符 编 码 方 
却 的 影 啊 。 


We, SELLS, “make run”! I? 全 角 字 符 的 显示 有 


点 不 对 劲 啊 ! 


HA, KERAHE? 不 过 移动 一 下 窗口 貌似 就 恢复 
ERT. 


console 


>chk lang 
| k ÆU = - = 


KEAN T, 今天 就 到 此 为 止 吧 。 本 来 我 们 预计 

天 能 完成 操作 ARR UE MBP AIFF AC, MINER 
Ae 所 以 明天 还 得 在 操作 系统 核心 的 编写 
上 再 花 点 时 间 。 


第 29 天 ”压缩 与 简单 的 应 用 程序 


。 修复 bug (harib26a) 

。 文 件 压 缩 (harib26b) 

o 标准 函 数 

。 非 矩形 窗口 (harib26c ) 
e bball (harib26d) 

。 外 星人 游戏 Charib26e ) 


1 修复 bug (harib26a) 


大 家 早上 好 。 今 天 我 们 打算 编写 一 些 应 用 程序 来 玩 
玩 ， 不 过 在 此 之 前 ， 我 们 得 修复 昨天 剩 下 的 那个 天 
于 日 文 显示 的 bug。 


仔细 观察 这 个 bug 后 我 们 发 现 ， 只 有 全 角 字 符 的 最 
示 有 问题 ， 半 角 字 符 是 正常 的 ， 而 且 移 动 窗 口 之 后 
就 可 以 恢复 正常 ， 这 说 明 图 层 缓 冲 区 中 的 数据 是 正 
确 的 ， 问 题 一 定 出 在 refresh 上面。 

带 痢 这 个 思路 再 去 看 程序 ， 果 然 如 此 ， 显 示人 全角 字 
符 的 时 候 只 refresh 了 半角 部 分 ， 难 怪 只 能 显示 出 右 
半 部 分 昵 。 我 们 马上 来 改 一 改 。 


本 次 的 window.c 节 选 


void putfouts8_asc_sht(struct SHEET *sht, int x, int y， 
int c, int b, char *s, int 1) 


{ 

struct TASK *task = task_now(); 
[EXEL ey 

boxfill8(sht->buf, sht->bxsize, b, x, y, x +1 * 8 
- 1, y + 15); 


if (task->langmode != © && task->langbyte1 != 6) { 
/* 从 此 开始 */ 
putfonts8 asc(sht->buf, sht->bxsize, x, y, C, 
s); 
sheet refresh(sht, x - 8, y, x+ 1*8, y + 


16); 


} else { 
putfonts8 asc(sht->buf, sht->bxsize, x, y, C, 
s); 
sheet_refresh(sht, x, y, x + 1 * 8, y + 16); 


} 
/* 到 此 结束 */ 


return; 


ROMER BAN EAT MP Bee: fe A SCARE PIF 
始 显 示 全 角 字 符 的 第 2 个 字 节 时 ， refresh 的 范围 会 
从 x 一 8 开始 ， 其 他 的 部 分 保持 不 变 。 


我 们 来 看 看 是 不 是 解决 了 这 个 bug，“make run” 一 下 
ea 和 上 昨天 一 样 运行 chklang 命 令 .……. 哦 哦 ， 出 
Ta 
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2 文件 压缩 (harib26b ) 


到 上 一 市 为 止 ， 我 们 已 经 修复 了 所 有 的 bug,“ 纸 娃 
娃 系 统 " 也 可 以 塞 告 完 成 了 ， 撤 伦 ! 不 过 为 了 锅 上 
添 化， 我 们 还 要 再 做 个 小 小 的 修改 。 


在 此 之 前 ， 我 们 先 来 确认 一 下 目前 操作 系统 核心 部 
分 程序 的 大 小 《好像 已 经 很 信 没 有 确认 了 呢 ) 。 
haribote.sys 的 大 小 为 34782 字 节 ， 即 34.0KB， 真 小 
啊 ， 不 错 不 错 。 源 代码 的 大 小 又 如 何 呢 ?我 们 来 看 
一 下 haribote 目 录 下 的 所 有 文件 ， 一 共 是 99230 字 贡 
(不 包括 hankaku.txt) ， 即 96.9KB， 相 当 小 呀 。 


那么 下 面 我 们 还 想 要 增加 一 个 什么 样 的 功能 呢 ? 答 
案 是 “ 文 持 文件 压缩 ?的 功能 。 这 里 所 说 的 文件 压 
给， 融 是 像 zip 文 件 一 样 将 文件 变 小 保存 起 来 的 功 
能 。 不 过 其 实 这 次 我 们 所 要 实现 的 并 不 是 文件 
的 “压缩 ?， 而 是 将 压缩 好 的 文件 “解压 缩 ?的 功能 。 


这 样 一 来 ， 压 绚 过 的 文件 可 以 在 操作 系统 内 部 目 动 
解压 绽 ， 不 需要 使 用 压缩 软件 来 进行 解压 缩 的 操 
作 。 对 于 压缩 过 的 文件 ， 可 以 像 未 经 压 绾 的 文件 一 
样 下 接 使 用 。 


之 所 以 要 增加 这 样 的 功能 ， 是 为 了 尽量 让 日 文字 库 


文件 变 小 。 现 在 nihongo.fnt 有 142KB， 但 OSASK 用 
的 jpn16v00.fnt 却 只 有 56.7KB， 这 都 是 拜 压缩 所 赐 。 
因此 如 果 我 们 在 “ 纸 娃 娃 系 统 ” 中 也 使 用 压缩 ， 估 计 
能 节省 大 约 85KB 的 磁盘 空间 ， 这 样 一 来 即便 我 们 
编写 很 多 应 用 程序 ， 也 用 不 看 使 用 ipl30.bin 了， 也 
束 是 说 ， 可 以 不 需要 再 额外 延长 局 动 时 间 了。 


世界 上 有 许多 种 压缩 格式 〈《 比 

如 .zip、.cab、.]zh、.bz2 等 ) ， 那 么 我 们 选用 哪 一 种 
格式 呢 ? 有 些 格式 的 压缩 对 不 错 ， 但 解压 缩 需 要 人 花 
费 很 长 的 时 间 ; 有 些 格式 压 缠 京 不 是 很 理想 ， 但 解 
压缩 速度 却 很 快 。 哎 呀 ， 如 果 有 一 种 格式 压缩 靳 又 
好 ， 同 时 解压 缩 速 度 又 快 就 太 好 了 ; 反之 ， 如 采 压 
HERAT, MEAR, MERKE S 


IESh, FRR Sa AP ARDEA BERR 
再 好 ， 可 以 将 142KB 的 nihongo.fnt 压 缩 到 1KB， 但 
解压 缩 程 序 却 要 150KB， 那 结果 只 能 是 适得其反 。 


其 实 笔 者 在 这 个 问题 上 考虑 了 半年 的 时 间 ， 为 了 给 
目 己 开发 的 软件 加 上 对 压缩 文件 的 文 持 ， 在 选用 哪 
一 种 压缩 格式 上 面 做 了 一 些 研 究 ， 结 果 目 己 编 写 了 
一 个 平衡 性 还 不 错 的 新 格式 tek, ZAA AIE 
用 这 种 格式 了 。 之 前 我 们 介绍 的 jpn16v00.fnt 束 是 用 


tek 压 缩 的 〈《OSASK 中 已 经 实现 了 对 压缩 文件 的 支 
持 ) 。 


在 这 里 很 想 跟 大 家 介绍 一 下 tek 的 优点 ， 不 过 真 讲 起 
来 的 话 太 浪费 篇 幅 了 ， 总 之 在 这 里 我 们 也 使 用 tek 格 
式 了 ， 请 大 家 接受 这 个 设 定 吧 。 如 果 有 人 不 赞同 的 
话 ， 也 可 以 对 程序 进行 修改 ， 使 用 其 他 的 格式 ， 你 
一 定 会 及 现 tek 在 平衡 性 方面 的 优势 “当然 ， 如 果 你 
发 现 有 比 tek 更 好 的 选择 ， 请 尽管 用 哦 ) 。 


好 ， 下 面 我 们 将 tek 的 解压 缩 程序 整合 到 “ 纸 娃娃 系 
统 ” 中 ， 不 过 如 果 要 在 这 里 讲解 tek 的 算法 ， 然 后 再 
编写 相关 的 函数 ， 不 知道 要 讲 到 猴 年 瑟 月 了 ， 而 且 
本 书 是 讲 编写 操作 系统 的 ， 不 是 学 习 压 缩 算法 的 ， 

所 以 我 们 就 偷 个 懒 ， 从 edimg.exe 的 源 代码 中 直接 将 
tek 相 关 的 部 分 拿 出 来 用 吧 〈 对 不 住 了 ! ) 。 


edimg.exe 的 源 代码 是 公开 的 ，tek 相 关 的 程序 位 于 
autodec_.c 这 个 文件 中 ， 将 这 个 文件 直接 复制 到 
harib26b 目 录 的 tek/uatodec _.c 束 可 以 了 。 


然而 ， 这 个 程序 并 无 法 轻易 地 汇 整 作为 程序 库 来 使 


用 ， 这 一 点 上 笔者 确实 偷懒 了 【借口 : 与 其 说 是 偷 
懒 ， 不 如 说 是 忙 到 没有 时 间 来 整理 吧 ...... 比如 说 忙 


看 写 这 本 书 之 类 的 ) 。 


于 是 ， 我 们 删除 了 对 于 “ 纸 娃娃 系统 ”来 说 不 太 好 用 
的 autodecomp 函 数 ， 并 增加 了 必要 的 函数 
tek_getsize 和 tek_decomp， 同 时 将 加 工 过 的 程序 保 
存 为 tek.c〔 在 tek/ 和 haribote/ 中 同时 放 入 同样 的 文 
件 ) 。 


tek.c it 


int tek_getsize(unsigned char *p) 


{ 


static char header[15] = { 
Oxff, Oxff, Oxff, @xO1, Ox@@, Ox00, Oxee@, Ox4Ff, 
0x53, 0x41, 0x53, Ox4b, 0x43, Ox4d, 0x50 }; 
int size = -1; 
if (memcmp(p + 1, header, 15) == © && (*p == 0x83 
|| *p == @x85 || *p == @x89)) { 
p += 16; 
size = tek_getnum_s7s(&p); 
} 
return size; 
} /* QE) memcmp 和 strncmp 差 不 多 ， 这 个 函数 忽略 
字符 串 中 的 6 并 一 直 比 较 到 指定 的 15 个 字符 为 止 */ 


int tek decomp(unsigned char *p, char *q, int size) 
{ 
int err = -1; 
if (*p == 0x83) { 
err = tek_decodel(size, p, q); 
} else if (*p == 0x85) { 
err = tek_decode2(size, p, q); 
} else if (*p == @x89) { 


err = tek_decode5(size, p, q); 


if (err != 6) { 

return -1; /# 失 败 */ 
} 
return ð; /# 成 功 #/ 


话说 回来 ， 即 便 给 大 家 看 上 面 的 代码 ， 估 计 大 家 也 
看 不 明白 tek_getnum_s7s 和 tek_decodel 之 类 的 到 底 

是 怎么 一 回 事 。 不 过 基本 上 ，tek_getsize 国 数 用 来 

判断 文件 是 否 符合 tek 格 式 ， 如 果 是 合法 的 tek 格 式 

则 取得 解压 缩 后 的 文件 大 小 《如 果 不 是 合法 的 tek 格 
式 则 返回 -1) , %&Jatek_decomp ek 数 用 来 完成 解压 
缩 操 作 。 


还 有 ， 我 们 将 autodec_.c 中 的 malloc 和 free 分 别 改 成 
了 memman alloc 4k 和 memman free 4k, MU Emi 
本 次 修改 的 全 部 内 容 。 


利用 上 面 两 个 函数 ， 我 们 编写 了 一 个 叫 
file loadfile2 的 函数 。 


本 次 的 fle.c 节 选 


char *file_ loadfile2(int clustno, int *psize, int *fat) 
{ 

int size = *psize, size2; 

struct MEMMAN *memman = (struct MEMMAN *) 
MEMMAN_ADDR; 


char *buf, *buf2; 
buf = (char *) memman_alloc_4k(memman, size); 
file loadfile(clustno, size, buf, fat, (char *) 
(ADR_DISKIMG + 0x003e00)); 
if (size >= 17) { 
size2 = tek_getsize(buFf); 
if (size2 > @) { /* 使 用 tek 格 式 压 缩 的 文件 */ 


buf2 = (char *) memman_alloc_4k(memman, 


size2); 
tek_decomp(buf, buf2, size2); 
memman_free_4k(memman, (int) buf, size); 
buf = buf2; 
*psize = size2; 
} 


return buf; 


这 个 函数 的 功能 是 ， 首 先 用 memman_alloc_4k 申 请 
必要 的 内 存 空 间 ， 然 后 用 fie_ loadfile 函 数 将 文件 内 
容 载 入 内 存 。 如 果 文 件 大 小 超过 17 字 节 则 表示 其 有 
可 能 为 tek 格 式 的 文件 :， 调 用 tek_getsize 进 行 判断 ， 
如 果 判 断 该 文件 确实 为 tek 格 式 ， 则 为 解压 缩 后 的 文 
件 申 请 分 配 内 存 空间 ， 并 执行 解压 缩 操 作 ， 然 后 舍 
弃 解 压缩 前 的 文件 内 容 。 本 函数 将 返回 载 入 并 存放 
文件 内 容 的 内 存 地 址 。 


"tek 格式 的 文件 必须 融 有 一 个 用 于 识别 格式 的 文 
FPR, 这 个 文件 涛 有 内 部 分 全 少 和 有 17 字 衣 > 因此 内 
对 大 于 17 字 节 的 文件 判断 其 是 否 为 tek 格 式 。 


要 说 明 的 是 psize 这 个 变量 ， 之 前 我 们 一 直 是 
| 


char *file_loadfile2(int clustno, int size, int *fat) 


而 这 次 我 们 将 Size 改 成 了 int *psize， 因 为 我 们 不 是 
要 问 函 数 传 递 size 的 值 ， 而 是 要 传递 存放 size 变 量 的 
内 存 地 址 。 


之 所 以 要 这 样 做 ， 是 因为 在 判断 文件 为 tek 格 式 之 
后 ， 我 们 需要 将 size 变量 的 值 修 改 为 解压 缩 后 的 文 
件 大 小 ， 要 修改 变量 的 值 束 需要 知道 该 变量 的 内 存 
地 址 。 


接 下 来 我 们 用 fae loadfile2 函 数 来 修改 一 下 载 入 
nihongo.fnt 的 部 分 。 


本 次 的 bootpack.c 节 选 


void HariMain(void) 


(中 上 略 》 


/# 载 入 nihongo.fnt */ 

fat = (int *) memman_alloc_4k(memman, 4 * 2880); 

file readfat(fat, (unsigned char *) (ADR_DISKIMG + 
0x000200) ) ; 


finfo = file_search("nihongo.fnt", (struct FILEINFO 
*) (ADR_DISKIMG + 0x002600), 224); 
if oe l= ð) { 
= finfo->size; 


/* 这 E 
nihongo = file_loadfile2(finfo->clustno, &i, 
fat); /* 这 里 ! */ 
} else { 


nihongo = (unsigned char *) 
memman_alloc_4k(memman, 16 * 256 + 32 * 94 * 47); /* 这 
Hy 

for (i = 03; i < 16 * 256; i++) { 

nihongo[i] = hankaku[i]; /* 没 有 字库 ， 半 和 角 部 分 

直接 复制 英文 字库 */ 

} 

for (i = 16 * 256; i < 16 * 256 + 32 * 94 * 47; 
i++) { 


nihongo[i] = Oxff; /* 没有 字库 ， 全 角 部 分 以 
e@xff 填 充 */ 
} 
} 
*((int *) @x@fe8) = (int) nihongo; 
memman_free_4k(memman, (int) fat, 4 * 2880); 


CHH) 


在 载 入 nihongo.fnt 的 代码 中 ， 我 们 没有 直接 写 
file loadfile2 (finfo —>clustno, &finfo 一 >Size， 


fat) ; ; 而 是 用 eee tae ee 
finf 


tT XP, WSR Ws DIRAN 问题 。 


下 面 我 们 来 压缩 nihongo.fnt..…. 话 说 ， 通 过 上 面 的 
程序 大 家 应 该 能 看 出 来 ， ` 进 行 压 
缩 ， 程 序 照样 可 以 正常 工作 ， 不 过 既然 我 们 已 经 实 
现 了 对 压缩 文件 的 文 持 ， 那 为 什么 不 压缩 一 下 呢 ? 


要 对 文件 进行 压缩 ， 可 以 使 用 z_tools 中 的 
bim2bin.exe。bim2bin.exe 这 个 工具 ， 本 来 是 用 于 创 
建 OSASK 可 执行 文件 的 程序 ， 所 以 才 叫 这 个 名 字 
(COSASK 的 可 执行 文件 扩展 名 为 .bin) 。 其 实 tek 压 
缩 原 本 只 是 OSASK 可 执行 文件 附 这 的 功能 ， 因 此 从 
那 以 后 就 一 7B ilbimzbin.exe id fr teks i r 。 输 入 
下 面 的 命令 : 


提示 符 >bim2bin -osacmp in:nihongo.org 
out:nihongo.fnt 


即 可 完成 文件 的 压缩 ， 其 中 nihongo.org 是 在 压缩 六 
将 nihongo.fnt 改 了 一 下 书 学 而 已 。 tek ARIA HE 
选项 ， 比 如 用 下 面 的 命令 : 


提示 符 > bim2bin -osacmp in:nihongo.org 
out:nihongo.fnt —tek2 


表示 压缩 为 tek2 格 式 。 如 果 指 定 -tek5， 或 者 不 指定 
任何 选项 的 话 ， 则 总 压缩 为 tek5 格 式 ， tlo 格 式 的 


压缩 率 比 较 低 ， 但 解压 缩 速 度 比 较 快 ， 在 真 机 环境 
下 测试 表明 ，tek5 格 式 的 解压 缩 速度 已 经 够 快 了 ， 
当然 ， 如 果 对 解压 缩 速度 不 满意 的 话 ， 可 以 试 试 
tek2 。 


用 tek5 格 式 压 缩 后 ，142KB 的 nihongo.org 被 压缩 为 
56.6KB 的 nihongo.fnt， 撒 花 ! 


准备 完成 , “make run” 试 试看 ， 能 不 能 顺利 显示 出 
汉字 呢 ? 显示 出 来 了 ! 


使 用 压缩 过 的 字库 也 能 显示 出 汉字 了 


再 加 把 劲 ， 这 次 我 们 要 让 应 用 程序 经 过 tek 压 缩 后 也 
可 以 直接 运行 。 


本 次 的 console.c 节 选 
int cmd_app(struct CONSOLE *cons, int *fat, char 


*cmdline) 


{ 


中略) 


int i, segsiz, datsiz, esp, dathrb, appsiz; /* 
AEN #/ 
(中 上 略 ) 
if (finfo != 0) { 
/* 如 果 找 到 文件 */ 
appsiz = finfo->size; 
/* 从 此 开始 */ 
p = file loadfile2(finfo->clustno, &appsiz, 
fat); 
if (appsiz >= 36 && strncmp(p + 4, "Hari", 4) 
== 0 && *p == 6x66) { /* 到 此 结束 */ 
CREK) 
} else { 
CREK) 


} 

memman_free 4k(memman, (int) p, appsiz); 
eps ey | 

cons_newline(cons) ; 

return 1; 


} 
/# 如 果 没 有 找到 文件 */ 


return ð; 


修改 的 部 分 只 是 将 应 用 程序 的 大 小 从 finfo 一 >size 改 
成 appsiz， 并 使 用 file_ loadfile2 函 数 来 载 入 。 


除 此 之 外 ， 虽 然 我 们 已 使 用 了 fie loadfile， 但 还 剩 
下 一 个 地 方 ， 那 就 是 文件 API 的 部 分 ， 我 们 也 顺便 
将 其 修改 成 file loadfile2 吧 。 


本 次 的 console.c 节 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


(中 上 略 ) 
} else if (edx == 21) { 
(中 上 略 ) 
if (i < 8) { 
finfo = file_search((char *) ebx + ds_base, 
(struct FILEINFO *) (ADR_DISKIMG + 
@x@02600), 224); 
if (finfo != 0) { 
reg[7] = (int) fh; 
fh->size = finfo->size; 
fh->pos = ð; 
fh->buf = file _loadfile2(finfo- 
>clustno, &fh->size, task->fat); /* 这 里 ! */ 


} 


} 
} else if (edx == 22) { 
CHH) 


这 里 不 用 讲解 应 该 也 能 明白 了 吧 。 这 样 一 来 ， 我 们 
就 对 字库 、 应 用 程序 ， 以 及 应 用 程序 所 打开 的 数据 
文件 等 等 所 有 涉及 文件 操作 的 部 分 ， 都 实现 了 对 tek 
压缩 的 支持 ， 如 果 觉得 哪些 文件 比较 大 的 话 ， 压 缩 
一 下 就 可 以 了 。 


作为 测试 ， 我 们 将 应 用 程序 压缩 一 下 看 看 。 


本 次 的 app_make.txt 节 选 


%.org : %.bim Makefile ../app_make.txt 
$(BIM2HRB) $*.bim $*.org $(MALLOC) 


%.hrb : %.org Makefile ../app_make.txt 
$(BIM2BIN) -osacmp in:$*.org out:$*.hrb 


我 们 运行 一 下 “make full”, Rin FERR. 
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type.hrb 265 字 节 226 字 节 -39 字 节 


于 是 应 用 程序 也 变 得 更 小 了 。 当 然 ， 变 小 之 后 应 用 
程序 还 是 可 以 正常 运行 的 。 真 不 错 ，noodle.hrb 这 
种 程序 居然 小 到 只 有 523 字 节 了 呢 。 


不 过 我 们 也 发 现 ， 有 一 些 原本 束 很 小 的 应 用 程序 ， 
压缩 了 之 后 反倒 稍微 变 大 了 一 点 “。 虽 然 这 点 差异 
我 们 完全 可 以 忽略 ， 不 过 文件 总 归还 是 越 小 越 好 ， 
BAT Tao AS RIE SCP EAT RS CPEB 8 fE 
压缩 的 时 间 ， 虽 然 也 只 有 一 点 点 而 已 ) 。 


“可 能 大 家 会 澳 得 压缩 之 后 后 然 比 原来 还 大 这 一 
点 很 奇怪 ， 其 实 这 也 很 正常 。 压 缩 说 白 了 就 是 对 
数据 的 一 种 转换 ， 大 多 数 情 况 下 这 种 转换 会 让 文 
件 变 得 更 小 ， 但 偶然 的 情况 下 转换 之 后 反而 变 大 
也 是 有 可 能 的 。 这 一 性 质 并 非 是 tek 压 缩 所 独 有 

的 ， 而 是 所 有 压缩 方法 所 共有 的 。 


本 次 的 hello4.hrb 的 Makefile 


APP = hello4 
STACK = 1k 
MALLOC = Ok 


include ../app_make.txt 


$(APP).hrb : $(APP).org Makefile 
$(COPY) $(APP).org $(APP).hrb 


这 样 一 来 ， 文 件 本 号 的 生成 规则 会 优先 于 一 般 规 
则 ， 于 是 .hrb 文 件 变 成 copy.org 文 件 。 


hello5.hrb 和 winhelo.hrb 也 进行 了 同样 的 修改 。 


通过 这 次 的 修改 ， 毫 无 疑问 ， 操 作 系 统 本 身 肯 定 变 
大 了 ， 不 过 到 底 大 了 多 少 呢 ? haribote.sys 的 大 小 由 
34782 字 节 变 为 40000 字 节 ， 增 加 了 5218 字 节 ， 也 欢 
是 5.10KB。 而 字库 文件 通过 压缩 减 小 了 85.4KB， 减 
去 操作 系统 增 大 的 部 分 ， 我 们 还 赚 了 80 多 KB， 而 

且 应 用 程序 也 变 小 了 ， 效 果 还 是 相当 显著 的 。 


到 这 里 为 止 ， 我 们 的 “ 纸 娃娃 系统 ”总 算是 正式 完工 
Jo WE! 放纵 炮 ! 这 29 天 一 路 走 来 ， 现 在 好 想 庆 
视 一 番 。 笔 者 实在 是 太 开 心 了 ， 要 不 出 去 吃 顿 大 餐 
吧 ! 


忽然 想起 typeipl.hrb， 这 个 程序 相当 于 一 个 只 能 显 

示 “ipl10.nas” 的 type 命 令 ， 而 且 现 在 “ipl10.nas” 这 个 
文件 已 经 不 存在 了 《被 蔡 换 成 了 “ipl20.nas”) ， 这 

个 程序 也 束 没 有 任何 意义 了 ， 从 下 一 节 开 始 我 们 束 
KEM. 


3 标准 函数 


在 C 语 言 中 ， 有 一 些 函 数 被 称 为 “标准 函数 ”"， 这 些 
了 疯 数 对 于 C 语 言 来 说 是 非常 第 用 的 函数 ， 大 多 数 情 
况 下 ，C 语 言 编 诺 右 的 作者 或 者 是 操作 系统 的 作者 
部会 提供 这 样 的 库 。 


其 中 有 代表 性 的 函数 包括 printf、putchar、strcmp 以 
及 malloc 等 。 如 果 一 个 程序 只 调用 了 标准 函数 ， 那 
么 无 论 在 Windows 中 还 是 在 Linux 中 都 可 以 生成 相同 
的 应 用 程序 〈 这 里 的 相同 指 的 是 源 代 码 可 以 完全 通 
用 ， 而 并 不 是 说 完全 相同 的 可 执行 文件 能 同时 在 不 
同 的 系统 上 运行 ) 。 


如 果 “ 纸 娃娃 系统 ”中 也 包含 这 些 标准 函数 的 话 ， 那 
么 上 述 这 样 的 应 用 程序 丈 同 样 可 以 用 于 “ 纸 娃 娃 系 
统 ” 了 。 听 起 来 很 不 错 ， 我 们 来 试 试看 吧 。 


要 竣 章 所 有 的 标准 函数 ， 笔 者 实在 是 吃不消 ， 于 是 
我 们 只 挑 其 中 一 部 分 来 做 。 如 果 有 必要 的 话 ， 剩 下 
的 可 以 由 大 家 来 完成 。 如 果 不 清楚 有 哪些 标准 函 
数 ， 可 以 参考 一 些 C 语 言 的 教材 ， 或 者 到 “ 纸 娃娃 系 
统 ” 的 文 持 页 面 来 提问 。 


我 们 先 来 做 putchar 吧 。 这 个 函数 的 功能 是 在 屏幕 上 
显示 一 个 指定 的 字符 ， 只 要 include 了 就 可 以 使 用 。 
用 api_putchar 可 以 很 容易 地 实现 这 个 函数 的 功能 。 
putchar.c 

#include "apilib.h" 


int putchar(int c) 
{ 


api_putchar(c); 
return cC; 


代码 很 简单 ， 用 不 着 讲解 了 吧 。 最 后 的 returmnm 命 令 
指定 了 c， 这 是 putchar 的 参考 手册 :上 面 规定 的 。 


“笔者 参考 的 是 这 个 网 

页 http://www.linux.or.jp/JM/html/LDP_man_page: 
者 注 : 由 于 时 间 久 远 ， 原 链接 已 失效 ， 各 位 读者 
请 参考 这 

里 : http://www.linux.com/learn/docs/man/3838- 
putchar3) 。 


接 下 来 是 strcemp， 不 过 这 个 已 经 由 编译 右 附 和 带 了 ， 
因此 不 需要 我 们 再 特地 编写 了 。 


那么 我 们 就 来 做 exit 吧 。exit 是 用 来 结束 应 用 程序 的 
函数 ， 只 要 include 的 残 可 以 使 用 *。 本 来 exit 函 数 有 
很 多 功能 ， 比 如 实现 用 atexit 函 数 对 一 些 函 数 进 行 注 
册 ， 在 程序 结束 时 可 以 目 动 调用 这 些 注册 过 的 函 
数 。 要 实现 这 些 功 能 代码 束 会 变 得 很 长 ， 我 们 在 这 
里 就 只 调用 api_end， 做 一 个 简单 的 exit 函 数 吧 。 


“笔者 参考 的 是 这 个 网 

页 http://www.linux.or.jp/JM/html/LDP_man- 
pages/man3/exit.3.html 〈 详 者 注 : 由 于 时 间 久 远 ， 
原 链接 已 失效 ， 各 位 读者 请 参考 这 

里 : http://www.linux.com/learn/docs/man/2912- 
exit3) 。 


exit.c 


#include "“apilib.h" 


void exit(int status) 


api_end(); 


这 个 也 用 不 着 讲解 了 吧 。status 参 数 是 用 来 向 操作 系 
统 报告 程序 结束 状态 的 ， 由 于 在 现在 的 “ 纸 娃娃 系 
统 ” 中 完全 没有 用 到 ， 因 此 这 里 就 直接 忽略 了 。 


下 面 我 们 来 做 printf， 这 个 函数 连 C 语 言 的 初学 者 都 
应 该 很 熟悉 了 。 它 的 功能 很 简单 ， 就 是 将 sprint 的 
结果 输出 到 画面 上 ， 只 要 include 了 就 可 以 使 用 了 


笔者 参考 的 是 这 个 网 

W: http://www.linux.or.jp/JM/html/LDP_man- 
pages/man3/printf.3.html 〈 译 者 注 : 由 于 时 间 久 
远 ， 原 链接 已 失效 ， 各 位 读者 请 参考 这 

里 : http://www.linux.com/learn/docs/man/4138- 
sprintf3) 。 


不 过 printf 还 真是 一 个 比较 难 写 的 函数 ， 因 为 它 的 调 
用 方式 不 是 固定 的 ， 例 如 : 


printf("hello, world\n"); 


printf("a = %d (%x) ", a, a); 


像 上 面 这 样 ， 通 过 使 用 %d 和 %x 之 类 的 转 义 符 ， 会 
导致 参数 的 数量 发 生变 化 。 这 样 的 函数 到 底 应 当 如 
何 声明 呢 ? 

只 要 完成 了 函数 的 声明 ， 接 下 来 只 要 调用 sprintf， 

然后 再 调用 api_putstr0 束 搞定 了。 可 问题 是 sprintfhy 
该 怎样 调用 呢 ? 参数 的 数量 是 不 固定 的 呀 .……… 


次 那么 多 好 像 有 点 吓 距 大 家 了 ， 实 际 上 程序 并 不 长 


RR 

printf.c 

#include <stdio.h> 

#include <stdarg.h> 

#include "“apilib.h" 

int printf(char *format, 
va_list ap; 


char s[1000]; 
int i; 


va_start(ap, format); 

i = vsprintf(s, format, ap); 
api_putstr@(s); 

va_end(ap); 

return i; 


先 来 看 声明 部 分 ， 直 接 写 了 一 个 省 略 号 “<.…”， 看 上 
去 很 奇怪 吧 ， 其 实 这 是 C 语 言 的 语法 ， 并 不 是 笔者 
MER CR) 


这 个 “...” 的 部 分 中 传递 的 参数 ， 可 以 使 用 va_list 来 
获取 ， 只 要 include 了 就 可 以 使 用 了 。 使 用 时 先 通 过 
va_start 进 行 初始 化 ， 最 后 再 用 va_end 来 扫尾 。 


同时 ， 有 一 个 版 本 的 sprintf 是 可 以 接受 va_list 作 为 参 
数 的 ， 名 字 叫 vsprintf， 使 用 这 个 函数 就 可 以 完成 处 


理 了 。vsprintf 也 是 编译 器 附 市 的 ， 可 以 直接 使 用 。 


虽然 上 面 对 “.…2? 形 却 的 参数 做 了 讲解 ， 不 过 这 种 形 
式 并 不 第 用 ， 大 家 随便 看 看 就 可 以 了 。 


最 后 我 们 来 做 malloc 和 free， 这 两 个 函数 只 要 include 
了 束 可 以 使 用 了 4。 


“笔者 参考 的 是 这 个 网 

页 http://www.linux.or.jp/JM/html/LDP_man- 
pages/man3/malloc.3.html《〈 详 者 注 ， 由 于 时 间 久 
远 ， 原 链接 已 失效 ， 各 位 读者 请 参考 这 

里 : http://www.linux.com/learn/docs/man/2634- 
calloc3) 。 


可 能 大 家 会 党 得 ， 用 api_ malloc 和 api_free 不 就 可 以 

轻松 实现 了 吗 ? 事实 上 可 没有 那么 简单 。 标 准 函 数 
的 free 无 需 指定 size， 因 此 我 们 需要 将 malloc 时 指定 
的 Size 找 个 地 方 存放 起 来 。 


malloc.c 


void *malloc(int size) 


char *p = api_malloc(size + 16); 
if (p != 6) { 


*((int *) p) = size; 
p += 16; 
} 


return p; 


void free(void *p) 


void free(void *p) 
{ 
char *q = p; 
int size; 
if (q != @) { 
q -= 16; 
size = *((int *) q); 
api_free(q, size + 16); 
} 


return; 


size lH E EEM ZTE A? 我 们 在 api_malloc 
的 时 候 特 地 多 分 配 了 16 字 节 的 空间 出 来 ， 然 后 将 
size 存 放 在 那里 ， 在 free 的 时 候 则 执行 相反 的 操作 。 
size 是 int 型 ， 其 实 只 需要 占用 4 字 节 的 内 存 空间 ， 不 
过 内 存 地 址 为 16 字 节 的 倍数 时 ，CPU 的 处 理 速度 有 
时 候 可 以 更 快 ， 因 此 在 这 里 就 用 了 16 字 节 (这样 从 
api_malloc 返 回 的 内 存 地 址 就 一 定 是 16 字 市 的 倍 

PO a 


eS 标准 函数 就 编写 完成 了 。 由 于 这 部 分 内 容 
R EIE EK, 因此 上 述 程序 代码 并 未 包含 TEA 
附送 的 光盘 中 ， 有 需要 的 读者 请 上 日 己 输入 代码 吧 。 
像 printf 这 样 的 函数 ， 如 果 可 以 使 用 的 话 应 该 还 是 很 
方便 的 呢 。 


4 非 窍 形 窗 口 (harib26c ) 
好 啦 ， 现 在 开始 我 们 可 以 编写 应 用 程序 玩 玩 了 ! 


这 里 “ 非 算 形 ?表示 * 非 方 匡 形状 >， 也 惑 是 说 我 们 现 
在 要 让 窗口 的 形状 为 方形 以 外 的 其 他 形状 ， 这 通过 
使 用 透明 色 就 可 以 实现 。 这 个 例子 说 明 “ 纸 娃娃 系 
统 ” 也 能 实现 这 种 高 级 功能 哆 。 


notrec.c 
#include "apilib.h" 


void HariMain(void) 
{ 
int win; 
char buf[156 * 70]; 
win = api_openwin(buf, 150, 70, 255, "“notrec"); 
api_boxfilwin(win, @, 50, 34, 69, 255); 
api_boxfilwin(win, 115, 50, 149, 69, 255); 
api_boxfilwin(win, 50, 30, 99, 49, 255); 
for (;;) { 
if (api_getkey(1) == @x@a) { 
break; /* 按 下 回 车 键 则 break; */ 


} 


} 
api_end(); 


我 们 将 透明 色 指 定 为 255 号 ， 然 后 用 这 个 透明 色 在 
窗口 中 绘制 3 个 方块 。 于 是 我 们 绘制 方块 的 部 分 融 
变 成 了 透明 的 ， 从 结果 上 说 也 就 画 出 非 矩 形 的 窗口 
二 


应 用 程序 名 称 “notrec” 是 “not rectangle”( 非 矩形 ) 
的 缩写 。 


“make run 的 结果 如 图 !， 是 不 是 很 有 意思 呢 ? 


1 «make run” 的 结果 如 图 : 某 些 情况 下 可 能 不 会 显 
示 出 图 上 的 结果 ， 出 现 这 种 情况 时 只 要 移动 一 下 
窗口 就 可 以 了 。 这 是 由 于 没有 考虑 到 窗口 形状 弯 
化 (增加 了 透明 色 ) 而 出 现 的 问题 ， 只 要 编写 一 
个 窗口 形状 变化 时 专用 的 refresh API 束 可 以 解 

决 。 本 书 中 对 于 非 秆 形 窗口 并 没有 实现 真正 意义 
上 的 支持 ， 因 此 没有 增加 相应 的 API。 


非 窍 形 的 窗口 ? 


虽然 现在 这 样 还 不 行 ， 但 只 要 对 操作 系统 方面 进行 
一 些 修 改 并 文 持 隐 苦 窗口 标题 栏 的 话 ， 我 们 惑 可 以 
绘制 出 桔子 形 的 窗口 ， 甚 全 是 人 形 的 窗口 等 各 种 窗 
口 啦 。 这 多 亏 了 我 们 前 面 设计 好 的 图 层 管理 机 制 
呢 。 


5 bball (harib26d ) 


“bball* 是 笔者 很 喜欢 的 一 个 OSASK 上 的 应 用 程序 ， 

这 个 名 字 是 “beautiful ball” 的 缩写 ， 通 过 绘制 很 多 条 
直线 ， 组 成 一 个 美丽 的 球形 。 程 序 本 号 很 短 也 很 简 
单 ， 不 过 画 出 来 的 图 形 非 常 漂 完 。 我 们 把 这 个 程序 
也 移植 到 “ 纸 娃 娃 系 统 ” 上 来 吧 。 


其 实 ， 笔 者 之 所 以 在 “ 纸 娃 娃 系 统 ” 中 编写 了 用 来 画 
直线 的 API， 也 正 是 为 了 在 这 里 移植 这 个 程序 呢 
Car 


bball.c 


#include "“apilib.h" 


void HariMain(void) 
{ 
int win, i, j, dis; 
char buf[216 * 237]; 
struct POINT { 
int x, y; 
}; 
static struct POINT table[16] = { 
{ 204, 129 }, { 195, 90 }, { 172, 58 }, { 
137, 38 }, { 98, 34 }, 
{ 61, 46}, { 31, 73 }, { 15, 110 }, { 
15, 148 }, { 31, 185 }, 
{ 61, 212 }, { 98, 224 }, { 137, 220 }, { 


172, 200 }, { 195, 168 }, 
{ 204, 129 } 
le 


win = api_openwin(buf, 216, 237, -1, "bball"); 
api_boxfilwin(win, 8, 29, 207, 228, @); 
for (i = ð; i <= 14; i++) { 
for (j = i+ 1; j <= 15; j++) { 
dis = j - i; /#* 两 点 间 的 距离 */ 
if (dis >= 8) { 
dis = 15 - dis; /# 逆 向 计数 */ 


} 
if (dis != 0) { 
api_linewin(win, table[i].x, 
table[i].y, table[j].x, table[j].y, 8 - dis); 
} 


} 
} 
for (33) { 
if (api_getkey(1) == @x@a) { 
break; /* 按 下 回 车 键 则 break; */ 
} 
api_end(); 


这 种 写法 在 结构 数组 声明 部 分 直接 赋予 初始 值 ， 可 
能 大 家 还 是 第 一 次 见 到 。 没 关系 ， 只 要 知道 < 嘿 ， 
原来 还 可 以 这 样 写 啊 ” 束 可 以 啦 。 


好 ， 我 们 来 “make run”。 啊 ， 图 形 超出 画面 边界 
了 ， 不 过 用 VESA 的 人 应 该 可 以 完全 显示 出 来 的 
Ro E? 显示 的 图 形 有 问题 啊 ...... 


有 些 线 没有 显示 出 来 

喇 ， 这 貌似 是 操作 系统 的 bug 呢 ， 因 为 画 线 的 程序 
并 没有 什么 问题 。 我 们 把 窗口 移动 一 下 看 看 。 哦 ， 
果然 好 了 。 也 惑 是 说 ， 这 是 refresh 失 败 导 致 的 。 
于 是 我 们 来 修正 一 下 操作 系统 的 bug。 


本 次 的 console.c 世 选 


int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax) 


CRH) 

} else if (edx == 13) { 
sht = (struct SHEET *) (ebx & Oxfffffffe) ; 
hrb_api_linewin(sht, eax, ecx, esi, edi, ebp); 
if ((ebx & 1) == 6) { /* 从 此 开始 */ 


if (eax > esi) { 


if (ecx > edi) { 


i = ecx; 
ecx = edi; 
edi = i; 


/* 到 此 结束 */ 
sheet refresh(sht, eax, ecx, esi + 1, edi + 
1); 


} 
} else if (edx == 14) { 
CFH) 


为 了 保证 refresh 范 围 指 定 正 确 的 左上 角 和 右 下 角 举 
标 ， 我 们 将 变量 进行 比较 后 做 了 和 蔡 换 。 


再 来 “make run” 一 次 看 看 ...... 成 功 了 ! 怎么 样 ， 很 
漂亮 吧 ? 这 样 一 个 应 用 程序 只 需要 350 字 节 哦 ,，“ 纸 
娃娃 系统 ”真是 相当 给 力 不 是 吗 ? 


bball 完 成 


不 过 图 形 超出 画面 范围 看 上 去 很 不 素 ， 我 们 用 
VESA 模 式 再 重新 截 一 张 图 片 下 来 。 


这 就 是 bball 的 完整 版 啦 ! 


6 外 星人 游戏 Charib26e) 


接 下 来 ， 我 们 打算 做 一 个 跟 OSASK 上面 的 外 星人 游 
戏 差 不 多 的 游戏 。 在 看 这 本 书 的 各 位 读者 估计 也 不 
知道 OSASK 的 外 星人 游戏 到 底 是 何方 神 鞋 ， 那 么 我 
们 先 从 缘 景 故事 开始 讲 起 吧 E) 。 顺 便 说 一 句 ， 
这 个 故事 不 是 之 前 就 设 定好 的 ， 而 是 笔者 在 这 里 现 
编 的 。 


20XX 年 ， 从 遥远 的 宇宙 万 一 中“ 飞 来 一 群 外 星 侵略 
者 ， 它 们 不 用 穿 太空 服 束 能 在 宇宙 中 生存 。 它 们 也 
没有 肥 达 有 的 文明 ,一直 就 这 样 在 宇宙 中 四 处 漂 沾 。 


虽然 并 没有 恶意 ， 但 它们 号 上 感染 了 一 种 凶恶 的 病 
毒 ， 人 类 目前 的 科学 水 平 还 无 法 应 付 (它们 目 己 时 
然 感染 了 病毒 ， 但 这 种 病毒 对 它们 的 健康 无 害 ) ， 
如 果 它 们 来 到 地 球 ， 包 括 人 类 在 内 的 大 多 数 地 球 生 
命 都 会 下 到 毁灭 性 的 打击 。 


人 类 曾经 符 试 说 服 这 些 外 星人 ， 但 是 他 们 的 语言 能 
力 不 佳 ， 根 本 就 无 法 沟通 。 科 学 家 们 经 过 讨论 ， 认 
为 只 好 将 它们 击 退 。 昌 然 做 法 有 些 残 酷 ， 但 如 来 它 
们 看 到 同伴 受到 攻击 全 者 牺牲 了 ， 写 们 似乎 融会 做 
出 “看 来 这 里 不 适合 我 们 居住 ?的 判断 。 


ISTE) AGE, ASH. MEARS MRI, E 
们 已 经 来 到 地 球 了 。 没 办 法 ， 只 好 抄 起 手边 的 等 离 
子 炮 ， 将 它们 连同 病毒 一 起 消灭 挥 。 


游戏 的 操作 方法 是 这 样 的 ， 按 小 键盘 上 

的 “42 和 “6” 键 移动 目 机 的 位 置 ， 投 空格 键 友 射 等 离 
子 炮 。 等 离子 炮 每 发 射 一 次 ， 必 须 进 行 一 段 时 间 的 
充电 (或 者 是 加 热 ?) 才能 重新 发 时“ 其 实 这 个 时 
间 也 不 是 很 长 ) ， 因 此 不 能 连续 及 射 。 笔 者 也 没 见 
过 真 的 等 离子 炮 是 什么 样 的 〈 笑 ) ， 不 过 我 们 的 等 
离子 炮 炮 弹 飞行 的 速度 慢 到 可 以 用 肉眼 看 见 ， 反 正 
ee en ns meen ene 
HEU IY « 


消灭 外 星人 会 得 到 奖金 〈 得 分 ) ， 命 中 率 越 局 〈 打 
空 的 次 数 少 ) 的话 得 到 的 奖金 越 多 。 因 为 这 个 等 离 
子 炮 需 要 消 约 大 量 的 电力 ， 如 果 老 是 打 不 中 而 日 日 
溪 费 的 话 ， 咱 们 国家 的 电力 了 就 会 不 够 用 啦 。 为 了 吾 
A rehome <a 
WIE o 


为 了 地 球 的 和 平 ， 希 望 大 家 英勇 奋战 ! 
补充 : 当初 估计 它们 只 有 30 只 来 到 了 地 球 ， 但 现在 


看 来 还 有 后 续 部 队 。 另 有 不 确定 的 情报 表示 ， 后 续 
部 队 的 移动 速度 很 快 .….. 消 灭 它们 吧 


我 们 来 编写 程序 吧 ， 这 次 比较 长 哦 。 


invader.c 
#include <stdio.h> /* sprintf */ 
#include <string.h> /* strlen */ 


#include "“apilib.h" 


void putstr(int win, char *winbuf, int x, int y, int 
col, unsigned char *s); 
void wait(int i, int timer, char *keyflag) ; 


static unsigned char charset[16 * 8] = { 


/* invader(@) */ 
0x00, O@x0@, Ox00, 0x43, OxSf, Ox5Sf, OxSf, Ox7Ff, 
Ox1f, Ox1if, Ox1f, Ox1if, Ox@0@, Ox20, Ox3f, Oxee, 


/* invader(1) */ 
0x00, OxOf, Ox7f, Oxff, Oxcf, Oxcf, Oxcf, OxfFf, 
Oxff, Oxe@, Oxff, Oxff, OxcO, OxcO, OxcO, Oxee, 


/* invader(2) */ 
0x00, Oxf@, Oxfe, Oxff, Oxf3, Oxf3, Oxf3, OxfFf, 
Oxff, 0x07, Oxff, Oxff, 0x03, 0x03, 0x03, 0X00, 


/* invader(3) */ 
0x00, 0x00, Ox00, Oxc2, Oxfa, Oxfa, Oxfa, Oxfe, 
Oxf8, Oxf8, Oxf8, Oxf8, Ox00, Ox04, Oxfc, Oxee, 


/* fighter(@) */ 
0x00, Ox0@, OxO1, 0x01, 0x01, Ox01, Oxe1, Oxel, 
0x01, 0x43, 0x47, Ox4f, Ox5f, Ox7f, Ox7F, 0x00, 


/* fighter(1) */ 


ie 


0x18, Ox7e, Oxff, @xc3, Oxc3, Oxc3, Oxc3, Oxff, 
Oxff, Oxff, Oxe7, Oxe7, Oxe7, Oxe7, Oxff, Oxee, 


/* fighter(2) */ 
0x00, Ox0@, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 
0x80, ©xc2, Oxe2, Oxf2, Oxfa, Oxfe, Oxfe, 686x080, 


/* laser */ 
0x00, Ox18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 
0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x18, 0x00 


/* invader:"abcd", fighter:"efg", laser:"h" */ 


void HariMain(void) 


{ 


int win, timer, i, j, fx, laserwait, lx = @, ly; 
int ix, iy, movewait®, movewait, idir; 

int invline, score, high, point; 

char winbuf[336 * 261], invstr[32 * 6], s[12], 


keyflag[4], *p; 


static char invstr@[32] = " abcd abcd abcd abcd 


abcd "; 


win = api_openwin(winbuf, 336, 261, -1, "“invader"); 
api_boxfilwin(win, 6, 27, 329, 254, @); 

timer = api_alloctimer(); 

api_inittimer(timer, 128); 


high = ð; 

putstr(win, winbuf, 22, ©, 7, "HIGH:00000000"); 
restart: 

score = @; 

point = 1; 


putstr(win, winbuf, 4, ©, 7, "SCORE: 0@Q@000@0e") ; 
movewait® = 20; 


fx = 18; 
putstr (win, winbuf, fx, 13, 6, "efg"); 
wait(10@, timer, keyflag) ; 


next_group: 

wait(10@, timer, keyflag) ; 

工 X Ss 

iy = 1; 

invline = 6; 

for (i = ð; i < 6; i++) { 

for (j = 03 j < 27; j++) { 
invstr[i * 32 + j] = invstre[j]; 


} 
putstr (win, winbuf, ix, iy + i, 2, invstr + i * 
32); 
} 
keyflag[0] = ð; 
keyflag[1] = ð; 
keyflag[2] = ð; 


ly = 0; /* 不 显示 */ 
laserwait = Q; 

movewait = movewait®@; 

idir = +1; 

wait(10@, timer, keyflag); 


for (33) { 
if (laserwait != @) { 
laserwait--; 
keyflag[2 /* space */] = @; 
} 


wait(4, timer, keyflag); 


/* 自 机 的 处 理 */ 
if (keyf1lag[6 /* left */] != © && fx > O) { 


0) { 


oe 


fx--; 
putstr(win, winbuf, fx, 13, 6, "efg "); 
keyf]lag[6 /* left */] = ð; 

} 

if (keyflag[1 /* right */] != © && fx < 37) { 
putstr(win, winbuf, fx, 13, 6, " efg"); 
fx++; 
keyflag[1 /* right */] = ð; 

} 

if (keyflag[2 /* space */] != 6 && laserwait == 


laserwait = 15; 


lx = fx + 1; 
ly = 13; 
} 
/* 外 星人 移动 */ 
if (movewait != @) { 
movewait--; 
} else { 
movewait = movewait@; 
if (ix + idir > 14 || ix + idir < 0) { 


if (iy + invline == 13) { 
break; /* GAME OVER */ 

} 

idir = - idir; 

putstr(win, winbuf, ix + 1, iy, ©, " 
iy++; 

} else { 
ix += idir; 

} 

for (i = 0; i < invline; i++) { 
putstr(win, winbuf, ix, iy + i, 2, 


invstr + i * 32); 


} 


/* 炮 弹 处 理 */ 
if (ly > @) { 
if (ly < 13) { 
if (ix < lx && lx < ix + 25 && iy <= ly 
&& ly < iy + invline) { 
putstr(win, winbuf, ix, ly, 2, 
invstr + (ly - iy) * 32); 
} else { 
putstr(win, winbuf, 1x, ly, ©, " 


"); 
} 
} 
ly--; 
if (ly > @) { 
putstr(win, winbuf, 1x, ly, 3, "h"); 
} else { 
point -= 10; 
if (point <= @) { 
point = 1; 
} 
} 


if (ix < lx && lx < ix + 25 && iy <= ly && 
ly < iy + invline) { 
p = invstr + (ly - iy) * 32 + (1x - 


ix); 
inep lat 
/* hit ! */ 
score += point; 
point++; 


sprintf(s, "%@8d", score); 
putstr (win, winbuf, 10, ©, 7, s); 
if (high < score) { 

high = score; 


putstr(win, winbuf, 27, 0, 7, 


s); 
} 
for (p=; tp t=" tipa) A} 
for (i = 1; i < 5; i++) { 
i pli] = ' '; 


putstr (win, winbuf, ix, ly, 2, 
invstr + (ly - iy) * 32); 
for (; invline > ð; invline--) { 
for (p = invstr + (invline - 1) 
* 32; *p != 0; p++) { 


i ls ') { 
goto alive; 
} 
} 
} 
/* 全 部 消灭 */ 
movewait® -= movewait@ / 3; 
goto next_group; 
alive: 
ly = ð; 
} 
} 
} 
} 


/* GAME OVER */ 
putstr(win, winbuf, 15, 6, 1, "GAME OVER"); 
wait(@, timer, keyflag); 
for (i = 1; i < 14; i++) { 
putstr (win, winbuf, ©, i, @, " 
")3 
} 


goto restart; 


} 


void putstr(int win, char *winbuf, int x, int y, int 
col, unsigned char *s) 


{ 
int c, x@, i; 
char *p, *q, t[2]; 
X =X * 8+ 8; 
y=y * 16 + 29; 
xð = X; 
i = strlen(s); /* 计 算 s 的 字符 数 */ 
api_boxfilwin(win + 1, x, y, x +i* 8-41, y + 15, 
ð); 
q = winbuf + y * 336; 
t[1] = ð; 
for (33) { 
CS rs: 
if (c == @) { 
break; 
} 
if (c l= ' ') { 
if ('a' <= c && c <= 'h') { 
p = charset + 16 * (c - ‘a'); 
q += X; 
for (i = 0; i < 16; i++) { 
if ((p[i] & 6x86) != ©) { g[e] = 
col; } 
if ((p[i] & 0x40) != ©) { g[1] = 
col; } 
if ((p[i] & 0x20) != @) { g[2] = 
col; } 
if ((p[i] & 0x10) != ð) { g[3] = 
col; } 
if ((p[i] & 0x@8) != ð) { g[4] = 
col; } 


if ((p[i] & 6x64) != 6) { q[5] = 


col; } 
if ((p[i] & @xe2) != ð) { q[6] 


col; } 
if ((p[i] & 0x01) != Ə) { q[7] = 
col; } 
q += 336; 
} 
q -= 336 * 16 + X; 
} else { 
t[@] = *s; 
api_putstrwin(win + 1, x, y, col, 1, 
t); 
} 
} 
S++; 
x += 8; 
} 
api refreshwin(win, x@, y, x, y + 16); 
return; 
} 


void wait(int i, int timer, char *keyflag) 
{ 
int j; 
if (i > 6) { 
/* 等 待 一 段 时 间 */ 


A ame i); 


i = 128; 
} else { 

i = 0x@a; /* Enter */ 
} 
for (;;) 4 

j = api_getkey(1); 

if (i == j) { 


break; 


} 
if (j == '4') { 
keyflag[O /* left */] = 1; 


} 
if (j == '6') { 
keyflag[1 /* right */] = 1; 
} 
if gJ ss M | 
keyflag[2 /* space */] = 1; 
} 
} 
return; 


} 


由 于 这 不 是 操作 系统 ， 而 只 是 一 个 应 用 程序 。 这 本 
书 也 不 是 讲 如 何 编写 外 星人 游戏 的 ， 而 是 讲 如 何 编 
写 操作 系统 的 〈 笑 ) ， 因 此 对 于 程序 的 讲解 我 们 就 
速 战 速决 吧 。 


putstr 函 数 用 来 显示 字符 串 ， 不 过 ah 的 字符 不 是 直 
接 显示 ， 而 是 用 charset 的 字库 来 显示 的 ， 为 提高 显 
INEJ, (EH 了 api_refreshwin。 


wait 函 数 用 来 延 时 并 等 竺 按键 输入 。 当 ij 指 定 为 0 时 
等 待 回 车 键 的 输入 ， 人 否则 按照 “指定 的 时 间 x0.01 
秒 ” 为 基准 进行 延 时 每 等， 在 等 待 期 间 如 果 有 按键 
输入 则 反映 到 keyflag[0 一 2] 中 。 


HariMain 则 是 处 理 游 戏 的 主体 ， 里 面 有 很 多 变量 ， 
这 里 介绍 一 些 比较 难 懂 的 。 


fx: 自 机 的 x 坐标 (fighter_x) 


lx, ly: 等 离子 炮弹 的 坐标 Claser_x, 
laser_y) 1 


ix, iy: 外 星人 群 的 坐标 (invaders_x， 
invaders y) 


idir: 外 星人 群 的 移动 方 问 


(invaders direction) 
laserwait: 等 离子 炮弹 的 剩余 充电 时 间 
movewait: 当 这 个 变量 变 为 0 时 外 星人 和 群 前 进一步 


movewait®: movewait 的 初始 值 〈 消 灭 30 只 敌人 
后 减少 ) 


invline: 外 星人 和 群 的 行 数 Cinvaders_line) 


high: 最 高 得 分 
point: 得 分 的 增加 量 〈 奖 金 的 单价 ? ) 


invstr: 将 外 星人 群 的 状态 显示 为 字符 串 的 变量 


“一 开始 本 来 管 目 机 发 射 的 炮弹 叫 “ 诉 光 ”， 不 过 激 
THEIR CAFRA TESTER MER ST R), TEE 
编 故事 的 时 候 改 成 等 离子 炮弹 了 。 


mtLGame Over 了 ， 这 时 按 下 回 车 键 可 以 重新 开始 。 
对 于 这 个 程序 我 们 没有 设 定 正常 的 结束 方法 ， 大 家 
可 以 按 Shift+F1 或 者 点 击 “x” 按 钮 强制 结束 。 


好 了 ， 我 们 来 “make run”. AR RK, AS eth 
球 的 明天 ， 加 油 ! 


invader 


HRW MA Za Ci ate LAP). 终于 
JEJ! 

Mk S T sai 这 样 可 不 行 ， 要 是 人 生 能 重新 来 
过 就 好 了 〈 太 夸张 了 ) 。 其 实 按 下 回 车 键 就 可 以 了 
R, HEMT St, Ati SRW (K). 


我 们 再 来 重新 看 看 程序 吧 。make 之 后 生成 的 


invader.hrb 大 小 为 2335 字 节 ， 也 束 是 说 , “ 纸 娃娃 系 
统 ?” 所 有 其 备 的 API 使 得 这 样 一 个 游戏 仅 用 2.28KB 束 可 
以 写 出 来 。 和 其 他 操作 系统 相 比 ， 这 并 不 能 算是 非 
第 好 ， 不 过 笔者 还 是 感到 挺 和 日 蚂 的 。 


今天 就 到 这 里 吧 ， 明 天 我 们 继续 来 编写 应 用 程序 
哦 ! 


第 30 天 ”高 级 的 应 用 程序 


。 命 令 行 计算 磊 Charib27a) 
。 文本 阅览 器 (harib27b) 
。MML 播 放 需 Charib27c) 
。 Arial ies Charib27d) 

e IPLAC Charib27e ) 

。 光盘 启动 《harib27f) 


1 命令 行 计 算 需 Charib27a) 


这 一 草 我 们 要 编写 一 些 “ 高 级 的 应 用 程序 ”， 不 过 其 
实 也 没 那 么 高 级 ， 说 不 定 还 是 昨天 那个 invader.hrb 
比较 高 级 呢 ， 因 此 大 家 可 别 抱 太 大 的 期 望 哦 
(RY 


那 到 底 做 点 什么 样 的 应 用 程序 好 呢 ? 现在 我 们 的 系 
统 中 已 经 有 noodle.hrb 可 以 帮 有 我们 做 泡 面 ， 还 有 
invader.hrb 可 以 用 来 玩 游 戏 ， 应 该 再 找 一 些 其 他 能 
派 上 用 场 的 功能 ...... 于 是 笔者 想到 了 计算 器 。 


Windows 中 附带 了 一 个 计算 占 软 件 ， 不 过 做 那样 一 
个 好 看 的 计算 莫 太 麻烦 了， 我 们 就 做 一 个 在 命令 行 
中 输入 算式 来 进行 计算 的 应 用 程序 吧 。 


| iT i ft ft | 
我 们 来 看 程序 。 
calc.c 
#include "“apilib.h" 
#include <stdio.h> /* sprintf */ 


#define INVALID -Ox7 FF FFFFF 


int strtol(char *s, char **endp, int base); /* 标 准 函 数 
(stdlib.h) */ 


char *skipspace(char *p); 
int getnum(char **pp, int priority); 


void HariMain(void) 


{ 
int i; 
char s[30], *p; 
api_cmdline(s, 30); 
for (p = s; *p > ' 's pH) { } /* 一 直 读 到 空格 为 止 */ 
i = getnum(&p, 9); 
if (i == INVALID) { 
api_putstre@("error!\n"); 
} else { 
sprintf(s, "= %d = @x%x\n", i, i); 
api_putstr@(s); 
api_end(); 
} 
char *skipspace(char *p) 
{ 
for (; *p == ' '; pH) { } /* 将 空格 跳 过 去 */ 
return p; 
} 


int getnum(char **pp, int priority) 
{ 

char *p = *pp; 

int i = INVALID, j; 

p = skipspace(p); 


/* 单 项 运算 符 */ 


ips r 
p = skipspace(p + 1); 
i = getnum(&p, 0); 

} else if (*p == '-') { 
p = skipspace(p + 1); 
i = getnum(&p, 0); 
if (i != INVALID) { 


} 
} else if (*p == '~') { 
p = skipspace(p + 1); 
i = getnum(&p, 0); 
if (i != INVALID) { 
i = ~i; 


} 
} else if (*p == '(') { /* 括 号 */ 
p = skipspace(p + 1); 
i = getnum(&p, 9); 
if (*p == ')') { 
p = skipspace(p + 1); 
} else { 
i = INVALID; 


} 
} else if ('@' <= *p && *p <= '9') { /* 数 值 */ 
i = strtol(p, &p, ©); 
} else { /* 错 误 */ 
i = INVALID; 
} 


/*# 二 项 运算 符 */ 
for (33) { 
if (i == INVALID) { 
break; 
} 
p = skipspace(p); 
if (*p == '+' && priority > 2) { 


p = skipspace(p + 1); 
j = getnum(&p, 2); 
if (j != INVALID) { 
i += j; 
} else { 
i = INVALID; 


else if (*p == '-' && priority > 2) { 
p = skipspace(p + 1); 
j = getnum(&p, 2); 
if (j != INVALID) { 


i -= j; 
} else { 
i = INVALID; 
else if (*p == '*' && priority > 1) { 


p = skipspace(p + 1); 
j = getnum(&p, 1); 
if (j != INVALID) { 


i “= j; 
} else { 
i = INVALID; 
else if (*p == '/' && priority > 1) { 


p = skipspace(p + 1); 
j = getnum(&p, 1); 
if (j != INVALID && j != 6) { 


i /= j; 
} else { 
i = INVALID; 
else if (*p == '%' && priority > 1) { 


p = skipspace(p + 1); 

j = getnum(&p, 1); 

if (j != INVALID && j != 6) { 
i %= j; 


> 3) { 


> 3) { 


} else { 
i = INVALID; 


} 


} else if (*p == '<' && p[1] 


p = skipspace(p + 2); 
j = getnum(&p, 3); 
i 


'<' && priority 


f (j != INVALID && j != 0) { 
1 <<=. J; 
} else { 
i = INVALID; 
} 
} else if (*p == '>' && p[1] == '>' && priority 
p = skipspace(p + 2); 
j = getnum(&p, 3); 
if (j != INVALID && j != @) { 
i >>= j; 
} else { 
i = INVALID; 
} 
y else if (*p == '&' && priority > 4) { 
p = skipspace(p + 1); 
j = getnum(&p, 4); 
if (j != INVALID) { 
i &= j; 
} else { 
i = INVALID; 
} 
y else if (*p == '*' && priority > 5) { 


p = skipspace(p + 1); 
j = getnum(&p, 5); 
if (j != INVALID) { 
i ^= j; 
} else { 


i = INVALID; 


} 
} else if (*p == '|' && priority > 6) { 
p = skipspace(p + 1); 
j = getnum(&p, 6); 
if (j != INVALID) { 


i |= j; 
} else { 
i = INVALID; 
} 
} else { 
break; 
} 
} 
p = skipspace(p); 
“pp = p; 
return i; 


如 果 以 前 没有 编写 过 类 似 的 计算 器 程序 的 话 ， 估 计 


不 太 容 易 看 恒 上 面 这 段 程序 。 这 段 程序 本 来 加 已 经 
偏离 了 “编写 操作 系统 ”这 个 主题 ， 因 此 笔者 也 没 打 
算 益 着 大 家 看 情 ， 不 过 如 果 你 对 这 段 程序 很 感 兴 
趣 ， 不 妨 和 匈 运 行 一 下 玩 玩 看 ， 然 后 再 仔细 阅读 下 面 
的 讲解 ， 一 定 能 慢 慢 看 明白 的 。 


在 这 上 段 程序 中 使 用 了 strtol(s, endp, base) 这 样 一 个 函 
数 ， 这 个 函数 的 功能 基本 上 和 sprintf 是 相反 的 ， 它 
可 以 将 字符 串 形式 的 数值 转换 为 整数 。 字 符 串 的 地 
址 由 s 指 定 ，base 表 示 进 制 ， 例 如 10 代 表 十 进 制 ，16 
代表 十 六 进 制 ，0 则 代表 上 自动 识别 《以 0x 开 头 则 识 


All APNE) 


endp 一 般 可 以 指定 为 0， 也 可 以 指定 一 个 变量 的 地 
址 ， 如 果 指 定 了 地 址 ， 则 函数 会 返回 在 转换 字符 串 
时 所 读 取 到 的 学 符 串 末尾 地 址 。 字 符 串 末尾 地 址 是 
一 个 char * 型 的 变量 ， 这 个 变量 的 地 址 由 endp 指 
定 ， 地 址 的 地 址 ， 也 束 是 一 个 char ** 型 的 变量 。 


strtol 是 一 个 只 要 include 了 就 可 以 使 用 的 标准 函数 ， 
不 过 笔者 在 “ 纸 娃 娃 系 统 ” 用 的 tolset 中 没有 包含 ， 
此 在 程序 中 直接 进行 了 声明 。 


getnum 中 也 使 用 了 char ** 型 的 参数 ， 和 strtol 一 样 ， 
也 是 为 了 将 当前 解析 到 算式 中 的 位 置 返 回 给 相应 的 


函数 getnum 的 功能 是 将 字符 串 形式 的 算式 进行 解 
释 ， 并 获取 一 个 数值 。 除 了 进入 字符 串 开始 地 址 的 
变量 地 址 外 ， 还 需要 指定 计算 到 哪个 等 级 的 运算 符 
CH, PEF RRA MERI S) 。 在 
HariMain 中 我 们 指定 了 9， 这 代表 “无 论 多 么 低 优先 
级 的 运算 符 ， 全 部 需要 计算 出 来 的 意思 。 


用 作 运 算 符 的 字符 包括 + -*/%&|^~ << >>()， 
结果 同时 显示 十 进 制 和 十 六 进 制 。 不 过 计算 都 是 以 
整数 进行 ， 比 如 : 10/3=3， 可 以 使 用 负数 。 计 算 


的 优先 级 和 C 语 言 的 规定 相同 ， 因 此 1+2*3+4= 
11， 如 果 单 纯 从 左 往 右 按 顺 序 计算 的 话 结果 应 该 是 
13， 但 我 们 的 计算 器 不 会 这 样 计算 ， 当 然 ， 如 果 输 
入 (1+2) *3+4 的 话 就 可 以 计算 出 13 了 哦 。 


由 于 使 用 了 和 C 语 言 相 同 的 语法 规则 ， 因 此 ^ 是 代 
表 XOR 运 算 的 运算 符 ，2^3 可 不 是 “2 的 3 次 方 ” 的 意 
思 ， 而 是 “2 XOR 3” 的 意思 哦 。 男 外 ， 和 C 语 言 一 
样 ， 我 们 可 以 直接 输入 十 六 进 制 的 数字 进行 计 
算 ， 只 要 在 数字 前 面 加 上 0x 承 可 以 了 。 


我 们 来 “make run” 看 看 吧 ， 关 于 使 用 方法 ， 可 以 输 
AUD “calc 1+2”。 


console 


尝试 进行 了 各 种 计算 


怎么 样 ， 还 挺 有 意思 的 吧 ? 这 样 一 来 ， 一 些 比较 简 
单 的 计算 用 “ 纸 娃娃 系统 ?就 可 以 胜任 了 哦 ， 可 喜 可 
贺 。 对 了 ，calc.hrb 只 有 1688 字 节 哦 ， 短 小 精 悍 吧 ! 


2 MA teas Charib27b) 


“ 纸 娃 娃 系 统 ” 中 己 经 有 了 type.hrb， 可 以 显示 出 文本 
文件 的 内 容 。 不 过 由 于 屏幕 滚动 的 速度 太 快 ， 而 且 
没有 办 法 往 回 深 动 ， 用 起 来 挺 不 方便 的 ， 而 且 命 令 
行 窗口 也 太 小 了 。 


于 是 ， 我 们 来 做 一 个 用 来 伍 看 文本 文件 内 容 的 文本 
Dal aE o 


A COR TERS... TEDL BERR ER IEE — KE 
程序 出 来 好 像 挺 无 聊 的 ， 从 现在 起 就 先 给 大 家 展示 
一 下 完成 后 的 运行 画面 好 了 。 如 果 事 先知 道 要 做 出 
e 再 去 看 程序 的 话 应 该 会 更 容易 
理解 吧 。 


一 ”人 一 一 


输入 “tview ipl20.nas -w100 -h30”， 运 行 结果 如 下 


; haribote-ipl 
; TAB=4 
CILS EQU 20 ; CLETHAULDY 
ORS 0x7c00 ; CDIOFILMEZIHHATNZOM 
; 以 下 二 标准 的 如 FAT12 了 才 一 了 > 下 了 yw 已 一 子 7 AIDKOHORM 
entry 
0x90 t 
“HARIBOTE” ; 7 i Gr. 
512 ; b>) 
: IZ LRIFAUTE IF SLY) 
Midi? FAP Sic FS) 


Jt tt z 


JI tt 


IRAI YV b EFS) 
LFUF) 
LAFL +) 


DB 
B 
i" 
DB 
Y 
B 
Y 
Dy 
DB 
四 
y 
Y 
D 
D 
B 
D 
B 
E 


[一 一 上 一 一 一 | 一 一 [一 | 
| NIKITL 
xs 立马、 


I! 显示 出 来 了 


用 光标 键 可 以 上 下 左右 进行 深 动 ， 在 REMU 中 可 能 
速度 不 是 很 快 ， 这 是 由 于 模拟 妖 性 能 不 佳 造 成 的 ， 
在 真 机 环境 下 速度 还 是 相当 快 的 哦 。 


深 动 的 速度 也 是 可 以 调节 的 。 按 “b” 可 以 将 纵 问 深 
动 的 速度 设 为 每 次 2 行 ，“c”*” 则 每 次 4 行 ，“d” 则 每 次 8 
行 。 以 此 类 推 ， 可 以 一 直 用 到 “f”?， 按 “a” 则 恢复 为 
初始 状态 ， 每 次 深 动 1 行 。 同 样 地 ， 用 “A”~“F” 可 
以 改变 横向 深 动 的 速度 。 


天 于 局 动 时 的 命令 行 选项 ，-w 和 -h 代 表 窗 口 的 大 
小 。-w 表 示 打 开 一 个 宽度 为 100 个 半角 字符 的 窗 


口 ， 最 大 可 以 指定 为 126。-h 表 示 行 数 ， 最 大 可 以 
指定 为 45。 如 果 不 指 定 -w 和 -h， 则 默认 为 -w30、- 
h10。 


此 外 ， 用 -t 选 项 可 以 指定 制 表 符 的 大 小 ， 省 略 的 话 
则 按照 笔者 的 习惯 默认 为 -4。 制 表 符 的 大 小 在 程序 
局 动 后 也 可 以 通过 “<” 和 “>” 键 来 进行 调 市 。 


按 “gq” 或 者 “Q” 可 以 退出 程序 。 其 实 这 个 键 倒 没 那么 
重要 。 即 便 态 记 了 ， 点 击 “x” 按 钮 或 者 按 Shift+F1 强 
制 结束 也 没什么 问题 。 


下 和 面 我 们 来 看 程序 吧 。 


tview.c 


#include "“apilib.h" 


#include <stdio.h> 


int strtol(char *s, char **endp, int base); /* 标 准 函 数 
(stdlib.h) */ 


char *skipspace(char *p); 

void textview(int win, int w, int h, int xskip, char 
*p, int tab, int lang); 

char *lineview(int win, int w, int y, int xskip, 
unsigned char *p, int tab, int lang); 


int puttab(int x, int w, int xskip, char *s, int tab); 


void HariMain(void) 

{ 
char winbuf[1024 * 757], txtbuf[24@ * 1024]; 
int w = 30, h = 10, t = 4, spd x = 1, spd y = 1; 
int win, i, j, lang = api_getlang(), xskip = 0; 
char s[30], *p, *q = 0, *r = 0; 


/* 命 令 行 解析 */ 
api_cmdline(s, 30); 
for (p = s; *p > ' '; p+) { } /* 一 直 读 到 空格 为 止 */ 
for (; *p != 60; ){ 
p = skipspace(p); 
if (*p == '-') { 
if (p[1] == 'w') { 
w = strtol(p + 2, &p, ®); 
if (w < 20) 
w = 20; 
} 
if (w > 126) { 
w = 126; 


} 
} else if (p[1] == 'h') { 
h = strtol(p + 2, &p, @); 
if (h < 1) 
h = 1; 


if (h > 45) { 


h = 45; 
} 
y else if (p[1] == 't') { 
t = strtol(p + 2, &p, 9); 
if (t < 1) 
t = 4; 


i 


} else { 


err: 
api_putstre@(" >tview file [-w30 -h16 - 
t4]\n"); 
api_end(); 
} 
} else { /* 找 到 文件 名 */ 
if (q != @) { 
goto err; 
} 
q = Ps 
for (; *p > ' '3 ptt) { } /#* 一 直 读 到 空格 为 
用 7 
r = p; 
} 
} 
if (q == 0) { 
goto err; 
} 
/* 准 备 窗 口 */ 
win = api_openwin(winbuf, w * 8 + 16, h * 16 + 37, 
-1, "tview"); 
api_boxfilwin(win, 6, 27, w * 8+ 9, h * 16 + 30, 
7); 


/* 载 入 文件 */ 

*r = Q; 

i = api_fopen(q); 

if (i == ð) { 
api_putstre@("file open error.\n"); 
api_end(); 


j = api_fsize(i, Q); 
if (j >= 240 * 1024 - 1) { 


4A 


j = 240 * 1024 - 2; 


} 

txtbuf[6] = 8@x8a; /* 卫 兵 用 的 换行 代码 */ 

api fread(txtbuf + 1, j, i); 

api_fclose(i); 

txtbuf[j + 1] = 9; 

q = txtbuf + 1; 

for (p = txtbuf + 1; *p != @; p++) { /* 为 了 让 处 理 


变 得 简单 ， 删 挤 6@xe8d 的 代码 */ 
if (*p != @x@d) { 
*q = *p; 
q++; 
} 
} 
*q = ð; 
/* 主 体 */ 
p = txtbuf + 1; 
for (;;) { 
textview(win, w, h, xskip, p, t, lang); 
i = api _getkey(1); 
if (i == 'Q' || i == 'q') { 
api_end(); 
if ('A' <= i && i <= 'F') { 
spd x = 1 << (i - 'A'); /* 1, 2, 4, 8, 16; 
32 */ 
} 
if ('a' <= i && i <= 'f') { 
spd y = 1 << (i - 'a'); /* 1, 2, 4, 8, 16, 
32 */ 
} 
if (i == '<' && t > 1) { 
t = 2; 
} 


if (i == > && t < 256) { 


} 
if (i == '4') { 


for (33) { 
xskip -= spd x; 
if (xskip < 0) { 


xskip = ð; 
} 
if (api_getkey(®) != '4') { /* 如 果 没 有 按 
下 “4" 则 处 理 结束 */ 
break ; 
} 
} 
} 
if (i == '6') { 
for (33) { 
xskip += spd x; 
if (api_getkey(@) != '6') { 
break; 
} 
} 
} 
if (i == '8') { 
for (33) { 


for (j = 6j j < spd_y; j++) { 
if (p == txtbuf + 1) { 
break ; 
} 
for (p--; p[-1] != @x@a; p--) { } 
/*# 回 调 到 上 一 个 字符 为 6x6a 为 止 */ 


if (api_getkey(6) != '8') { 
break; 


} 


if (i == '2') { 
for (33) { 
for (j = 0; j < spd_y; j++) { 
for (q = p; *q != © && *q != Qx@a; 


q++) { } 
if (*q == 6) { 
break; 
} 
p=q+1; 
} 
if (api_getkey(@) != '2') { 
break; 
} 
} 
} 
} 
} 
char *skipspace(char *p) 
{ 
for (5 *p == ' '; p++) { } /* 跳 过 空格 */ 
return p; 
} 


void textview(int win, int w, int h, int xskip, char 
*p, int tab, int lang) 
{ 

int i; 

api_boxfilwin(win + 1, 8, 29, w* 8+ 7, h * 16 + 
28, 7); 

for (i = ð; i < h; i++) { 

p = lineview(win, w, i * 16 + 29, xskip, p, 

tab, lang); 

} 


api_refreshwin(win, 8, 29, w * 8 + 8, h * 16 + 29); 


return; 


} 


char *lineview(int win, int w, int y, int xskip, 
unsigned char *p, int tab, int lang) 
{ 

int x = - xskip; 

char s[130]; 

for (33) { 

if (*p == 6) { 
break; 


if (*p == 9X0a) { 
p++; 
break; 


if (lang == 0) { /* ASCII */ 
if (*p == 0x09) { 
x = puttab(x, w, xskip, s, tab); 


} else { 
if (0 <= x & x < w) { 
s[x] = *p; 
} 
X++; 
} 
p++; 


} 
if (lang == 1) { /* SJIS */ 
if (*p == 0x09) { 
x = puttab(x, w, xskip, s, tab); 
p++; 
} else if ((@x81 <= *p && *p <= 6x9f) || 
(O@xe®@ <= *p && *p <= Oxfc)) { 
/* 全 角 字 符 */ 


} 
if (0 <= x && x < w - 1) { 


} 
if (lang == 2) { /* EUC */ 
if (*p == 0x09) { 
x = puttab(x, w, xskip, s, tab); 


p++; 
} else if (@xal <= *p && *p <= Oxfe) { 
/* 全 角 字 符 */ 
if (x == -1) { 
sle] = " '; 
} 
if (0 <= x && x < w - 1) { 
s[x] = *p; 
s[x + 1] = p[1]; 
} 
if (x == w- 1) { 
s[x] = ' '; 
} 


X += 2; 


p += 25 


} else { 
if (0 <= x & x < w) { 
s[x] = *p; 
X++; 
p++; 
} 
} 
if (x > w) { 
X = WwW; 
if (x > @) { 
s[x] = ð; 
api putstrwin(win + 1, 8, y, ð, x, s); 
} 
return p; 


} 


int puttab(int x, int w, int xskip, char *s, int tab) 


for (33) { 
if (0 <= x && x < w) { 
s[x] = ' '; 
X++; 
if ((x + xskip) % tab == @) { 
break; 
} 
} 
return x; 


程序 基本 上 没有 什么 难点 《虽然 看 上 去 很 长 ) ， 只 


Yea VO. 


BE Te PETE VIZ 


也 问题 不 大 。 


在 屏幕 滚动 的 处 理 上 用 了 api_getkey(0)， 这 是 为 了 
在 REMU 上 运行 时 可 以 尽量 减少 延迟 。 当 同一 个 键 
被 连续 按 下 时 ， 程 序 会 将 按键 数据 全 部 读 取 之 后 ， 
再 计算 出 总 的 移动 量 ， 然 后 再 进行 显示 。 


这 个 tview.hrbp 只 有 1753 字 节 ， 跟 calc.hrb 大 小 差 不 
多 。 咖 ， 也 是 短小 精 悍 的 。 这 么 小 的 应 用 程序 可 以 
拥有 如 此 不 错 的 功能 ， 我 们 的 “ 纸 娃 娃 系统 ”还 真是 
挺 强 大 的 系统 呢 。 


有 人 可 能 会 说 ， 既 然 都 做 到 这 一 步 了 ， 还 不 如 干脆 
做 成 文本 编辑 器 呢 。 其 实 笔者 也 是 这 么 想 的 ， 只 不 
过 现在 的 “ 纸 娃娃 系统 ”中 还 没有 用 于 写 入 文件 的 
API， 即 便 做 了 文本 编辑 器 也 无 法 保存 ， 感 觉 没有 
什么 意义 。 看 来 “ 纸 娃娃 系统 ”还 不 太 给 力 啊 
Co 


EAH. Allcalc.hrb—f#, MEEA Te 


ZI 


3 MML 播放 器 (harib27c ) 


我 们 来 想 想 看 ， 用 现存 的 API， 还 能 做 出 什么 有 趣 
的 应 用 程序 呢 ? 想 起 来 了 ， 做 个 演奏 首 乐 的 程序 
吧 ， 这 样 一 来 我 们 惑 可 以 边 听 音乐 边 看 电子 书 了 ， 
好 不 民 意 。 不 过 说 是 首 乐 ， 其 实 只 是 用 首 质 很 烽 的 
蜂 鸣 右 来 演 委 啦 。 


先 来 看 看 实际 运行 的 画面 。 输 入 “mmlplay 
daigo.mml”* 后 如 下 图 。 


console x| 


>mmlplay daigo.mml 


TEE daigo.mml 
| 
Teha En op. 6T 


=a —_ 


正在 演奏 daigo.mmll 


“乐曲 名 称 为 《c 小 调 第 五 交 啊 曲 “ 命 运 ”op.67》 。 
PEE 


在 命令 行 中 指定 的 文件 名 ， 是 一 个 用 MML (music 


macro language) 编写 的 文本 文件 。 这 个 文件 中 包 
舍 的 内 容 是 乐谱 数据 ， 如 “ 哆 来 咪 发 唆 啦 西 哆 ”分 别 
对 应 “CDEFGABC”( 在 C 大 调 中 ) 。 在 音符 的 后 面 
加 上 “+? 或 者 “ 提 表 示 升 高 半音 ， 加 上 “-? 表 示 降 低 半 
音 。 再 后 面 还 可 以 加 上 数字 ,，“4” 表 示 四 分 音 

符 ,，“8” 表 示 八 分 音符 ,，“1? 表 示 全 音符 ， 如 果 

是 “2.” 的 话 则 表示 符 点 二 分 首 符 。 


“O” 命 令 用 来 设 定 八 度 音 区 ， 例 如 可 以 设 

为 “O04”。“L” 命 令 用 来 设 定 首长 ， 表 示 首 符 或 者 休 
IEF CR) 在 不 指定 音 长 时 的 默认 音 长 。“T” 命 令 用 
来 设 定 乐 曲 速 度 ,，“>” 用 来 升 高 一 个 八 度 ,，“<” 用 来 
降低 一 个 八 度 ，“&”* 表 示 连 音 线 。“Q” 用 来 指定 音符 
演奏 是 短促 还 是 连贯 ， 如 “Q4” 标 出 断 霍 ,，“Q8” 表 示 
一 直 使 用 连 音 奏 法 。 


“$" 开 头 的 是 扩展 命令 ， 是 笔者 目 己 对 MML 语 法 扩 - 
展 出 来 的 。“$K” 是 卡拉 OK 命令 ， 后 面 指定 的 字符 

串 会 显示 在 卡拉 OK 栏 中 。“$E” 表 示 卡 拉 OK 歌 词 数 
据 的 字符 编码 ， 不 过 这 个 信息 在 mmlplay.hrb 中 是 被 
忽略 的 。 


MML 数 据 中 是 不 区 分 大 小 写 的 ， 演 奏 到 最 后 会 目 
动 回 到 开头 重新 演奏 ， 按 下 “Q” 可 以 退出 。 


在 演奏 过 程 中 有 一 条 监 色 的 竖 线 在 不 停 地 动 ， 它 是 


根据 音阶 来 移动 的 ， 笔 者 党 得 这 个 看 上 去 挺 好 玩 
的 。 


笔者 的 喜好 
F) 。 乐 曲 数 据 文件 貌似 都 比较 大 ， 因 此 全 部 用 
了 压缩 。 


“这 里 的 几 前 歌曲 给 出 的 是 日 文 版 的 歌词 ， 如 果 
大 家 没有 对 日 文 显 示 文 持 的 部 分 进行 改造 ， 而 是 
A 那么 
在 这 里 只 有 用 日 文 的 歌词 才能 正常 显示 。 如 末 大 
各 对 日 六 显示 的 部 分 进行 了 改装 ， 并 使 用 了 让 
字库 ， 那 么 就 需要 将 歌词 答 换 为 中 文 。 为 了 方便 
大 家 使 用 ， 我 们 在 原文 下 面 给 出 了 相应 的 中 文 歌 
词 。 pee 


kirakira.mml 


/* 《小 星星 》3 法 国民 歌 */ 


$E"SJIS"; T120L404 

$K" 一 闪 一 内 亮晶晶 ， 满 天 都 是 小 星星 "， CCGGAAG2 FFEEDDC2 
$K" 挂 在 天 上 放 光 明 ， 好 像 许多 小 眼睛 "， GGFFEED2 GGFFEED2 
$K" 一 闪 一 内 亮晶晶 ， 满 天 都 是 小 星星 "， CCGGAAG2 FFEEDDC2 
$K""; R1 

$K" 一 闪 一 内 亮晶晶 ， 满 天 都 是 小 星星 " ， CCGGAAG2 FFEEDDC2 


$K" 挂 在 天 上 放 光 明 ， 好 像 许多 小 眼睛 " GGFFEED2 GGFFEED2 


CCGGAAG2 FFEEDDC2 
R1 R1 


闪 一 内 亮晶晶 ， 满 天 都 是 小 星星 "; 


$K" 
$K" " ; 


3 这 首 歌 中 文 版 歌词 只 有 一 段 ， 第 二 段 重复 第 一 


段 歌 词 即 可 。 


fujisan.mml 


/* 《富士 山 》4 日 本 文部 省 民歌 */ 


$E"SJIS"; T120L404 


$K" 冲 破 云 霄 "， G.G8AGEC8D8E2 D.G8GF8E8D2.R 


$K" 做 视 群 山 "1 
$K" 问 是 惊雷 " 1 
$K" 富 士 ， 日 本 第 一 山 "; 


SK" ey 
BK" RR HE 


IMER"; 


Fe! 1 


SK" AU"; 


$K" 富 士 ， 日 本 第 


$K" " ; 


Say 


G.G8ECA.B8>C<A 
D . D8DDC8D8E8F8G2 
>C2<AGE . E8AG 


G.G8AGEC8D8E2 
G.G8ECA.B8>C<A 

D . D8DDC8D8E8F8G2 
>C2<AGE . E8AG 


R1IR1 


G.A8G8F8E8D8C2.R 
A.B8>C<AG2.R 
FED.C8C2.R 


D.G8GF8E8D2.R 
G.A8G8F8E8D8C2.R 
A.B8>C<AG2.R 
FED.C8C2.R 


“这 首 歌 是 日 本 的 歌 证， 没有 相应 的 中 文 版 歌 


词 ， 这 里 给 出 翻译 的 歌词 大 意 。 一 一 译 者 注 


daigo.mml 


范 。 贝 多 芬 */ 


/* "第 五 交响 曲 c 小 调 "命运 " op ，67" 选 段 路 德 维 希 。 


$E"SJIS"; $K" 第 五 交响 曲 c 小 调 "命运 " op.67"; 
T155Q7L804 

RGGGE-2.RFFFD4&D1 

RGGGQ8E -Q7A-A-A-Q8GQ7>E-E-E-C8&C2<GGG 
Q8DQ7A-A-A-Q8GQ7>FFFD8&D2GGF 


Q8E-Q7<E-E-FQ8G>Q7GGFQ8E-Q7<E-E-F 
Q8GQ7>GGFL4E-RCRG2 .L8R<A-A-A-F4&F1 
RA-A-A-Q8FQ7DDDQ8<BQ7A-A-A-Q8GQ7<GGG 
>>E-A-A-A-Q8FQ7DDDQ8<BQ7A-A-A-Q8GQ7<GGG 

>>E - G>CCQ8C2Q7<BBB>DQ8D2Q7CCCE-Q8E-Q7DQ4DF 
Q8FQ7EQ4EGQ7GQ7FQ4FA-Q8A-Q7GQ4GB-Q8B-Q7A-Q4A->C 
Q8CQ7<BQ4B>DQ7CE -E - E - C<GGGE - C<GGE - CCC<B>>>FDD 


<BGFFD<BGFD<B>CCC>>E-E-E- 
C<AAAG-E-E-E-C<AAAA4R2R4B-4R4 
RB-B-B-E-2F2Q8<B-2>L4B->E-DE-FQ7CQ8CQ7<B- 
Q8B->E-DE-FQ7CQ8CQ7<B-Q8>B->E-DE-FQ7CQ8C<B- 
Q8<B->CD-Q7CQ8<B->C<B-Q7A-Q8>D-E-FQ7E- 
Q8D-E-D-Q7CQ8E-FG-FE-Q7FQ8G-FE-Q7FQ8G-F 
E-Q7FQ8G-FE-FG-FG-Q7AL8B-&B-204>C<B-A- 
Q8A-Q7GQ4FE - Q8E-Q7DQ4CDQ8FQ7E-04<B-G 
Q8>D07CQ4<A -FQ8>CQ7<B-Q4GE-Q7<B-Q8>>AB-A 
B-AB-Q7AQ4B->C<B-A-Q8A-Q7GQ4FE -Q8E-Q7DQ4CD 
Q8FQ7E-Q4<B-GQ8>DQ7CQ4<A-FQ8>CQ7<B-Q4GE- 
Q7<B->B->B-B-E-GGGE-<B-B-B-GE-E-E- 
Q8<B-Q7>DDDQ8E -Q7>GGGE -<B-B-B-GE-E-E- 
Q8<B-Q7>B-B-B-B-4R4.B-B-B-B-4R4.>DDDE-4 
R1R4 


daiku.mml 


* "第 九 交 响 曲 d 小 调 "合唱 " op.125" 选 段 路 德 维 希 。 范 。 贝 多 芬 5 */ 


$E"SJIS"; T110L4 

04 
$K" 欢 乐 女神 ， 圣 洁 美 丽 ， 灿 烂 光芒 照 大 地 "， F+F+GA AGF+E DDEF+ 
F+.E8E2 
$K" 我 们 心中 充满 热情 ， 来 到 你 的 对 山里 "， F+F+GA AGF+E DDEF+ 
E.D8D2 
$K" 你 的 力量 能 使 人 们 消除 一 切 分 歧 " ; EEF+D EF+8G8F+D EF+8G8F+E 
DE<A> 
$K" 在 你 光辉 照耀 下 面 ， 人 们 团结 成 兄弟 " F+& F+F+GA AGF+E DDEF+ 
E.D8D2 

05 

$K" 在 这 美丽 大 地 上 ， 普 世 众 生 共 欢乐 " ; F+F+GA AGF+E DDEF+ 


F+,E8E2 


$K" 一 切 人 们 不 论 善 恶 ， 都 蒙 自然 赐 恩泽 " ; F+F+GA AGF+E DDEF+ 
E.D8D2 


$K" 它 给 我 们 爱情 美酒 ， 同 生 共 死 好 朋友 " EEF+D EF+8G8F+D 
EF+8G8F+E DE<A> 

$K" 它 让 众生 共享 欢乐 ， 天 使 也 高 声 同 唱歌 " ; F+& F+F+GA AGF+E DDEF+ 
E.D8D2 

$K""; R1 


> KARE) PSC FEA 4B, AE SAR 


性 的 第 1 段 和 第 3 段 。 


PTE 


然后 我 们 来 看 程序 。 


mmiplay.c 


#include "“apilib.h" 


#include <string.h> /* strlen */ 


int strtol(char *s, char **endp, int base); /#* 标 准 函 数 
(stdlib.h) */ 


void waittimer(int timer, int time); 
void end(char *s); 


void HariMain(void) 
{ 

char winbuf[256 * 112], txtbuf[100 * 1024]; 

char s[32], *p, *r; 

int win, timer, i, j, t = 120, 1 = 192 / 4, 0 = 4, 
q = 7, note_old = Q; 


/*#* 音 号 与 频率 (mHz) 的 对 照 表 */ 

/# 例 如 ，64A 为 446Hz， 即 446666 */ 

/# 第 16 八 度 的 A 为 1892246Hz， 即 18922466868 */ 
/* 以 下 为 第 16 八 度 的 列表 (C~B) */ 


static int tonetable[12] = { 


1071618315, 1135340056, 1202850889, 1274376125, 


1350154473, 1430438836, 


1515497155, 1605613306, 1701088041, 1802240000, 


1909406767, 2022946002 


+2, 


Js 


static int notetable[7] = { +9, +11, +0 /* C */, 


+4, +5, +7 }; 


/* 命 令 行 解析 */ 
api_cmdline(s, 30); 


for (p = s; *p > ' '3s pH) { } /* 一 直 读 到 空格 为 止 */ 


for (; *p == ' '; p++) { } /* 跳 过 空格 */ 
i = strlen(p); 
if (i > 12) { 


file error: 


end("file open error.\n"); 


} 

if (i == @) { 
end(Q@); 

} 


/* 准 备 窗口 */ 


win = api_openwin(winbuf, 256, 112, -1, "mmlplay"); 


api_putstrwin(win, 128, 32, ©, i, p); 
api_boxfilwin(win, 8, 60, 247, 76, 7); 
api_boxfilwin(win, 6, 86, 249, 105, 7); 


/* 载 入 文件 */ 
i = api fopen(p); 


if (i == @) { 
goto file error; 

} 

j = api_fsize(i, Q); 

if (j >= 100 * 1024) { 
j = 100 * 1024 - 1; 


api_fread(txtbuf, j, i); 
api_fclose(i); 

txtbuf[j] = ð; 

r = txtbuf; 

i = 0; /* 通 常 模 式 */ 


for (p = txtbuf; *p != @; p++) { /* 为 了 方便 处 理 ， 


将 注释 和 空白 删 去 */ 
if (i == @ && *p > 
nis age Cp ss/ | 
if CDEC) gees Oe 
i S15 
} else if (p[1] == '/') { 
1 
} else { 
*r = *p; 
if ('a' <= *p && *p <= 
*r += 'A' - 'a'; 
转换 为 大 写字 母 */ 
} 
r++; 
} 
} else if (*p == Ox22) { 
*r = *p; 
r++; 
is 3; 
} else { 
SAPI 
r++; 


"OY { ”/* 不 是 空格 或 换行 符 */ 


Zz) 4 


/* 将 小 写字 母 


} else if (i == 1 && *p == '*' && p[1] == '/') 
{ /* BOERE* / 
p++; 
i = ð; 


} else if (i == 2 && *p == 6x6a) { /* 行 注释 */ 
i = ð; 
} else if (i == 3) { /* 字 符 串 */ 
*r = *p; 
r++; 
if (*p == 0x22) { 
i = ð; 
} else if (*p == '%') { 
p++; 
*r = *pþ; 
r++; 


/* 定 时 器 准备 */ 
timer = api alloctimer(); 
api_inittimer(timer, 128); 


/* 主 体 */ 
p = txtbuf; 
for (33) { 
if (('A' <= *p && *p <= 'G') || *p == 'R') { 
[EIT DRIER */ 
/* 计 算 频 率 */ 
if (*p == 'R') { 
i = ð; 
s[6] = ð; 
} else { 
i =o * 12 + notetable[*p - 'A'] + 12; 


s[6] = '0'; 
s[1] = '0' + 0; 
s[2] = *p; 
s[3] = ' '; 
s[4] = ð; 
} 
p++; 
if (4p == + [| *p == -|| *p == '#') { 
s[3] = *p; 
if (*p == '-') { 
1--; 
} else { 
i++; 
} 
p++; 


if (i != note_old) { 
api_boxfilwin(win + 1, 32, 36, 63, 51, 


8); 

if (S[6] != 0) { 

api_putstrwin(win + 1, 32, 36, 10, 

4, s); 

} 

api_refreshwin(win, 32, 36, 64, 52); 

if (28 <= note_old && note_old <= 107) 
{ 


api_boxfilwin(win, (note_old - 28) 
* 3 + 8, 60, (note_old - 28) * 3 + 10, 76, 7); 
} 
if (28 <= i && i <= 107) { 
api_boxfilwin(win, (i - 28) * 3 + 
8, 60, (i - 28) * 3 + 10, 76, 4); 
} 
if (s[@] != 0) { 
api_beep(tonetable[i % 12] >> (17 
i / 12)); 


} else { 
api_beep(@); 
} 


note_old = i; 


} 

/* 音 长 计算 */ 

if ('0' <= *p && *p <= '9') { 
i = 192 / strtol(p, &p, 10); 

} else { 
i = l; 

} 

for (; *p == '.'; ) { 
p++; 
i += i / 2; 

} 

i *= (60 * 100 / 48); 

i /= t; 

if (s[@] != 0 && q < 8 && *p != '&') { 
j=i*q/ 8; 
waittimer(timer, j); 
api_boxfilwin(win, 32, 36, 63, 51, 8); 
if (28 <= note_old && note_old <= 107) 


{ 
api_boxfilwin(win, (note_old - 28) 
* 3 + 8, 60, (note_old - 28) * 3 + 10, 76, 7); 
} 
note old = 0; 
api_beep(@); 


} else { 
j = 8; 
Lp 
p++; 
} 


waittimer(timer, i - j); 


} else if (*p == '<') { /* 八 度 -- */ 
p++; 
O--; 

} else if (*p == '>') { /* 八 度 ++ */ 
p++; 
O++; 

} else if (*p == '0') { /* 八 度 指定 */ 
o = strtol(p + 1, &p, 10); 

} else if (*p == 'Q') { /* Q 参 数 指定 */ 
q = strtol(p + 1, &p, 10); 


} else if (*p == 'L') { /* 默 认 音 长 指定 */ 
l = strtol(p + 1, &p, 10); 
if (1 == @) { 
goto syntax_error; 
} 
1 = 192 / 1; 
for (; *p == '.'; ) { 
p++; 
l += 1 / 2; 


} 
} else if (*p == 'T') { /* 速 度 指定 */ 
t = strtol(p + 1, &p, 10); 
} else if (*p == '$') { /* 扩 展 命 令 */ 
if (p[1] == 'K') { /* 卡 拉 OK 命 令 */ 
p += 2; 
for (; *p != 0x22; p++) { 
if (*p == @) { 
goto syntax_error; 
} 
} 
p++; 
for (i = ð; i < 32; i++) { 
if (*p == 6) 4 
goto syntax_error; 


} 


if (*p == 0x22) { 
break; 


} 

if (*p == '%') { 
s[i] = p[1]; 
p += 2; 

} else { 
s[i] = *p; 
p++; 


} 


if (i > 30) { 
end("karaoke too long.\n"); 


} 

api_boxfilwin(win + 1, 8, 88, 247, 103, 
7); 

s[i] = ð; 

if (i != 0) { 


api_putstrwin(win + 1, 128 - i * 4, 
88, ©, i, s); 


} 
api_refreshwin(win, 8, 88, 248, 104); 
} 
for (; *p != ';'; p++) { 
if (*p == 6) { 
goto syntax_error; 
} 
} 
p++; 
} else if (*p == 0) { 
p = txtbuf; 
} else { 


syntax_error: 
end("mml syntax error.\n"); 


} 


} 


void waittimer(int timer, int time) 


{ 
int i; 
api_settimer(timer, time); 
for (;;) { 
i = api_getkey(1); 
if (i == 'Q' || i == 'q') { 
api_beep(@); 
api_end(); 
} 
if (i == 128) { 
return; 
} 
} 
} 


void end(char *s) 


{ 
if (s != @) { 
api_putstr®@(s); 


} 
api_beep(@); 
api_end(); 


只 要 读 过 之 前 的 程序 ， 这 段 程序 应 该 不 会 难 懂 吧 。 

音符 数据 计算 频率 ， 以 及 由 音符 的 长 度 计算 定时 
器 应 该 设 定 为 几 秒 这 些 地 方 可 能 不 太 容 易 理 解 ， 其 
实 只 要 有 相应 的 音乐 知识 (例如 一 个 音 升 高 半音 
后 ， 频 率 是 原来 的 约 1.059463 倍 ) 就 很 容易 看 懂 
ie 


aZ CGA MIR) ， 本 书 的 目的 是 编写 操作 系 

统 ， 而 不 是 编写 MML 播 放 器 ， 关 于 相关 音乐 理论 
的 讲解 就 省 略 了 ， 不 好 意思 。 当 然 ， 笔 者 也 是 想 给 
大 家 仔细 讲 讲 的 ， 只 不 过 要 讲 清 楚 的 话 ， 又 得 增加 
1 eS o 


将 这 个 程序 make 一 下 ， 得 到 的 mmlplay.hrb 大 小 为 
1975 字 节 ， 还 是 非常 小 的 ， 真 不 错 ! 


4 图 片 阅览 器 (harib27d) 


话说 ， 到 现在 为 止 的 几 个 应 用 程序 ， 都 比 昨天 的 

invader.hrb 要 小 ， 感 觉 非常 对 不 起 今天 这 一 章 的 标 
题 (高 级 的 应 用 程序 ) 。 不 过 ， 体 积 大 也 未 必 说 明 
它 比 较 高 级 。 虽 说 如 此 ， 我 们 还 是 来 做 一 个 规模 大 
一 点 的 应 用 程序 吧 。 


其 实 invader.hrb 之 所 以 比较 大 ， 并 不 是 因为 内 容 

比较 高 级 ， 而 是 因为 使 用 了 sprintf 函 数 。sprintf 是 
一 个 很 大 的 函数 ， 如 果 可 以 避免 使 用 这 个 函数 的 
话 ， 大 约 又 可 以 缩小 500 多 字 节 。 


于 是 我 们 来 做 一 个 图 片 阅览 器 吧 。 用 这 一 个 程序 ， 
就 可 以 查看 BMP 和 JPEG 两 种 格式 的 图 片 。 我 们 先 
来 看 看 实际 运行 的 画面 。 


console Xx 


>qview night. bmp [ aview 


K 


“gview night.bmp” 


关于 程序 ， 如 果 要 给 大 家 讲解 BMP 和 JPEG 的 文件 
格式 的 话 ， 篇 幅 又 要 变 得 很 一 长 了 ， 于 是 我 们 只 好 
又 省 略 了 。 而 且 用 来 解释 BMP 和 JPEG 文 件 格 式 的 
程序 我 们 也 不 重新 编写 了 ， 而 是 直接 使 用 OSASK 中 
的 应 用 程序 所 引用 的 代码 。 


OSASK 中 有 一 个 叫做 PICTURE0.BIN 的 应 用 程序 ， 
这 就 是 一 个 用 来 查看 BMP 和 JPEG 格 式 图 片 的 图 片 
阅览 器 。 从 这 个 程序 的 源 代 码 中 ， 我 们 提取 了 


bmp.nasm 和 jpeg.c《〈 这 剧情 怎么 跟 tek 那 时 候 差 不 多 
May) 


这 两 个 源 程序 看 起 来 无 需 修 改 束 可 以 直接 使 用 ， 其 
中 bmp.nasm 的 作者 是 LTak.，jpeg.c 的 作者 是 nikq、 
笔者 、LTak. 和 Kumin。 在 这 里 要 问 I.Tak.、nikq 和 
Kumin 表 示 感 谢 ， 这 个 应 用 程序 能 很 快 编写 出 来 都 
FEMI AF 


于 是 ， 剩 下 的 只 需要 载 入 文件 并 显示 出 来 而 已 ， 这 
些 程序 刷 刷 刷 惑 写 出 来 了 ， 放 在 这 里 了 哦 〈 关 于 


bmp.nasm 和 jpeg.c 的 源 代 码 ， 请 大 家 得 阅 附送 的 区 
M) a 


gview.c 


#include "“apilib.h" 


struct DLL_STRPICENV { /* 64KB */ 
int work[64 * 1024 / 4]; 
}; 


struct RGB { 
unsigned char b, g, r, t; 


F3 


/* bmp.nasm */ 

int info_BMP(struct DLL_STRPICENV *env, int *info, int 
size, char *fp); 

int decode@ BMP(struct DLL_STRPICENV *env, int size, 
char *fp, int b_type, char *buf, int skip); 


/* jpeg.c */ 

int info_JPEG(struct DLL_STRPICENV *env, int *info, int 
Size, char *fp); 

int decode@ JPEG(struct DLL_STRPICENV *env, int size, 
char *fp, int b_type, char *buf, int skip); 


unsigned char rgb2pal(int r, int g, int b, int x, int 


y); 


void error(char *s); 


void HariMain(void) 


{ 


struct DLL_STRPICENV env; 

char filebuf[512 * 1024], winbuf[1040 * 805]; 
char s[32], *p; 

int win, i, j, fsize, xsize, info[8]; 

struct RGB picbuf[1024 * 768], *q; 


/* 命 令 行 解析 */ 

api_cmdline(s, 30); 

for (p = s; *p > ' '; pH) { } /#* 一 直 读 到 空格 为 止 */ 
for (3 *p == ' '; p++) { } /* 跳 过 空格 */ 


[XARA * / 
i = api_fopen(p); if (i == 0) { error("file not 


found.\n"); } 


fsize = api_fsize(i, ®); 
if (fsize > 512 * 1024) { 
error("file too large.\n"); 


} 
api_fread(filebuf, fsize, i); 
api_fclose(i); 


/* 检 查 文件 类 型 */ 


if (info_BMP(&env, info, fsize, filebuf) == 0) { 
/# 不 是 BMP */ 
if (info_JPEG(&env, info, fsize, filebuf) == 0) 


{ 
/* 也 不 是 JPEG */ 
api putstre("file type unknown.\n"); 
api_end(); 
} 
/* EMR t A infok aid HRN, infota A hae 
*/ 


/*info[Q]: 文件 类 型 (1:BMP. 2:IPEG) */ 
/*info[1]: 颜色 数 信息 */ 

/*info[2]: xsize */ 

/*info[3]: ysize */ 


if (info[2] > 1024 || info[3] > 768) { 
error("picture too large.\n"); 


} 
/* 窗 口 准备 */ 


xsize = info[2] + 16; 
if (xsize < 136) { 
xsize = 136; 
} 
win = api_openwin(winbuf, xsize, info[3] + 37, -1, 
"gview" ); 


/* 将 文件 内 容 转 换 为 图 像 数 据 */ 
if (info[@] == 1) { 
i = decode@ BMP (&env, fsize, filebuf, 4, (char 
*) picbuf, 0); 
} else { 
i = decode@ JPEG(&env, fsize, filebuf, 4, (char 
*) picbuf, 0); 


/*b_type = 4 表示 struct RGB 格式 */ 
/*skip 设 为 8 即 可 */ 
if (i != 0) { 

error("decode error.\n"); 


} 


/* 显 示 */ 
for (i = ð; i < info[3]; i++) { 
p = winbuf + (i + 29) * xsize + (xsize - 
info[2]) / 2; 
q = picbuf + i * info[2]; 
for (j = 0; j < info[2]; j++) { 
p[j] = rgb2pal(q[j].r, q[j]-g, 9[j].b, j, 
i); 
} 
} 
api_refreshwin(win, (xsize - info[2]) / 2, 29, 
(xsize - info[2]) / 2 + info[2], 29 + info[3]); 


/* 等 待 结束 */ 
for (;;) { 
i = api getkey(1); 
if (i == 'Q' || i == 'q') { 


api_end(); 
} 
} 
} 
unsigned char rgb2pal(int r, int g, int b, int x, int 
y) 
{ 


static int table[4] = { 3, 1, 0, 2 }; 
int i; 


x &= 1; /* 判 断 是 侦 数 还 是 奇数 */ 
y &= 1; 


table[x + y * 2];  /* 用 于 生成 中 间 色 的 常量 */ 
21) / 256; /# 结 果 为 68 一 26*+/ 

* 21) / 256; 

* 21) / 256; 

+ i) / 4; /*# 结 果 为 6 一 5*/ 
+ i) / 4; 

+ i) / 4; 

16 +r+g*ž6+b * 36; 


一 
5 
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} 


void error(char *s) 
{ 
api_putstr@(s); 
api_end(); 
} 


比较 难 懂 的 地 方 .…… 大 概 就 是 info_BMP 这 里 了 吧 。 
info_BMP 是 用 来 解释 BMP 文件 格式 ， 并 获取 图 片 
分 辨 率 等 信息 的 函数 。 其 中 env 是 info_ BMP 工作 用 
的 内 存 空间 〈 必 须 确保 有 64KB 的 空间 ) 。 另 外 ， 
decode0_ BMP 函数 用 来 读 取 BMP 文件 ， 并 转换 为 统 
一 的 容易 显示 的 形式 。info_JPEG 等 函数 就 是 对 
ee een ee 
是 相同 的 。 


关于 变量 info，gview.c 中 只 使 用 到 了 info[3]， 看 起 
来 貌似 声明 到 info[4] 就 足够 了， 不 过 info_BMP 等 函 
数 需要 任意 使 用 info[4~7] 的 内 存 空间 ， 如 果 不 声明 
的 话 可 能 不 会 正常 工作 ， 因 此 我 们 还 是 声明 为 
info[8]. 


rgb2pal 就 是 直接 用 了 color2.hrb 中 的 代码 ， 有 了 这 一 
算法 fjisan.jpg 也 可 以 显示 得 很 漂亮 了 。 


关于 bmp.nasm 这 里 要 稍微 说 明 一 下 。 这 个 程序 是 针 
对 NASM 这 个 汇编 右 编 写 的 ， 用 笔者 准备 的 工具 是 
无 法 进行 汇编 的 。 没 办 法 ， 笔 者 向 该 程序 的 作者 
IL.Tak. 索 取 了 汇编 后 生成 的 bmp.obj， 只 要 有 了 .obj 
文件 就 可 以 进行 连接 ， 这 样 就 OK 了 。 


1 索取 了 bmp.obj: 由 于 党 f 得 NASM 写 的 源 代码 各 
位 读者 可 能 比较 难 懂 ， 笔 者 本 来 准备 将 这 上段 程序 
整个 用 C 语 言 改写 一 裔 ， 不 过 由 于 本 书面 临 截 

稿 ， 便 没 能 实现 这 一 设想 ， 十 分 抱歉 。 至 少 能 将 
格式 比较 简单 的 BMP 改 写成 比较 易 懂 的 形式 也 好 


另外 ， 在 编译 jpeg.c 的 时 候 ， 不 知 为 何 会 出 现 很 多 
rats A, JR aK. Aitjpeg.chll (Amy ix Lee 
告 信息 也 没有 什么 问题 ， 请 大 家 不 要 在 意 就 是 了 。 


night.bmp 和 fujisan.jpg 这 两 个 文件 都 使 用 了 tek 进 行 
压缩 。 如 果 想 要 边 看 night.bmp 边 听 音 乐 的 话 ， 笔 者 
推荐 kirakira.mml。 人 至 于 fujisan.jpg 的 音乐 .……. 用 不 
看 笔者 告诉 大 家 了 吧 (R) 


最 终生 成 的 gview.hrb， 大 小 为 3865 字 节 ， 即 
3.77KB， 我 们 终于 做 出 了 比 昨 天 的 invader.hrb 更 大 
的 应 用 程序 了 呢 〈( 笑 ) 。 不 过 即便 如 此 ， 这 样 一 个 
图 片 阅览 器 只 要 3.75KB,“ 纸 娃娃 系统 ”真是 个 不 错 
的 系统 呢 。 


5 IPEL 的 改 展 Charib27e) 


进入 本 和 章 以 后 〈 尤 其 是 在 测试 mmlplay.hrb 的 时 
候 ) ， 笔 者 在 真 机 环境 下 运行 了 几 次 “ 纸 娃娃 系 
统 ”， 发 现 局 动 时 读 取 磁盘 的 时 间 还 是 有 点 长 。 现 
在 我 们 是 谈 取 20 个 柱 面 ， 如 果 能 减少 到 14 或 者 18 个 
这 样 抠 强 够 用 的 柱 面 数 的 话 ， 启 动 速度 束 可 以 加 快 
了 《不 过 代价 是 ， 以 后 新 增 文 件 的 时 候 又 要 重新 调 


整 ) 。 


于 是 我 们 先 用 二 进 制 编辑 器 得 看 一 下 harib27d 的 
haribote.img 文 件 ， 发 现 数据 占用 的 部 分 是 到 028C98 
为 止 。 额 ， 这 是 多 少 个 柱 面 呢 ? 一 个 柱 面 是 
512x18x2 二 18432 字 节 (当然 ， 这 是 用 calc.hrb 计 算 
的 哟 ! 02...) ， 因 此 0x28c99 / 18432 二 9 个 柱 面 。 


什么 ! 只 要 9 个 柱 面 束 够 了 吗 ?! 真 奇 怪 ， 当 初 明 
明 是 因为 10 个 柱 面 不 够 用 我 们 才 特 地 抛弃 了 
ipl10.nas 改 用 ipl20.nas 的 呀 ? 哦 ， 对 了 ， 我 们 用 tek 
对 nihongo.fnt 进 行 了 压缩 ， 因 此 大 幅度 减少 了 容 
量 ， 真 开心 呀 。 那 我 们 将 ip1l10.nas 还 原 回去 束 好 了 
呢 ， 这 样 司 动 时 间 残 只 有 现在 的 一 半 了 。 


不 过 且慢 ，0x28c99 % 18432 王 1193 字 节 〈 求 余数 运 
算 用 calc.hrb 也 可 以 轻松 搞定 ， 真 方便 )， 也 就 是 


说 ， 如 采 我 们 能 再 将 文件 容量 缩减 IKB 左 右 ， 残 可 
以 将 谈 取 的 范围 缩小 到 9 个 柱 面 了 ， 这 样 一 来 启动 
时 间 又 可 以 缩短 一 成 。 好 ， 我 们 加 油 试 试看 ， 有 什 
么 好 办 法 呢 ?” 啊 ， 有 了 ， 我 们 将 ip120.nas 也 用 tek 压 
缩 一 下 就 好 了 呢 ! 如 果 可 以 减 小 3 个 而 区 的 话 ， 
ipl09.nas 束 足够 了 。 


咽 ， 既 然 要 做 ip1l09.nas 的 话 ， 不 如 顺便 对 磁盘 读 取 
做 个 优化 。 这 里 所 说 的 优化 ， 是 将 AL = 1 这 样 逐 个 
局 区 读 取 的 方法 ， 改 为 同时 读 取 多 个 肩 区 (参见 3.1 
节 和 3.3 节 )〉 。 人 至 于 这 种 优化 是 否 会 带 来 速度 上 的 提 
升 则 是 因 人 而 异 的 。 在 大 部 分 内 置 软驱 的 电脑 上 ， 
逐个 扇 区 读 取 的 速度 可 能 已 经 相当 快 了 ， 优 化 之 后 
速度 也 不 会 有 什么 提升 。 不 过 像 笔 者 这 样 使 用 
USB1.1 外 置 软 驱 来 局 动 的 话 ， 优 化 之 后 大 约 可 以 比 
原来 的 速度 提高 10 倍 左右 。 


ipl09.nas 7 1% 


; haribote-ipl 
; TAB=4 


CYLS EQU 9 ; 要 读 取 多 少 内 容 
中略) 


; 读 取 磁盘 


MOV AX, 0x0820 


MOV ES,AX 
MOV CH,@ ; OFF 
MOV DH,@ 3 OE 
MOV CL,2 3 25X 
MOV BX,18*2*CYLS-1 ; 要 读 取 的 合计 扇 区 数 
从 此 开始 
CALL readfast ; 告诉 读 取 


; 读 取 结束 ， 运 行 haribote.sys! 


MOV BYTE [@x@ffO],CYLS ; 记录 IPL 实 际 读 取 了 多 
少 内 容 到 此 结束 
JMP OXCc200 
error: 
MOV AX, 0 
MOV ES, AX 
MOV SI,msg 
putloop: 
MOV AL, [SI] 
ADD SI,1 ; 将 SI 加 1 
CMP AL ,6 
JE fin 
MOV AH, @x@e ; 显示 一 个 字符 的 函数 
MOV BX,15 ; 颜色 代码 
INT 0x10 ; 调用 显示 BIOS 
JMP putloop 
fin: 
HLT ; 暂时 让 CPU 停止 运行 
JMP fin ; 无 限 循环 
msg: 
DB @x@a, Əxða ; 两 个 换行 
DB "load error" 


DB Q@x@a ; 换行 


DB 


0 


readfast: ; 使 用 AL 尺 量 一 次 性 读 取 数据 从 此 开始 
; ES: 读 取 地 址 ，CH: 柱 面 ，DH :磁头 ，CL: 扇 区 ，BX: 读 取 扇 区 数 


MOV AX,ES 
> 

SHL AX, 3 
AH (SHL 是 左 移 位 指令 ) 

AND AH, Ox7f 
(512*128=64K ) 

MOV AL,128 
除 以 128 所 得 的 余数 (512*128=64K ) 

SUB AL,AH 

MOV AH , BL 
并 存 入 AH > 

CMP BH,@ 
18; } 

JE .Skip1 

MOV AH, 18 
.Skip1: 

CMP AL ,AH 
AH; } 

JBE .Skip2 

MOV AL ,AH 
.Skip2: 

MOV AH,19 
并 存 入 AH > 

SUB AH,CL 

CMP AL, AH 
AH; } 

JBE .Skip3 

MOV AL ,AH 


3 


< 通过 ES 计算 AL 的 最 大 值 
将 AX 除 以 32， 将 结果 存 入 
AH 是 AH 除 以 128 所 得 的 余数 


AL = 128 - AH; AH 是 AH 


< 通过 BX 计 算 AL 的 最 大 值 


if (BH != @) { AH 


if (AL > AH) { AL 


< 通过 CL 计算 AL 的 最 大 值 


AH = 19 - CL; 
if (AL > AH) { AL = 


. Skip3: 


PUSH BX 

MOV SI,0 ; 计算 失败 次 数 的 寄存 器 
retry: 

MOV AH, @x@2 ; AH=0x02 : 读 取 磁盘 

MOV BX,0 

MOV DL,@xee 3 Att 

PUSH ES 

PUSH DX 

PUSH CX 

PUSH AX 

INT 0x13 ; 调用 磁盘 BIOS 

JNC next ; 没有 出 错 的 话 则 跳 转 至 
next 

ADD SI,1 ; 将 SI 加 1 

CMP SI,5 ; 将 SI 与 5 比较 

JAE error ; SI >= Sw pki error 

MOV AH, 0x00 

MOV DL,@xee 3 Att 

INT 0x13 ; AEA 

POP AX 

POP CX 

POP DX 

POP ES 

JMP retry 
next: 

POP AX 

POP CX 

POP DX 

POP BX ; 将 ES 的 内 容 存 入 BX 

SHR BX,5 ; 将 BX 由 16 字 节 为 单位 转换 
为 512 字 节 为 单位 

MOV AH ,6 


ADD BX, AX ; BX += AL; 


SHL 


为 16 字 节 为 单位 


readfast 


ret: 


到 此 结束 


的 指令 


MOV 


RESB 


DB 


CL,18 
readfast 


CL 1 
DH,1 
DH, 2 
readfast 
DH,@ 
CH,1 
readfast 


O@x7dfe-$ 


@x55, Oxaa 


Wwe 


Wwe 


Wwe Wwe 


Wwe 


Wwe 


Wwe 


将 BX 由 512 字 节 为 单位 转换 


相当 于 EX += AL * 0x20; 


将 CL 加 上 AL 
将 CL 与 18 比 较 
CL <= 18 则 跳 转 至 


DH < 2 则 跳 转 至 readfast 


到 86x7dfe 为 目 用 6x66 填 充 


完工 ， 代 码 中 加 入 了 很 多 注释 ， 应 该 没有 什么 特别 


META HET T o 


My, HR! 我 们 修改 了 ip109.nas 之 后 ， 为 了 实 
现 对 磁盘 读 取 的 优化 ， 结 果 代 人 码 却 变 长 了 。 和 


ip120.nas 相 比 ， 从 2992 字 增加 到 了 4081 字 入。 不 
过 大 家 也 不 用 担心 ， 我 们 还 有 tek5 压 缩 昵 ， 压 缩 之 
后 就 变 成 了 1778 字 节 。 你 看 ， 变 小 了 很 多 吧 。 


我 们 修改 一 下 Makefile， 将 这 个 新 文件 六 入 人 磁 操 映 
像 ， 然 后 “make”， 再 用 二 进 制 编辑 器 打开 生成 好 的 
磁盘 映像 确认 一 下 。 了 唔 ， 狐 似 数据 占用 的 部 分 到 
028898. 0x28899 / 18432 = 9 个 柱 面 ，0x28899 % 
18432 = 153 字 节 ..….. 什 么 ! 居然 超出 了 153 字 

W? ! 不 是 吧 ! 


如 果 在 这 里 乖乖 瓯 范 ， 换 回 讯 110.nas 的 话 也 太 灿 屈 
了 ， 于 是 我 们 可 以 抛弃 其 中 一 个 应 用 程序 ， 比 如 
sosu 或 者 hello 之 类 的 。 能 抛弃 的 应 用 程序 实在 是 太 
多 了 【〔 苗 笑 ) ， 反 而 不 知道 该 抛弃 哪个 比较 好 了 
1 mes | 


L KZU FAH Pw Ik PREY EE PE SIR 
Th, RPAIX SE APE IEMA, (ASCE AR 
AR” To THEY AA BE ee BY iia es eS A PBI 
发 工作 中 所 留 下 的 回忆 啊 ! 


既然 如 此 ， 我 们 束 下 定 决 心 ， 一 定 要 在 一 个 都 不 能 
少 的 前 担 下， 解决 这 个 问题 。 唔 ， 到 底 怎 么 办 才 好 
Wes... 有 了 ! 我 们 将 invader.hrb 修 改 一 下 ， 如 果 不 
用 Sprintf 函 数 的 话 ， 程 序 就 可 以 变 小 了 ! 


invader.c 中 只 有 一 处 调用 了 sprintf， 因 此 修改 起 来 
也 很 简单 ， 首 先 丛 换 下 面 一 句 : 


sprintf(s, "%@8d", score); > setdec8(s, score); 
OR Ja FEST PIX 7S PRB: 


AS YR AJinvader.c fi i126 


void setdec8(char *s, int i) 
/* 将 i 用 十 进 制 表 示 并 存 入 s*/ 
{ 
int j; 
for (j = 7; j >= 0; j--) { 
s[j] = '0' + i % 10; 
i /= 10; 


} 
s[8] = ð; 
return; 


这 样 束 完工 了 ， 仅 通过 这 一 点 修改 ，invader.hrb 束 
从 2335 字 市 变 成 了 1509 字 节 ， 大 幅度 瘦 映 了 ， 大 获 
全 胜 ! 反 过 来 说 ，sprintf 这 个 函数 是 如 此 之 大 ， 真 
是 减肥 瘦身 的 大 敌 呢 ( 笑 ) 。 


当然 ， 修 改 了 之 后 的 invader.hrb 运 行 起 来 不 会 有 任 
何 变 化 ， 不 信和 的 话 可 以 “make run” 试 试看 哦 。 


修改 完成 之 后 ， 我 们 再 重新 “make” 一 下 破 盘 映像 ， 
并 用 二 进 制 编辑 器 打开 看 看 ， 数 据 占用 的 部 分 到 
028498. 0x28499 / 18432 = 8 个 柱 面 ，0x28499 % 
18432 = 17561 字 节 ， 正 好 缩减 到 9 个 柱 面 的 范围 
A, FHE ! 


到 此 为 止 ， 我们 的 应 用 程序 编写 活动 也 该 告 一 段落 
了 ， 我 们 来 总 结 一 下 本 草 的 成 采 吧 。 


invader .hrb......1509 字 节 :， 外 星人 游戏 


calc.hrb..….1668 字 节 : 命令 行 计算 器 
tview.hrb..….1753 字 节 : 文本 阅览 器 
mmlplay.hrb......1975 7: MML 播 放 器 
gvView.hrb..…..3865 字 节 : 图 片 阅览 器 


看 起 来 从 上 到 下 文件 的 大 小 是 在 不 断 递 增 的 呢 。 虽 
然 很 有 趣 ， 不 过 这 只 是 个 巧合 啦 。 


最 后 我 们 来 一 张 纪 念 截图 吧 。 


; haribote-ipl 
; TAB=4 


CYS = BU 9 ; CLE THHAGY 


ORS Ox7e0d ; CNFOFALMS CIMA END OH 
; DOP RRS SFATIZG a 3y HIN y ELF +4 2INKHORM 


errr te wees }46 daiku. mml 


re EE 


PTAC 


大 家 来 担 个 全 家 福 


6 光盘 月 动 Charib27f) 


到 现在 ， 我 们 的 “ 纸 娃娃 系统 ? 融 已 经 正式 完工 了 。 
可 能 有 人 和 觉得 软盘 读 取 速 度 太 慢 ， 如 宋 能 从 光盘 司 
动 束 好 了 。 为 此 ， 笔 者 在 这 里 给 大 家 一 些 建议 。 


http://www.geocities.co.jp/Silicon Valley- 
Cupertino/3686/fdtoiso.html 


从 上 面 的 网 址 下 载 fdtoiso_gui.lzh， 解 压缩 之 后 运行 
里 面 的 fdtoiso.exe， 会 弹出 一 个 窗口 ， 将 
haribote.img 拖 进 窗 口中 ， 点 击 “ 进 入 ISO 映 像 生 成 画 
面 ”， 就 可 以 很 容易 地 生成 光盘 用 的 映像 文件 了 。 

接 下 来 只 要 将 这 个 I SO 映像 刻录 到 CD-R 或 者 CD- 
RW ERAT LAT o 


当然 ， 你 的 电脑 也 必须 支持 从 光盘 局 动 才 可 以 哦 。 


在 这 里 ， 十 分 感谢 这 个 软件 的 作者 虽然 不 知道 他 
的 名 字 ) 为 我 们 提供 了 如 此 方便 的 软件 。 


如 果 你 觉得 光 做 个 能 局 动 的 光 柱 还 不 过 净 ， 和 硕 望 这 
张 光 盘 在 Windows 或 者 Linux 中 读 取 的 时 候 还 能 显示 


里 面 的 文件 内 容 的 话 ， 笔 者 推荐 下 面 这 个 工具 。 
http://cdrtfe.sourceforge.net/ 
在 此 对 本 软件 的 作者 kerberos002 表 示 感 谢 。 


选择 “Extra - Language — Chinese (simplified) ” 即 
可 将 软件 界面 切换 成 简体 中 文 。 


点 击 “ 文 件 系统 ”按钮 ， 将 “引导 光盘 中 的 “制作 引导 
光盘 ?选项 打 勾 ， 点 击 “ 引 导 镜 像 " 劳 边 的 “浏览 ? 按 

钮 ， 选 择 haribote.img 文 件 并 确定 ， 然 后 将 准备 好 放 
进 光 盘 的 其 他 一 些 文件 和 文件 夹 拖 到 软件 的 窗口 

中 ， 点 击 “ 开 始 ” 按 钮 就 可 以 开始 刻录 了 。 如 果 不 想 
刻录 光 往 ， 只 生成 ISO 映像 文件 的 话 ， 可 以 点 击 “ 光 
盘 选 项 ”按钮 ， 点 击 “ 使 用 镜像 ”旁边 的 “浏览 ?按钮 ， 
选择 要 保存 ISO 映像 文件 的 位 置 和 文件 名 ， 勾 选 下 
面 的 “只 生成 镜像 ， 不 刻录 ”选项 ， 确 定 ， 然 后 再 点 
击 软 件 主 界面 中 的 “开始 ”按钮 ， 就 可 以 生成 指定 的 
ISO 映像 文件 了 。 


这 个 软件 的 选项 非 第 丰富， 功能 也 很 强大 ， 大 家 在 
掌握 了 基本 方法 之 后 可 以 自己 多 做 一 些 昱 试 。 此 

外 ， 还 有 一 些 光盘 刻录 软件 也 具备 类 似 的 功能 ， 大 
家 如 东 有 已 经 非 钊 熟悉 的 软件 ， 也 可 以 使 用 它们 来 


创建 可 用 来 局 动 电脑 的 光盘 。 
UF, SRA Aa Pe iy, KREZ. 


ASK 与 在 开发 完成 之 后 


。 继 续 开 友 要 徘 大 家 的 努力 
。 天 本 操作 系统 的 大 小 

。 操作 系统 开发 的 诀 罕 

。 分 盏 给 他 人 使 用 

。 天 于 光盘 中 的 软件 

。 关 于 开源 的 建议 

。 后记 

。 毕业 典礼 

。 附录 


1 继续 开 友 要 徘 大 家 的 努力 


到 昨天 为 止 ， 我 们 为 期 30 天 的 操作 系统 开发 工作 终 
于 落下 帷幕 了 。30 天 的 时 间 说 短 不 短 ， 说 长 也 不 

长 ， 大 家 是 过 得 开心 呢 ， 还 是 已 经 累 到 不 行 了 呢 ? 
笔者 觉得 ， 一 个 菜鸟 只 用 30 天 的 时 间 ， 就 能 取得 出 
相当 不 错 的 成 果 ， 还 是 非常 值得 高 兴 的 一 件 事 。 对 
于 那些 觉得 30 天 太 长 太 累 的 读者 来 说 ， 是 不 是 也 能 
感到 “操作 系统 开发 其 实 没 有 想象 中 的 那么 难 ”* 呢 ? 
没 错 ， 确 实 没 有 那么 难 哦 。 


如 果 觉 得 这 些 内 容 还 不 过 疗 ， 请 一 定 要 继续 开发 下 
去 。 之 前 都 是 笔者 一 个 人 在 唱 独 角 戏 ， 从 现在 开 
始 ， 各 位 读者 就 是 舞台 上 的 主角 。 笔 者 非常 期 待 看 
到 并 认真 学 习 大 家 的 作品 呢 〈 笑 ) 。 说 到 继续 开 
发 ， 也 不 一 定 要 从 “ 纸 娃 娃 系 统 ” 最 后 的 harib27e 开 
始 ， 把 之 前 的 基础 全 部 推翻 重 来 也 可 以 ， 用 Linux 
或 FreeBSD 等 开源 操作 系统 为 基础 进行 改造 也 完全 
没有 问题 。 


如 果 可 以 再 多 给 笔者 一 点 时 间 的 话 ， 在 harib27e 之 
后 还 要 做 些 什 么 呢 ? 笔者 想 站 和 完 开发 一 个 天 于 鼠标 
反击 的 API， 有 了 了 这个， 我们 就 可 以 编写 出 类 似 扫 


雷 、 纸 牌 这 样 的 游戏 了 。 和 鼠标 API 有 半天 的 时 间 就 
可 以 编写 出 来 了 。 


接 下 来 ， 可 以 实现 对 非 算 形 窗口 的 完全 支持 ， 增 加 
有 透明 色 时 专用 的 refresh， 然 后 再 增加 一 个 不 自动 
绘制 窗口 标题 栏 的 模式 。 只 需 这 样 ， 我 们 就 可 以 绘 
制 出 各 种 有 趣 形状 的 窗口 。 要 实现 这 个 功能 ， 只 考 
虚 API 的 话 仪 半天 就 够 了 。 


壁纸 功能 也 比较 简单 。 不 过 要 实现 壁纸 功能 ， 需 要 
先 实现 读 取 图 片 文件 的 功能 。 这 就 需要 将 相当 于 
gview.hrmb 的 内 容 移植 到 操作 系统 中 去 。 在 画面 下 方 
的 任务 栏 中 显示 窗口 的 信息 ， 并 用 鼠标 切换 ， 也 会 
相当 有 趣 。 这 两 个 功能 加 在 一 起 ， 大 概 用 一 天 的 时 
间 可 以 完成 。 


再 接 下 来 要 开 有 的， 还 有 回 磁 盘 进 行 写 入 的 功能 。 
如 果实 现 了 不 依赖 BIOS 的 磁盘 写 入 功能 ， 再 和 加 改 
造 束 可 以 顺便 实现 磁盘 读 取 功能 ， 这 样 一 来 束 不 需 
要 在 系统 司 动 时 将 所 有 文件 装 入 内 存 ， 局 动 时 间 也 
可 以 变 得 更 短 ， 也 不 需要 每 次 特地 去 调整 ITPL 了， 
真是 一 盘 三 雕 昵 。 这 项 改造 如 果 依 照 本 书 的 格式 来 
所 写 的 话 ， 大 约 需要 3 天 的 时 间 。 


一 旦 实现 了 对 文件 号 入 的 文 持 ， 那 么 后 面 可 以 做 的 
东西 承 相 当 丰 宇 了 ， 比 如 可 以 编写 文本 编辑 左 ， 还 


有 类 似 “ 男 图 ”的 图 所 编辑 软件 等 。 有 了 文本 编辑 

器 ， 我 们 束 可 以 直接 在 “ 纸 娃娃 系统 ”中 编写 MML 文 
件 并 立即 播放 了 。 假 如 移植 了 Ci 语言 编译 占 、nask 
以 及 连接 器 ， 就 可 以 在 “ 纸 娃 娃 系统 ”中 编写 应 用 程 
序 并 立即 运行 了 。 如 果真 能 做 到 这 一 步 ， 那 么 连 

TE AR UE TE Fe” HAY “AR EME Ze” AK ET make th, 
AFR ERR AW, AER i a CAME 


HER, EMR] VAS RP ae A fi Be 
并 文 持 网 络 ， 能 做 的 事情 就 会 更 多 了 。 还 可 以 增加 
对 虚拟 内 存 的 支持 ， 使 操作 系统 可 以 使 用 比 实际 的 
物理 内 存 更 多 的 内 存 空间 。 命 令 行 窗口 也 可 以 扩展 
一 下 ， 比 如 增加 重 定 问 功 能 〈 即 不 将 信息 输出 到 男 
面 上 ， 而 是 写 入 文件 中 ) 等 ， 或 者 实现 像 Windows 
资源 管理 硕 那 样 用 妇 标 来 壳 理 文件 的 功能 也 不 错 
呢 。 


除了 表面 上 的 改造 之 外 ， 还 可 以 做 一 些 操作 系统 内 
部 的 完善 工作 。 目 前 的 “ 纸 娃娃 系统 ”中 没有 考虑 到 
进行 大 量 处 理 时 内 存 会 不 足 的 情况 ， 如 果 我 们 局 动 
很 多 个 gview.hrb 将 内 存 消耗 光 ， 肯 定 会 出 问题 的 。 
我 们 需要 采取 一 些 措施 ， 比 如 在 内 存 空 间 不 足 时 不 
允许 局 动 更 多 的 应 用 程序 等 。 


此 外 ， 在 mmlplay.hrb 演 奏 的 时 候 ， 如 果 移 动 一 个 很 
大 的 窗口 (如 “tview -w100 -h30” 这 么 大 的 窗 

口 ) ， 演 奏 就 会 变 得 混乱 。 这 是 由 于 负责 窗口 移动 
的 task_a 的 优先 级 高 于 mmlplay.hrb 所 导致 的 ， 而 思 
考 一 下 如 何 解决 这 个 问题 应 该 也 挺 有 意思 的 《例如 
将 音乐 播放 的 应 用 程序 作为 特例 提高 其 优先 级 ， 或 
者 创建 一 个 专门 移动 窗口 的 任务 再 对 其 优先 级 进行 


微调 等 ) 。 


这 次 我 们 在 编写 “ 纸 娃 娃 系 统 ” 的 过 程 中 ， 讲 解 了 使 
用 32 位 模式 的 方法 、 内 存 段 的 使 用 方法 、 中 断 的 处 
理 方 法 、 内 存 的 管理 方法 、 窗 口 和 鼠标 的 处 理 、 定 
时 堪 的 管理 方法 、 命 令 行 窗 口 的 原理 、API 的 方 
式 、 访 问 文件 的 方法 ， 等 等 。 但 这 些 内 容 并 不 都 是 
正确 答案 ， 其 实在 编写 操作 系统 的 方法 上 ， 并 没有 
所 请 的 正确 答案 。 本 书 中 所 讲解 的 内 容 ， 只 能 算是 
一 个 实例 而 已 ， 大 家 干 万 不 要 被 这 些 条 条 框框 所 束 
缚 ， 请 上 自由 发 挥 目 己 的 想象 力 ， 去 编写 出 更 优秀 的 
操作 系统 吧 。 例 如 笔者 开发 的 OSASK 惑 很 大 程度 上 
使 用 了 和 “ 纸 娃娃 系统 ”不 同 的 算法 ， 而 Linux 和 
Windows 所 使 用 的 算法 又 和 “* 纸 娃娃 系统 ”以 及 
OSASK 不 同 。 


笔者 打算 在 本 书 的 文 持 网 页 上 征集 各 位 读者 所 编写 


的 操作 系统 以 及 为 “ 纸 娃娃 系统 ”编写 的 应 用 程序 。 
说 是 征集 ， 不 过 也 没有 什么 奖品 啦 ， 请 大 家 不 要 过 
分 期 待 啦 〈 笑 ) 。 对 于 想 让 自己 的 操作 系统 被 大 家 
所 知道 和 了 解 的 人 来 说 ， 这 里 提供 了 一 个 展示 的 场 
所 。 可 以 加 上 几 张 运行 时 的 截图 ， 还 可 以 加 上 大 家 
各 自主 页 的 链接 。 


2 关于 操作 系统 的 大 小 


在 0.1 节 中 笔者 曾经 介绍 了 人 OSASK 的 大 小 只 有 不 到 
80KB， 不 过 目前 完成 的 “ 纸 娃 娃 系 统 ” 居 然 只 有 
39.1KB 这 么 小 ， 连 笔者 都 感到 很 震惊 ， 而 且 这 还 是 
没有 经 过 压缩 的 大 小 。 在 OSASK 和 Linux 中 ， 为 了 
绾 短 系 统 的 局 动 时 间 ， 操 作 系 统 的 核心 部 分 都 是 经 
过 压缩 的 。 我 们 来 简单 计算 一 下 ， 如 果 “ 纸 娃娃 系 
统 ” 也 用 同样 的 方法 进行 压缩 的 话 ， 包 括 解 压缩 的 
程序 在 内 ， 也 只 要 大 约 20KB 左 右 ， 差 不 多 是 现在 
i 


笔者 并 没有 刻意 去 将 操作 系统 做 得 很 小 ， 因 此 这 个 
结果 是 出 平 意料 的 (当然 ， 应 用 程序 倒是 有 几 次 刻 
意 缩减 大 小 的 行为 ， 比 如 创建 apilib.lib， 将 应 用 程 
序 进 行 压 缩 ， 以 及 对 invader.hrb 所 进行 的 修改 ) 。 


笔者 一 直 坚 持 这 样 一 个 观点 : 现在 的 操作 系统 都 过 
于 爱 肿 了 ， 如 果真 要 推翻 重 写 的 话 ， 肯 定 能 一 下 子 
变 小 很 多 。 也 许 有 人 会 说 ,“ 纸 娃娃 系统 ”之 所 以 这 
么 小 ， 是 因为 它 的 功能 少 呀 。 当 然 ， 笔 者 也 不 认为 
像 Windows 和 Linux 这 样 的 系统 可 以 用 20KB 编 写 出 
来 ， 不 过 如 果 20KB 可 以 实现 这 样 的 功能 ， 那 100KB 


Ye VL 


的 功能 才 对 。 


而 且 ， 我 们 的 “ 纸 娃娃 系统 ”是 将 便于 初学 者 理解 这 
个 目的 放 在 首位 的 ， 因 此 并 没有 使 用 一 些 一 般 开 发 
者 会 用 到 的 手法 。 从 让 编写 的 程序 变 得 更 小 这 个 观 
点 来 看 ， 这 是 一 个 非常 不 利 的 条 件 。 此 外 们 我 们 还 
进行 了 一 些 优化 系统 速度 方面 的 改造 ， 这 也 会 增加 
RRNA CORED ae. Ba APE IIR BEEN SE 
Se) 。 但 即便 如 此 ， 我 们 的 系统 还 是 只 有 20KB 那 
么 小 。 


笔者 的 OSASK 大 约 有 80KB， 它 的 小 巧 曾 引起 了 不 
少 的 关注 。 笔 者 曾经 说 过 ，OSASK 就 是 对 现在 OS 

都 过 于 腔 肿 的 最 好 证 明 。 大 部 分 普通 人 都 可 以 理解 
笔者 的 这 一 观点 ， 但 有 一 些 对 编程 比较 精通 的 人 反 
ig: “ORE SRS HH HRN RI, AS 

让 尺寸 变 小 而 牺牲 了 很 多 东西 ， 并 且 用 汇编 语言 大 
量 代 替 C 语 言 1， 才 让 OSASK 变 得 这 么 小 的 。>” 


1 相 比 C 语 言 ， 笔 者 更 喜欢 汇编 语言 ， 因 此 OSASK 
的 一 半 都 是 用 汇编 语言 编写 的 。 


这 次 我 们 的 “ 纸 娃娃 系统 ”可 基本 上 者 是 用 C 语 言 纺 
写 的 (只 有 C 语 言 无 法 实现 的 部 分 才 用 汇编 语言 来 
编写 ) o HA, PRAHT RERI (RLE 
者 根本 就 不 会 什么 局 级 的 技巧 ， 如 果真 有 那 种 像 魔 


法 一 样 的 技巧 ， 笔 者 还 真 想 学 学 呢 ) 。 相 信 读 过 本 
书 的 各 位 读者 都 是 有 目 共 睹 的 。 通 过 本 书 ， 笔 者 认 
为 目 己 的 观点 更 加 有 说 服 力 了 。 


操作 系统 变 得 更 小 到 请 有 什么 好 处 呢 ? 局 动 可 以 变 
快 些 ， 安 装 所 圾 容量 能 变 小 些 ， 而 且 可 以 在 人 硬盘 、 
光盘 以 外 的 记录 媒体 上 进行 安 疼 《比如 软 舍 和 存储 
BSE) 。 其 实 ， 也 没什么 特别 的 好 处 ， 不 过 全 少 应 
该 也 没有 什么 坏处 ， 比 起 腑 肿 的 系统 来 说 ， 应 该 还 
是 精 简 的 系统 用 起 来 要 更 一 些 吧 ? 如 果 花 钱 购买 的 
操作 系统 ， 或 者 是 伦 很 长 时 间 下 载 的 操作 系统 ， 其 
中 一 半 以 上 痢 是 没 用 的 ， 笔 者 党 得 这 实在 是 太 可 起 
To 


同样 的 观点 对 于 应 用 程序 也 适用 。 笔 者 认为 “ 纸 娃 
娃 系统 ”的 应 用 程序 比 Windows 和 Linux 的 应 用 程序 
都 要 小 *。 这 是 操作 系统 的 功劳 呢 ， 还 是 我 们 为 将 
应 用 程序 变 小 所 做 的 努力 的 功劳 呢 ， 好 像 也 说 不 清 
楚 了 。 不 过 ， 应 用 程序 如 果 内 容 相 同 ， 那 目 然 是 小 
一 些 的 比较 好 ， 既 能 节约 役 盘 空间 ， 还 能 缩短 应 用 
程序 局 动 时 的 恋 取 时 间 。 


“其 实 OSASK 的 应 用 程序 更 小 ， 这 是 因为 为 了 让 
应 用 程序 变 得 更 小 ， 在 API 上 面 下 了 工夫 ， 这 个 


结果 也 是 理所当然 的 。 比 如 OSASK 的 invader.bin 
为 1108 字 节 (〈invader.hrb 为 1590 字 节 ) 。 


话说 ， 如 果 编 写 一 个 轻巧 的 操作 系统 也 算是 一 种 比 
较 优 秀 的 特殊 技能 的 话 ， 那 么 大 家 通过 这 30 天 应 该 
己 经 可 以 体验 到 了 。 也 惑 是 次， 大 家 已 经 比 普通 的 
初学 者 《甚至 是 比 普 通 的 程序 员 ? ) 更 加 优秀 了 也 
WNEIR CRK) 。 如 果 这 是 真 的 ， 那 这 本 书 说 不 定 
能 成 为 名 兰 而 大 买 特卖 呢 .……… K) 


BARR EZR AS RUAN ot BEE EY 
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过 这 一 点 和 本 书 的 目的 (编写 自己 的 操作 系统 ) 是 
没关系 的 ， 即 便 是 很 大 的 操作 系统 或 者 很 大 的 应 用 
程序 ， 也 欢迎 推荐 到 我 们 的 支持 网 页 上 来 。 


3 PRIFARI RNAS 


FEIX HARE KARI 2a — EPR TERRI WIRES o TE 
0.3 市 中 也 提 到 了 ， 不 要 从 一 开始 就 想 着 去 做 一 个 操 
作 系 统 ， 这 一 扣 是 非常 重要 的 。 还 有 ， 过 到 不 满意 
的 地 方 ， 可 以 过 后 再 来 改 ， 甚 至 是 过 后 全 部 推翻 重 
来 也 没 问题 。 从 一 开始 就 想 做 得 完美 的 话 ， 真 的 可 
能 会 寸步 难 行 。 


也 不 要 指望 能 够 一 次 就 搞定 ， 推 翻 重 做 几 次 也 是 很 
正常 的 。 反 正 有 30 天 的 时 间 就 可 以 做 到 现在 这 样 
(如果 习 惯 了 的 话 ， 有 两 周 的 时 间 就 足够 做 到 现在 
这 样 了 ， 因 为 我 们 总 不 会 每 次 都 从 helloos 开 始 

IE) 。 在 这 个 过 程 中 ， 你 的 能 力也 在 一 点 点 提升 。 


为 你 的 操作 系统 设 定 一 个 明确 而 又 容易 理解 的 目标 
也 很 重要 。 比 如 说 , “ 纸 娃娃 系统 ?是 作为 教材 编写 
的 ， 目 标 惑 是 让 初学 者 能 看 情 。 为 了 实现 “ 易 情 ”这 
个 目的 ， 我 们 可 以 牺牲 一 些 性 能 和 功能 ， 实 用 性 稍 
微 兰 一 点 也 没有 关系 。 虽 然 有 些 部 分 奉 改 用 汇编 语 
言 驶 可 以 大 幅度 提升 速度 ， 不 过 笔者 还 是 放弃 了 这 
个 念头 。 如 条 明确 了 “什么 是 最 优先 的 ， 什 么 又 是 
可 以 放弃 的 "， 操 作 系 统 的 开 友 束 会 变 得 更 加 顺 


利 。 


如 果 什 么 都 没 想 清楚 融 开 始 开 及 的 话 ， 最 后 做 出 来 
的 操作 系统 融会 让 人 摘 个 收 开 及 者 的 目的 。 只 是 做 
看 玩 的 话 ， 这 样 也 未 符 不 可 ， 或 者 说 也 可 以 将 “做 
看 玩 ” 设 定 成 一 个 目标 吧 。 这 样 一 来 只 要 至 受 开 友 
的 过 程 束 可 以 了 ， 用 起 来 有 扣 慢 也 没关系 。 当 别人 
抱 息 “这 个 不 好 用 啊 * 的 时 候 ， 你 就 可 以 笃 笃 正 正 地 
Aik: NE, cele], ANIM S o ” 


以 提高 目 己 的 编程 技巧 为 目的 来 开 及 操作 系统 也 不 
错 。 如 来 以 此 为 目标 ， 束 尽量 不 要 从 其 他 的 操作 系 
统 中 挪用 代码 ， 而 是 要 目 己 来 编写 。 


EEX N REA AMET, SESE REF tN AES 
Appt. REW, FEAT ACIS IEE PR BA Mn ASH 
会 及 现 各 种 目标 。 重 新 做 过 几 次 之 后 《从 大 约 第 三 
次 开始 ) 束 应 该 仔细 考虑 目标 了 。 


4 分 圣 给 他 人 使 用 


好 不 容易 编写 了 一 个 操作 系统 ， 想 要 使 用 这 个 操作 
系统 是 理所当然 的 。 这 个 想法 很 不 错 ， 一 定 要 用 用 
看 。 实 际 的 使 用 会 激发 你 改良 的 欲望 ， 你 对 系统 的 
理解 也 会 相应 加 深 。 


更 进一步 ， 可 能 你 会 想 分 享 给 别人 使 用 。 不 过 要 做 
到 这 一 点 ， 有 一 个 障碍 是 不 得 不 去 逾越 的 ， 那 束 
是 “找到 你 的 系统 比 其 他 系统 出 色 的 地 方 ”。 无 论 多 
么 小 ， 如 果 找 不 到 一 个 比 其 他 系统 更 好 的 地 方 ， 那 
别人 肯定 会 想 ， 还 不 如 用 Windows 或 者 Linux 呢 。 


笔者 开发 的 OSASK 因 为 运行 速度 非常 快 ， 因 此 

将 “在 很 老 很 慢 的 电脑 上 也 可 以 流畅 运行 ， 启 动 时 
间 很 短 ?” 作 为 宣传 重点 ， 并 找到 了 一 些 愿意 使 用 它 
的 人 【〔 不 过 笔者 觉得 OSASK 也 不 一 定 要 让 别人 来 使 
4 ， 因 此 即便 找 不 到 愿意 使 用 的 人 也 不 会 觉得 遗 
TR) 。 


即便 操作 系统 本 号 没 什么 宫 点 ， 如 果 能 开 肥 出 好 玩 
的 应 用 程序 (比如 游戏 ) 也 不 错 , “如 果 要 用 这 个 
应 用 程序 就 只 能 用 我 的 操作 系统 哦 ! ” 想 想 看 这 方 
法 似乎 有 点 不 太 厚 道 ， 不 过 从 操作 系统 的 的 历史 来 
看 ， 这 可 以 算是 最 第 用 的 一 种 推销 手段 了 ( 突 ) 。 


只 要 途 越 了 这 个 障碍 ， 找 到 愿意 使 用 你 的 操作 系统 
的 人 ， 那 么 你 的 用 户 一 定 会 发 邮件 来 误 励 你 的 。 如 
末 是 丙 业 销售 的 话 ， 收 益 也 会 跟 独 水 涨 盘 高 吧 。 


5 关于 光盘 中 的 软件 


光 租 中 project 目 录 中 的 文件 是 教材 用 的 操作 系统 ， 
按照 0.7 节 中 的 声明 ， 大 家 是 可 以 随意 使 用 的 。 这 种 
使 用 方法 对 与 tolset/ 目 录 中 的 大 多 数 文 件 也 是 适用 
的 。 在 这 里 我 们 将 不 适用 于 KL-01 许 可 协议 的 软件 
列 出 来 ， 也 就 是 说 ， 没 有 在 这 里 列 出 的 软件 都 适用 
KL-01 协 议 。 

发 布地 址 | 


| GPL ://wiki. 
: 
| 


[es | ton | aoaemaaem | | 


GPL 是 “The GNU General Public License”(CGNU 通 
用 公共 许可 协议 ) 的 缩写 ， 在 这 里 可 以 查看 协议 的 
中 文 翻 译 版 本 !: 


http://wiki.linux.org.hk/w/GPLv3 


1 值得 注意 的 是 ， 所 有 该 协议 的 中 文 版 都 不 是 
GNU 官 方 翻译 的 版 本 ，GNU 官 方 发 布 的 该 协议 语 


言 只 有 英语 、 阿 拉 伯 语 、 加 泰 罗 尼 亚 语 和 德语 4 种 
版 本 ，GNU 官 方 协 议 文本 请 参 
JL: http://www.gnu.org/licenses/gpl.html。 一 一 详 


者 注 


简单 概括 一 下 ， 融 是 说 如 宋 对 以 GPL 协议 用 布 的 软 
件 进行 了 修改 ， 那 么 修改 之 后 的 产物 也 必须 以 GPL 
协议 来 进行 有 发布“ 但 这 并 不 是 说 只 能 免费 发 布 ) ， 
而 且 源 代码 也 必须 公开 。 如 条 未 经 修改 而 只 是 单纯 
地 转载 及 布 的 话 ， 必 须要 明示 其 原始 发 布地 址 。 如 
东 将 以 GPL 协议 发 布 的 软件 的 一 部 分 或 者 全 部 用 于 
目 己 开 及 的 程序 中 ， 该 程序 也 必须 以 GPL 协议 进行 
发 布 〈 当 然 源 代码 也 需要 公开 〉 。 不 过 修改 和 引用 
完全 是 私人 行为 ， 如 果 不 公开 其 可 执行 文件 的 话 ， 
源 代码 也 不 必 公 开 。 以 GPL 协 议 发 布 的 软件 是 无 保 
障 的 ， 因 使 用 该 软件 所 造成 的 损失 ， 不 能 问 软 件 作 
者 索取 赔偿 。 


PTT... 

LGPLÆ “The GNU Lesser General Public 
License”(CGNU 较 宽松 通用 公共 许可 协议 ) 的 缩 
写 ， 在 这 里 可 以 查看 协议 的 中 文 翻译 版 本 ?: 


http://www.thebigfly.com/gnu/lgpl/lgpl-v3.php 


“值得 注意 的 是 ， 所 有 该 协议 的 中 文 版 都 不 是 
GNU 官 方 翻译 的 版 本 ，GNU 官 方 发 布 的 该 协议 语 
AAA Ra. WAR EMA PEMA, 
GNU 官 方 协议 文本 请 参 

JL: http://www.gnu.org/copyleft/lesser.html。 一 一 
PEATE 


LGPL 相 较 于 GPL 只 有 一 点 不 同 : 将 以 LGPL 协 议 发 
布 的 软件 的 一 部 分 或 者 全 部 用 于 自己 开发 的 程序 中 
时 ， 不 伴随 协议 的 强制 性 和 公开 的 义务 。LGPL 协 
议 主 要 是 为 库 而 准备 的 ， 只 是 引用 了 一 个 库 没 有 必 
要 强制 发 布 协议 。 不 过 ， 如 果 对 库 本 身 进 行 了 修 

改 ， 则 修改 后 的 库 必 须 以 LGPL 或 者 GPL 协议 进行 
发 布 。 


至 于 以 KL-01 协 议 发 布 的 文件 ， 无 论 怎么 修改 都 是 
OK 的 ， 也 没有 必须 将 修改 产物 的 源 代 码 公 开 或 者 
必须 以 KL-01 协 议 进 行 发 布 之 类 的 规定 ， 大 家 可 以 
随意 人 使用。 当然， 它们 同样 是 无 保障 。 


本 书 附送 的 光盘 里 面 还 有 很 多 剩余 空间 ， 因 此 笔者 
fEomake/ A KPE SRS ARG CAS EEA FT EE 


BIH) 。 在 写 书 稿 的 时 候 ， 还 没有 想 好 到 欣 要 
放 点 什么 东西 进去 ， 笔 者 会 在 omake/omake.txt 中 做 
出 说 明 。 不 过 剩余 空间 实在 是 太 多 了 ， 上 肯定 没 办 法 
全 部 填 满 ， 不 好 意思 。 


6 关于 开源 的 建议 


在 这 里 想 说 说 顺利 完成 操作 系统 和 应 用 程序 开 友 之 
FR 0 Tne: Sena eee 
De 


HPT BUMP, Bae VASE EPI ZA 
TH KERIA EARN? 你 也 许 会 
变 得 很 有 钱 ， 可 能 徘 这 份 收 入 可 以 维持 生计 ， 也 可 
能 雇佣 开 及 人 员 ， 使 事业 得 到 进一步 的 有 太 展 。 一 由 
来 说 ， 开 及 操作 系统 伦 不 了 多 少 钱 ， 比 如 这 个 “ 纸 
娃娃 系统 ”的 成 本 ， 除 了 笔者 的 生活 费 以 外 ， 再 就 
是 电脑 的 电 性 之 类 的 。 所 以 说 操作 系统 也 许 还 是 能 
维持 稳定 的 经 营 。 话 说 ， 这 种 情况 好 像 也 不 必 多 费 
中 舌 ， 大 家 目 己 应 该 可 以 想象 出 来 。 


第 二 种 方法 是 作为 目 由 软件 来 友 布 。 可 以 做 一 个 网 
站 ， 把 软件 放 在 上 面 供 大 家 下 载 ， 也 可 以 及 布 到 专 
门 的 软件 下 载 门户 网 站 上 面 。 有 人 会 说 , “这样 不 
PLEAS BIER SG? ”基本 上 就 是 挣 不 到 钱 的 ， 因 为 
这 样 做 的 目的 本 来 残 不 是 为 了 择 钱 。 这 样 的 软件 只 
要 想 用 的 人 网 可 以 免费 下 载 使 用 。 


最 后 一 种 方法 就 是 以 开源 方式 发 布 。 所 谓 开 源 并 不 
仅仅 是 公开 了 源 代 码 就 可 以 了 ， 而 是 必须 认可 对 源 


代码 进行 修改 并 作为 目 己 的 作品 进行 发 布 的 行为 。 
只 能 看 我 的 源 代 码 ， 但 是 不 准 模仿 ， 或 者 可 以 拿 来 
修改 但 必须 经 过 作者 的 允许 才能 及 布 等 等 之 闫 的 ， 
祁 不 能 算 作 是 开源 。 


开源 还 有 一 个 条 件 ， 那 就 是 必须 认可 再 次 发 布 的 目 
由 。 也 就 是 说 ， 你 不 能 因为 人 家 复制 了 你 的 软件 放 
在 其 他 网 页 上 供 人 下 载 而 生气 。 比 如 “只 能 从 我 自 
己 的 主页 才能 下 载 哦 * “由 于 想 要 正确 统计 下 载 数 
量 而 禁止 再 次 发 布 哦 ”之 类 的 话 是 不 能 说 的 。KL-01 
以 及 GPL 、LGPL 都 是 为 开源 软件 而 制定 的 许可 协 
议 。 


无 论 是 目 由 软件 也 好 还 是 开源 软件 也 好 ， 并 不 是 说 
就 完全 不 能 用 来 盔 利 。 你 可 以 宣布 “下 个 月 开始 停 
止 免费 下 载 ， 改 成 在 商店 里 面 出 售 * 之 类 的 。 不 过 
如 果 是 开源 软件 的 话 ， 因 为 拥有 再 次 发 布 的 目 由 ， 
己 经 下 载 过 软件 的 人 在 目 己 的 主页 上 发 布 出 来 ， 半 
价 销售 跟 你 竞争 的 话 ， 你 也 无 话 可 说 。 如 果 不 希 望 
变 成 这 样 ， 那 最 好 从 一 开始 了 就 不 要 选择 开源 。 如 末 
是 目 由 软件 ， 那 只 要 在 文档 中 写 明 茶 止 再 次 发 布 ， 
将 来 想 改 成 收费 软件 的 时 候 就 可 以 放心 了 。 


如 果 想 要 半路 出 家 改 成 收费 软件 ， 为 了 吸引 之 前 下 


载 过 免费 版 的 用 户 来 购买 ， 可 以 使 用 增加 一 些 功 

能 、 发 布 升级 版 的 方法 ， 而 之 前 的 免费 版 可 以 作为 
试用 版 继续 提供 免费 下 载 。 用 这 种 方法 可 以 不 用 过 
于 担心 再 次 发 布 的 问题 ， 也 同样 适用 于 开源 软件 。 
不 过 话说 回来 ， 开 源 软 件 由 于 公开 了 源 代码 ， 那 实 
际 上 有 是 保证 了 修改 的 目 由 ， 可 能 会 有 人 做 出 比 你 的 
商品 版 更 好 的 软件 ， 然 后 用 来 出 售 或 者 免费 发 布 。 


因此 ， 如 果 选 择 以 开源 方式 肥 布 软件 的 话 ， 将 来 想 
要 转 为 付费 方式 就 比较 困难 了 。 


看 上 去 星 端 很 多 的 开源 方式 ， 其 实 也 有 好 的 一 面 。 
如 果 用 户 跟 你 抱怨 “请 加 上 一 个 oo 的 功能 吧 ” “xx 
功能 没什么 用 啊 ， 去 邱 吧 ”“bug 太 多 了 ， 帮 用 
忙 ” 之 类 的 话 ， 你 可 以 说 : 


“这 个 是 开源 软件 ， 请 日 己 修改 好 了 CX) 。 
这 束 是 开源 软件 最 大 的 好 处 。 


如 果 作 为 商品 出 售 的 话 ， 用 户 可 能 会 抱怨 说 , “有 
oo 这 样 的 功能 是 理所当然 的 啊 ， 你 这 个 软件 大 然 没 
有 ， 太 过 分 了 ， 退 钱 ! ”如 果 是 目 由 软件 虽说 不 会 
被 有 要求“ 退 钱 "”， 但 用 户 可 能 会 说 : “我 已 经 请 求 了 
很 人 人 了， 为 什么 还 没 加 上 这 个 功能 呢 ? 什么 ， 你 说 


有 意见 的 话 目 己 从 头 开发 一 个 类 似 的 软件 好 了 ? 这 
也 太 过 分 了 吧 ， 你 是 作者 ， 只 要 改 儿 行 代码 再 重新 
make 一 下 就 好 了 啊 ..…....”。 但 开源 的 话 就 不 会 有 这 
样 的 问题 啦 。 


尤其 是 当 你 只 是 攒 兴趣 编写 了 一 个 小 软件 ， 发 布 之 
后 即便 引 来 一 大 堆 抱怨 也 不 布 望 会 过 于 喇 用 目 己 的 
时 间 ， 这 个 时 候 开 源 是 很 适合 你 的 。 即 便 很 久之 后 
服务 硕 不 能 继续 工作 了 ， 也 会 有 人 玫 你 再 次 及 布 出 
来 ， 你 也 不 会 因此 而 受到 过 多 的 指 黄 。 甚 全 也 许 在 
不 经 意 间 ， 你 的 软件 已 经 渐渐 流传 开 来 ， 并 有 人 进 
人 
AE YT 


而 且 ， 开 源 的 话 ， 会 有 很 多 人 “ 误 以 为 “这 个 作者 

WERT”, 于 是 你 会 多 出 许多 朋友 ， 损 不 好 还 会 被 
ASF. A A EER KA BI SPA, Un 
AMR re tes JIN E tH Hee AR & A, ty BE SS mI 
FR, 177 — Ue RARER AIS 5, HA ACA a fe 
也 会 随 之 烟消云散 。 啊 ， 真 正 的 朋友 屈指 可 数 ， 真 
是 人 生 无 汕 啊 。 但 是 ， 由 开源 而 局 得 的 朋友 和 章 

敬 ， 如 来 你 真 破产 了 ， 他 们 反而 会 变 得 更 加 支持 

你 。 啊 ， 那 个 家 伙 已 经 身 无 分 文 了 ， 居 然 还 将 目 己 
的 软件 开源 呢 ! CR) 


而 且 ， 这 种 事 是 会 上 首 的 。 因 一 次 开源 而 成 名 之 
后 ， 以 后 束 会 只 想 用 开源 方式 友 布 软件 了 。 这 样 可 
不 行 ， 真 的 会 破产 的 。 因 此 ， 好 孩子 可 千 万 不 要 玩 
FURR Mk, ALM, AWE EEE AAT VI | 
(R) 


话说 ， 如 果 你 一 直 努 力 做 开源 软件 ， 在 你 的 朋友 中 
间 可 能 会 有 人 帮 你 介绍 一 份 好 工作 ， 请 你 到 大 学 里 
面 演讲 ， 或 者 明明 实力 一 般 却 意外 地 出 了 名 ， 获得 
目 己 写 书 出 版 的 机 会 。 其 实 这 只 是 笔者 的 情况 而 

己 ， 不 知道 是 不 是 所 有 人 都 能 走 这 条 路 。 笔 者 党 得 
只 是 目 己 运气 比较 好 妆 了 ， 可 不 敢 打 包 票 哦 。 


如 果 大 家 选择 用 开源 方式 发 布 目 己 的 软件 ， 以 后 有 
机 会 一 定 要 和 笔者 一 起 出 席 * 开 源 大 会 " 哦 。 笔 者 会 
出 席 OSASK 的 展位 ， 如 果 各 位 读者 能 在 劳 边 的 展位 
一 起 展示 你 的 开源 软件 ， 那 真是 再 好 不 过 的 事 了 。 


开 谣 大 会 是 日 本 开源 软件 界 的 盛会 ， 每 年 在 东 系 
举办 两 次 ， 在 北海 道 和 冲绳 举办 一 次 ， 详 细 请 参见 
以 下 网 页 : 


http://www.ospn.jp/ 


“中 国 也 举办 类 似 的 开源 大 会 ， 详 细 信息 可 以 参 
见 “ 中 国 开源 软件 推进 联盟 ”: 
http://www.copu.org.cn/。 一 一 译 者 注 


关于 开源 就 介绍 到 这 里 。 对 于 自己 所 开发 的 软件 ， 
如 果 是 有 偿 铀 售 或 者 是 作为 自由 软件 发 布 ， 可 能 
家 比较 容易 想象 ， 而 开源 的 发 布 方式 可 能 大 家 不 是 
很 熟悉 ， 因 此 才 在 这 里 专门 详细 介绍 了 一 下 。 


开源 有 开源 的 好 处 ， 也 有 其 独 有 的 乐趣 ， 但 开源 也 

不 是 万 能 的 ， 如 末 你 选择 目 由 软件 或 者 有 供销 售 的 

话 都 是 完全 OK 的 。 请 大 家 深思 熟 夸 ， 找 一 个 最 贴 

近 目 标的 方式 来 肥 布 目 己 的 软件 吧 (当然 ， 不 想 友 

Ea 。 无论 如 何 ， 笔 者 都 会 文 持 
AHJ o 


7 后 记 


后 记 ， 或 者 叫 涂鸦 吧 ， 上 反正 凡是 关于 这 本 书 的 话 
题 ， 都 可 以 随便 写 写 。 


从 哪里 开始 写 呢 ?就 从 这 本 书 的 封面 开始 写 吧 。 书 
的 封面 是 很 漂亮 的 绿色 ， 这 个 绿色 是 笔者 提议 的 ， 
代表 鲜嫩 的 叶子 。 初 学 者 就 像 是 嫩 叶 一 样 ， 而 且 笔 
者 很 豆 欢 秩 林 洽 ， 感 觉 这 种 看 上 去 很 环保 的 颜色 ， 
和 非常 强调 HLT 重 要 性 的 本 书 也 挺 搭 调 的 。 


封面 中 间 还 有 只 猫 ， 其 实 那 不 是 猫 ， 而 是 有 两 条 尾 
巴 的 一 种 日 本 传说 中 的 妖怪 一 一 猎 又 ， 在 本 书 的 漫 
画 中 也 经 常 登场 。 它 是 OSASK 的 吉祥 物 ， 也 是 “ 纸 
EER IN AE, A UU ies KI, HERR 
MUR, KAS KE... IE, WWE T a 
记 才 介绍 人 家 啊 ! 


笔者 努力 将 这 本 书写 成 一 本 初中 生 也 能 看 异 的 书 。 
笔者 目 己 也 是 从 初中 的 时 候 开 始 萌 友 要 编写 一 个 操 
作 系 统 的 念头 的 ， 因 此 在 这 本 书 的 内 容 安排 上 是 以 
当时 的 自己 也 能 看 懂 为 基准 的 〈 话 说 ， 其 实 笔者 当 
时 并 没有 能 够 编写 出 操作 系统 ) 。 


在 本 书 中 ， 笔 者 尽量 避免 使 用 临 汲 难 恒 的 语言 ， 对 
英语 单词 也 进行 了 适度 的 解释 。 其 实 编写 操作 系统 
本 来 也 不 需要 什么 高 深 的 知识 。 即 便 你 不 会 解数 学 
方程 式 ， 不 会 用 英语 对 话 ， 不 知道 历史 上 的 重要 人 
物 ， 不 知道 如 何 使 用 敬 语 1， 不 知道 原子 的 名 称 ， 

你 都 可 以 坚 无 障碍 地 编写 出 操作 系统 。 因 此 ， 笔 者 
没有 刻意 去 圈定 对 象 读者 ， 而 是 以 让 所 有 想 要 编写 
探 作 系统 的 人 都 能 够 看 懂 作 为 写 这 本 书 的 目的 。 


"日语 中 有 严格 的 敬 语 体系 。 当 对 方 为 长 辜 、 上 
级 、 合 作 伙 伴 时 须 使 用 敬 语 。 一 一 译 者 注 


另 一 方面 ， 笔 者 也 努力 让 大 学 生 和 成 人 读者 不 至 于 
觉得 这 本 书 太 幼 稚 。 笔 者 觉得 自己 应 该 是 找到 了 这 
么 一 个 平衡 点 ， 如 果 各 位 读者 也 有 同感 那 就 再 好 不 
过 了 。 


笔者 党 得 编程 相关 的 书 都 卖 得 比较 贯 ， 当 然 ， 考 虑 
到 读者 的 数量 ， 这 个 价格 也 无 可 厚 非 ， 请 大 家 不 要 
埋怨 出 版 社 〈 如 果 出 版 社 亏损 倒闭 的 话 那 情况 会 更 
糟糕 〉 。 不 过 ， 笔 者 想 让 这 本 书 能 让 初中 生 也 买 得 
起 ， 因 此 拜托 了 一 些 有 关 的 朋友 ， 让 他 们 把 价格 定 
得 低 一 些 。 我 不 知道 对 现在 的 初中 生来 说 ， 如 果 不 
等 到 过 年 发 压岁钱 的 话 ， 这 个 价格 他 们 是 否 能 够 承 


受 ， 如 果 不 行 的 话 可 以 让 图 书馆 购买 ， 学 生 只 要 到 
图 书馆 去 信 束 可 以 了 。 如 果 这 个 价格 让 你 液 得 还 可 
以 承受 ， 那 么 请 对 出 版 社 和 那些 有 关 人 士 的 努力 表 
示 感 谢 吧 。 


如 果 笔 者 是 一 个 很 有 名 的 作者 ， 出 版 社 对 书 的 销量 
有 信心 的 话 ， 可 能 会 定 一 个 比较 有 挑战 性 的 价格 ， 
但 其 实 这 本 书 是 笔者 写 的 第 一 本 书 ， 出 版 社 也 基本 
上 是 赌 了 一 把 。 这 么 想 的 话 和 党 得 目 己 的 要 求 确实 有 
点 任性 ， 在 这 里 说 声 抱歉 了 。 


可 能 有 的 读者 党 得 这 本 书页 数 太 多 ， 太 重 了 。 其 实 
当初 也 考虑 过 分 成 上 下 册 ， 其 至 是 分 成 1~4 册 ， 但 
结果 发 现 合 并 成 一 表 最 便宜 ， 于 是 就 这 样 愉快 地 决 
定 了 。 这 本 书 的 内 容 属 于 先 吾 后 甜 的 类 型 ， 如 打分 
成 上 下 册 ， 有 些 读者 只 看 了 了 上册 觉得 未 来 一 厂 黑 
暗 ， 可 能 会 失去 继续 阅读 的 兴趣 ， 这 也 是 合并 成 一 
册 出 版 的 理由 之 一 。 如 来 一 定 要 分 成 几 册 的 话 ， 那 
只 能 麻烦 大 家 目 己 用 切割 机 把 书 给 切 开 了 。 


这 本 书 从 开始 到 读 完 差不多 真 的 需要 30 天 左右 ， 因 
此 把 这 本 书 的 价格 除 以 30 的 话 ， 说 不 定 就 会 觉 
得 “平均 每 天 只 要 花 3.3 元 啊 ， 真 划算 ”。 虽 然 不 如 
RPG (角色 扮演 游戏 ) 那样 好 玩 ， 不 过 你 可 以 想象 
一 下 屏幕 后 面 不 是 你 的 分 刁 ， 而 束 是 你 自己 ， 在 不 
停 地 升级 。 这 么 说 感觉 好 像 在 跟 大 家 推销 似 的 


CK) 。 那 就 再 说 说 相反 的 情况 ， 一 本 不 便宜 的 
书 ， 买 了 之 后 觉得 后 悔 的 话 那 真是 太 伤 心 了 ， 因 此 
请 大 家 听 听 读 过 这 本 书 的 人 的 感想 ， 或 者 先 试 读 一 
部 分 ， 和 仔细 考虑 之 后 再 购买 。 也 可 以 跟 同样 的 价钱 
能 买 到 的 别 的 东西 “比如 可 以 买 几 根 巧 殉 力 棱 之 类 
的 ) 对 比 一 下 ， 考 外 考虑 买 了 对 你 是 不 是 有 价值 。 
不 过 这 种 话 写 在 最 后 好 像 没 什么 意义 了 呆 ， 如 采 看 
到 这 里 的 应 该 是 已 经 买 了 吧 ..…… 


作为 笔者 来 说 ， 已 经 在 内 容 的 充实 方面 做 了 很 多 努 
力 。 既 然 定价 的 调整 是 有 限度 的 ， 那 么 如 朱 能 让 内 
容 的 质量 提高 到 原来 的 两 舍 ， 融 相当 于 价格 降 到 了 

半 。 虽 说 这 本 书 还 远 远 没 达到 两 倍 的 标准 ， 但 笔 
者 确实 已 经 尽 了 目 己 最 大 的 努力 。 


讲解 的 长 短 以 及 整体 的 节 和 又 也 是 经 过 仔细 调整 的 ， 
WRITER, MERKAR HANE. 
琳 把 本 书 这 些 内 容 两 天 并 作 一 天 来 写 的 话 ， 用 15 章 
的 高 幅 就 可 以 搞定 了 ， 但 各 位 读者 当中 一 定 会 有 人 
消化 不 民 的 。 

光 看 本 书 的 书 名 “30 天 目 制 操作 系统 ?， 对 于 坚 无 操 


作 系 统 相 关 知 识 的 人 来 说 ， 可 能 会 觉得 “什么 啉 ， 
居然 要 30 天 那么 长 啊 ”， 笔 者 也 知道 30 天 有 点 长 ， 


但 以 现在 的 节奏 ， 到 第 20 天 就 结束 的 话 ， 感 觉 实在 
征 很 可 惜 《〈 不 信 的 话 可 以 看 看 第 20 天 时 的 样子 .…… 
我 们 刚 唱 开始 编号 API 呢 ) ， 想 想 看 仅仅 多 了 10 天 
的 内 容 ， 我 们 的 系统 惑 变 得 好 玩 多 了 。 如 果 在 第 10 
天 或 者 第 15 天 收尾 就 更 无 法 接受 了 ， 完 全 体现 不 出 
编写 操作 系统 的 乐趣 。 


反 过 来 说， 如 末 我 们 将 开发 周期 延长 到 40 天 或 者 50 
天 ， 那 一 定 能 做 出 更 有 意思 的 系统 。 不 过 笔者 的 体 
HEEEL, WERE PF. AMR 
名 变 成 《50 天 自制 操作 系统 》， 估 计 各 位 读者 更 要 
敬而远之 了 吧 。 


对 于 操作 系统 ， 笔 者 有 很 多 目 己 的 观点 ， 其 中 之 一 
束 是 操作 系统 应 目 带 文件 压缩 功能 。 但 这 个 观点 并 
未 成 为 操作 系统 界 的 毅 识 ， 因 此 笔者 也 融 没 有 过 多 
地 讨论 ， 而 是 在 29.2 节 中 ， 仅 以 缩 小 字库 文件 大 小 
为 目的 加 入 了 压缩 功能 ， 关 于 压缩 对 操作 系统 的 重 
BAPE TA PARTE 


若 操作 系统 自 带 压缩 功能 是 常识 ， 笔 者 就 会 在 29.2 
节 中 ， 从 构思 基本 算法 开始 ， 对 tek 压 缩 进行 详细 的 
介绍 ， 或 者 说 是 十 分 想 向 大 家 介绍 。 很 遗憾， 我 们 
的 篇 幅 有 限 ， 无 论 如 何 也 无 法 在 这 本 书 中 展开 这 个 
话题 。 


笔者 对 于 操作 系统 的 这 些 观点 ， 大 部 分 都 在 OSASK 
中 有 所 体现 ， 但 在 本 书 的 撰写 过 程 中 ， 却 尽量 避免 
将 这 些 观 点 流露 出 来 ， 也 没有 将 OSASK 搬 出 来 ， 跟 
大 家 吹 咕 “怎么 样 ， 这 个 功能 也 有 哦 ， 很 历 害 吧 ” 之 
类 的 ， 因 为 这 样 做 一 点 意思 都 没有 。 笔 者 不 想 给 大 
家 强加 先入 为 主 的 观念 ， 而 将 大 家 好 不 容易 冒 出 来 
的 好 点 子 给 扼杀 掉 。 


因此 ， 笔 者 只 同 大 家 介绍 编写 操作 系统 的 扩 术 ， 并 
希望 各 位 读者 能 自由 发 挥 想象 力 ， 开 发 出 各 种 各 样 
不 同 的 操作 系统 。 如 果 大 家 开 友 出 来 的 操作 系统 都 
像 OSASK 的 殉 隆 一 样 ， 那 目 制 操作 系统 的 世界 也 就 
没有 进步 ， 变 得 相当 无 聊 了 。 


临近 收尾 ， 预 定 的 截 往日 一 拖 再 把， 实在 是 给 编辑 
添 了 不 少 蚊 烦 ， 笔 者 能 力 有 限 ， 实 在 抱歉 。 万 外 ， 
对 于 出 版 社 能 够 听取 笔者 的 建议 ， 也 表示 砷 心 的 感 


谢 。 


在 这 里 ， 还 要 向 临近 考试 还 参与 本 书 校对 的 初中 生 
读者 代表 DAsoran 同 学 、 高 中 生 代 表 uchan 同 学 ， 以 
及 对 本 书 做 出 很 多 客观 诚恳 指摘 的 成 人 读者 代表 若 
AE JA Ae ZN RUM 


还 有 为 本 书 绘制 插图 以 及 制作 各 种 示意 图 的 
hideyosi， 真 是 帮 了 大 忙 ， 在 此 表示 感谢 。 


还 要 感谢 OSASK 社 区 的 各 位 成 员 。 在 这 一 年 多 的 时 
则 里 ， 为 了 撰写 这 本 书 ， 而 中 断 了 OSASK 的 开发 ， 
在 此 期 间 ， 虽 然 有 些 抱 忽 ， 但 大 家 还 是 坚持 了 下 
来 。 归 根 结 底 ， 也 是 承蒙 社区 各 位 成 员 的 厚爱 ， 便 
OSASK 一 举 成 名 ， 笔 者 才能 有 机 会 出 版 本 书 。 


当然 ， 最 要 感谢 的 是 现在 正在 读 这 本 书 的 你 ， 谢 
UN 
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Hidemi KAWAI <kawai@osask.jp> 


“请 发 送 到 下 面 的 邮箱 : 在 某 些 文档 中 ， 笔 者 的 
邮箱 可 能 写 的 是 这 个 : kawai@imasy.org， 这 个 地 
址 现在 已 经 不 用 了 ， 因 此 请 不 要 友 到 这 里 。 


不 过 ， 笔 者 不 能 保证 对 收 到 的 来 信 一 一 回复 。 如 末 
是 提问 或 者 感想 的 话 ， 请 尽量 到 文 持 网 页 的 论坛 中 
发 帖 ， 这 样 的 话 ， 笔 者 之 外 的 人 也 可 以 看 到 以 及 回 


帖 ， 应 该 可 以 更 快 地 得 到 有 用 的 回答 。 


如 果 想 给 笔者 及 私人 邮件 ， 回 复 慢 了 或 者 收 不 到 回 
复 也 无 所 谓 的 话 ， 那 么 请 及 到 上 面 的 邮箱 吧 。 


COLUMN-12 这 也 能 叫 目 制 操 作 系 统 ? KNE 
J! 《以 下 内 容 不 是 面 癌 初学 者 的 ) 


说 到 编写 操作 系统 ， 难 道 不 该 完 从 应 该 编写 一 个 
怎样 的 操作 系统 开始 讨论 吗 ? 要 编写 多 任务 操作 
系统 ， 如 何 解决 访问 冲突 难过 不 是 最 重要 的 吗 ? 
连 文件 系统 都 没有 设计 怎么 能 算是 目 制 操作 系统 
啊 ! 根本 没有 考 碟 设备 张 动 程序 的 问题 咏 ! 内 存 
不 足 时 的 处 理 实在 是 不 够 完善 啊 ! 窗口 系统 也 太 
粗糙 了 点 吧 ? 中 断 处 理 的 少许 优化 、 窗 口 移动 的 
加 速 、 加 入 压缩 功能 之 类 的 ， 部 不 算是 操作 系统 
中 本 质 的 部 分 ， 难 道 不 该 减少 这 部 分 内 容 的 篇 

幅 ， 将 重点 更 多 地 放 在 操作 系统 的 本 质 上 吗 ? 如 
东 操 作 系 统 都 照 这 样 来 做 ， 那 世上 的 操作 系统 得 


有 多 不 靠 谱 啊 | 


且 先 不 论 目 制 操作 系统 这 个 主题 ， 想 要 找 点 这 本 
书 的 好 处 难 啊 。 作 为 汇编 语言 的 入 门 吧 ， 对 于 指 
令 的 讲解 也 太 少 了 ; 作为 C 语 言 的 入 门 吧 ， 对 语 
法 的 讲解 又 不 充分 ， 作 为 算法 的 入 门 吧 ， 还 需要 
介绍 很 多 其 他 的 东西 才 行 。 无 论 哪个 都 是 只 有 半 


瓶 醋 ， 没 什么 用 处 。 这 种 对 操作 系统 大 小 的 过 度 
追求 ， 对 编程 初学 者 来 说 难道 不 是 有 害 的 吗 ? 


像 上 面 这 种 质疑 的 声音 是 肯定 会 有 的 ， 没 错 没 
错 ， 你 说 得 对 ， 这 本 书 的 确 有 上 面 这 些 不 足 之 
处 。 不 过 ， 笔 者 在 写 这 本 书 的 时 候 ， 可 并 不 是 对 
这 些 不 足 一 无 所 知 的 哦 (关于 操作 系统 大 小 的 那 
is EWA A mM AEN) -o 


“从 失败 中 学 习 ? 是 贯穿 本 书 的 一 个 理念 。 当 然 ， 

一 开始 在 什么 都 不 知道 的 情况 下 ， 也 谈 不 上 失 

着 内 容 的 进行 ， 我 们 一 般 是 先 随便 做 一 个 版 本 ， 
然后 发 现 这 个 版 本 的 缺陷 之 后 再 进行 改 民 。 因 

此 ， 可 能 你 看 到 “ 纸 娃 娃 系 统 ” 在 访问 冲突 方面 考 
虑 不 周 ， 其 实 笔 者 是 故意 这 样 做 的 。 有 更 多 篇 幅 
的 话 ， 就 可 以 利用 访问 冲突 让 “ 纸 娃娃 系统 ” 衣 泪 
一 次 ， 然 后 再 引出 改 民 的 话题 。 


或 者 说 ， 笔 者 正 是 因为 清楚 这 些 不 足 才 和 希望 各 位 
指教 。 如 果 你 能 指出 其 中 的 不 足 ， 而 且 可 以 所 出 
对 策 的 话 ， 那 笔者 束 可 以 直接 将 这 些 对 琐 告 诉 各 
位 读者 了 。 也 就 是 说 ， 你 可 以 为 这 本 书 来 撰写 续 
篇 了 。 所 以 列 客气 ， 请 多 多 指教 吧 ，。 


当然 ， 这 个 “从 失败 中 学 习 ” 的 理念 念 介 也 会 站 到 
一 些 质疑 吧 。 如 宁 不 经 过 这 些 失败 的 例子 ， 从 一 
开始 束 条 理 清楚 地 讲解 各 个 功能 的 必要 性 ， 整 个 
篇 幅 束 可 以 软 短 ， 最 终 的 操作 系统 完成 度 也 会 所 
局 ， 大 构 有 15 天 左右 束 可 以 达到 现在 的 完成 度 了 
吧 。 可 是 那样 的 讲解 到 的 效果 如 何 呢 ? 是 不 是 能 
HHUA TEE? 用 算术 来 举例 ， 我 们 不 要 一 上 来 束 
介绍 乘法 运算 ， 而 是 移 用 反复 的 加 法 运算 先 凑 合 
BRE, SKEER T HR, 
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算 的 便利 ， 也 就 更 有 动力 去 背 九 九 习 法 表 了 。 


对 这 本 书 的 标题 感 兴 趣 的 读者， 一 定 都 曾经 萌发 
过 编写 操作 系统 的 念头 吧 。 因 此 凡是 可 能 会 对 读 
者 的 兴趣 产生 不 利 影响 的 东西 ， 笔 者 部 尽量 避 

免 。 在 使 用 汇编 语言 时 ， 尽 量 减 少 所 使 用 指令 的 
种 类 ; 对 C 语 言 的 语法 并 非 完 全 讲解 ， 而 古 仅 限 
于 其 中 容易 理解 的 部 分 (或 者 说 是 不 用 的 话 反 而 
会 变 得 更 难 展 的 部 分 )。 


对 于 笔者 来 说 ， 这 的 确 是 烦 具 挑 成 性 的 。“ 纸 娃娃 
系统 ”到 底 能 用 多 简单 的 语法 实现 丰富 的 功能 ， 这 
eT Peis 到 撒 能 用 多 简单 的 知识 就 能 完成 一 个 
操作 系统 ， 也 是 一 个 挑战 。 大 家 可 能 也 不 止 一 次 


会 想 ， 在 录 些 地 方 使 用 更 高 级 的 命令 会 更 好 。 笔 
者 也 想 过 在 录 些 地 方 使 用 一 些 高 级 的 算法 ， 也 想 
过 为 了 本 书 的 读者 将 来 能 读 懂 其 他 程序 而 对 C 语 
言 一 些 其 他 的 语法 进行 讲解 ， 但 是 这 些 笔 者 都 没 
有 做 ， 因 为 一 旦 开始 这 样 的 话题 ， 可 能 就 没完 没 
下 下 


本 书 的 主 则 就 是 要 让 本 来 很 难 的 东西 看 上 去 变 得 
很 容易 。 只 要 看 上 去 很 容易 ， 读 者 融会 在 基本 理 
解 的 基础 上 有 动力 继续 恋 下 去 《有些 无 法 实际 感 
受到 的 东西 也 不 是 很 重要 ， 只 要 基本 上 理解 了 吏 
没有 问题 ) ， 读 到 后 面 发现 前 面 的 东西 其 实 并 没 
有 完全 理解 ， 这 时 只 要 再 翻 回 前 面 看 看 就 可 以 
了 。 如 果 本 来 环 很 难 的 东西 ， 还 要 用 很 难 的 方式 
去 讲解 ， 那 读者 马上 束 会 大 们 的 ， 因 此 笔者 尽量 
避免 出 现 这 种 情况 。 


当然 ， 把 本 来 简单 的 东西 摘 得 很 复 洒 ， 那 融 更 不 
应 该 了 。 


在 内 容 的 先后 上 笔者 也 人 花 了 心思 。 从 操作 系统 的 
重要 功能 开始 做 ， 这 种 观点 对 于 本 书 来 说 古 不 成 
并 的 。 本 书 是 从 简单 的 、 好 看 的 、 效 果 容 易 理 解 
的 、 有 成 束 感 的 、 而 且 是 对 操作 系统 有 必要 的 部 


分 开始 ， 逐 步 进 行 开 发 的 。 因 此 ， 可 能 会 出 现 一 
些 不 太 寻 各 的 东西 。 例 如 为 了 介绍 操作 系统 的 核 
心 ， 从 一 开始 加 引入 了 bim2hrb.exe， 其 实 这 个 工 
有 具 是 应 用 程序 用 的 连接 器 。 也 惑 是 说 ， 本 来 应 该 
在 编写 应 用 程序 的 时 候 才 引入 bim2hrb.exe 的 ， 但 
我 们 却 在 一 开始 几乎 不 加 说 明 地 引入 了 

bim2hrb.exe。 男 外 ， 在 本 书 中 根本 没有 操作 系统 
用 的 连接 咒 ， 这 也 是 在 内 容 上 花 了 心思 的 结果 。 


在 编写 “ 纸 娃 娃 系统 ”的 过 程 中 ， 有 很 多 涉及 对 速 
度 进 行 优 化 的 内 容 ， 现 在 想 想 看 ， 其 中 有 一 些 内 
容 感觉 不 是 非常 有 必要 。 不 过 ， 在 舞 写 那些 章节 
的 时 候 ， 考 虑 到 这 个 算法 在 以 后 还 可 以 派 上 别 的 
用 场 ， 因 此 附 市 提 一 提 。 男 一 方面 ， 其 实 优化 速 
度 本 身 在 某 些 情 况 下 还 是 相当 重要 的 。 如 果 因 为 
没有 优化 而 造成 速度 很 乙 ， 读 者 可 能 会 误 以 为 “ 果 
然 初 学 者 做 出 的 系统 ， 速 度 没 办 法 达到 像 
Windows 和 Linux 那 样 实用 的 程度 "”， 从 而 影响 了 
FP IA aes 
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关系 ， 但 希望 大 家 在 批判 前 能 理解 笔者 的 想法 。 


《友谊 天 长 地 久 》 苏 格 兰 民谣 1*/ 


"SJIS"; T100L404 


ERDBOUND Eoo"; CF .F8FAG.F8GAFFA>CD2&D8R8 
"B(SA)EBVDEA wShIO0"; DC. 

"QOL MES TEDL"; DC.DC.CD2&D8R8 

"HITE WS bene"; DC， 


! 这 里 和 30.3 节 的 情况 相同 ， 如 果 大 家 没有 将 日 文 
显示 改造 成 中 文 显示 ， 则 还 是 要 使 用 日 文 歌词 才 
能 在 应 用 程序 中 正常 显示 出 来 。 这 首 歌 是 苏格兰 
民谣 ， 在 日 本 的 中 小 学 毕业 典礼 上 经 常会 演唱 ， 
中 文 版 就 是 大 家 所 熟悉 的 《友谊 地 久 天 长 》。 
一 译 者 注 
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这 本 书 如 果 按 顺序 读 下 来 的 话 应 该 还 是 一 本 不 错 的 
书 ， 不 过 在 读 过 一 过 之 后 ， 忽 然 想 知道 关于 某 个 知 
识 点 是 在 哪里 讲解 的 ， 找 起 来 可 束 肪 类 了。 此外， 
如 果 对 于 某 个 函数 的 写法 不 太 理解 ， 想 找到 这 个 写 
法 是 在 哪个 章节 提 到 的 ， 融 更 加 麻烦 了 。 


办 此， 我 们 在 这 里 提供 了 一 个 简单 的 函数 索引 。 它 
是 在 bootpack.h 和 apilib.h 的 代码 中 加 上 注释 所 构成 
A, WIS AS], ERY DAE W BIE PS R Bee CEM 
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bootpack.h 


/* asmhead.nas */ 
struct BOOTINFO { /* OOXoff6.0Xofff */ [E S25. 635 
18.7 */ 

char cyls; /* 引导 局 区 读 取 到 磁盘 的 哪个 位 置 */ 

char leds; /* 引导 时 键盘 的 LED 状 态 */ 


char vmode; /* 显卡 的 颜色 位 数 */ 
char reserve; 

short scrnx, scrny; /* 画面 分 辩 率 */ 
char *vram; 


B 
#define ADR_BOOTINFO 9Xx66666ff6 
#define ADR_DISKIMG 0x00100000 


/* naskfunc.nas */ 


void io hlt(void); /* 3.9, 4.6 */ 

void io _cli(void); /* 4.6 */ 

void io _sti(void); /* 4.6 */ 

void io_stihlt(void) ; /* 4.6 */ 

int io_in8(int port); /* 4.6 */ 

void io_out8(int port, int data); /* 4.6 */ 

int io load eflags(void); /* 4.6 */ 

void io_store_eflags(int eflags); /* 4.6 */ 

void load_gdtr(int limit, int addr); /* 6.4 */ 
void load_idtr(int limit, int addr); 

int load_cr@(void); /* 9.2 */ 

void store _cr@(int cre) ; /* 9.2 */ 

void load_tr(int tr); /* 15.1 */ 

void asm_inthandlerðc(void); /* 22.2 */ 

void asm_inthandler@d(void) ; /* 21.5, 21.6 */ 
void asm_inthandler20(void); /* 12.1, 21.4, 21.6 */ 
void asm_inthandler21(void) ; /* 6.6 */ 

void asm_inthandler2c(void); 

unsigned int memtest_sub(unsigned int start, unsigned 
int end); /* 9.2, 9.3 */ 

void farjmp(int eip, int cs); /* 15.3 */ 

void farcall(int eip, int cs); /* 20.4 */ 

void asm_hrb_api(void); /* 20.8, 21.4, 21.6 */ 

void start_app(int eip, int cs, int esp, int ds, int 
*tss espQ); /* 21.4, 21.6 */ 

void asm_end_app(void); /* 22.3 */ 


/* fifo.c */ 
struct FIFO32 { /* 13.4, 16.2 */ 
int *buf; 
int p, q, size, free, flags; 
struct TASK *task; 
}; 
void fifo32 init(struct FIFO32 *fifo, int size, int 
*buf, struct TASK *task); /* 13.4, 16.2 */ 
int fifo32_put(struct FIFO32 *fifo, int data); /* 


13.4, 16.2, 16.4, 16.5 */ 
int fifo32_get(struct FIFO32 *fifo); /* 13.4 */ 
int fifo32_status(struct FIFO32 *fifo); /* 13.4 */ 


/* graphic.c */ 
void init_palette(void) ; /* 4.6, 25.2 */ 
void set_palette(int start, int end, unsigned char 
*rgb); /* 4.6 */ 
void boxfill8(unsigned char *vram, int xsize, unsigned 
char c, int x0, int y@, int x1, int y1); /* 4.7 */ 
void init_screen8(char *vram, int x, int y); 
void putfont8(char *vram, int xsize, int x, int y, char 
c, char *font); /* 5.4 */ 
void putfonts8 asc(char *vram, int xsize, int x, int y, 
char c, unsigned char *s); /* 5.6, 28.5, 28.6, 28.7 */ 
void init_mouse _cursor8(char *mouse, char bc); /* 5.8 
af: 
void putblock8 8(char *vram, int vxsize, int pxsize, 
/* 5.8 */ 

int pysize, int px®@, int pyð, char *buf, int 
bxsize) ; 


#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 
#define 


COL8_666666 
COL8_FF6666 
COL8_66FF66 
COL8_FFFF66 
COL8_6666FF 
COL8_FF66FF 
COL8_66FFFF 
COL8_FFFFFF 
COL8 C6C6C6 
COL8_846666 
COL8_668466 
COL8 848466 
COL8 900084 
COL8_ 840084 
COL8 908484 
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#define COL8 848484 15 


/* dsctbl.c */ 
struct SEGMENT_DESCRIPTOR { /* 5.9, 6.4 */ 
short limit_low, base_low; 
char base_mid, access right; 
char limit_high, base high; 
}; 
struct GATE DESCRIPTOR { fF Beery 
short offset_low, selector; 
char dw_count, access right; 
short offset_high; 
}; 
void init_gdtidt(void); /* 5.9, 12.1, 20.5, 20.8, 21.5, 
21.6, 22.2 */ 
void set_segmdesc(struct SEGMENT DESCRIPTOR *sd, 
unsigned int limit, int base, int ar); /* 5.9, 6.4 */ 
void set_gatedesc(struct GATE_DESCRIPTOR *gd, int 


offset, int selector, int ar); A D9. ae | 
#define ADR_IDT Q0x0026F800 
#define LIMIT_IDT Q0x000007 FF 
#define ADR_GDT Qx00270000 
#define LIMIT_GDT Ox0000f FFF 
#define ADR_BOTPAK Qx00280000 


#define LIMIT_BOTPAK Ox0007F FFF 
#define AR_DATA32_RW Q@x4092 
#define AR_CODE32_ER 0x409a 
#define AR_LDT 0x0082 
#define AR_TSS32 0x0089 
#define AR_INTGATE32 0x008e 


/* int.c */ 

void init_pic(void); /* 6.5 */ 
#define PICO_ICW1 0x0020 
#define PICO OCW2 0x0020 


#define PIC6_IMR 0x0021 


#define PICO ICW2 0x0021 


#define PICO_ICW3 0x0021 
#define PIC6_ICW4 0x0021 
#define PIC1_ICW1 Q@x80a0 
#define PIC1 OCW2 Q@x00a0 
#define PIC1 IMR Q@x00al1 
#define PIC1 ICW2 Q@x00al 
#define PIC1 ICW3 Q@x00al1 
#define PIC1 ICW4 Q@x00al 


/* keyboard.c */ 

void inthandler21(int *esp); /J* 6565 Lely Fal 50.7635 
7.4; 7.5, 13.4 */ 

void wait_KBC_sendready(void); /* 7.6 */ 

void init_keyboard(struct FIFO32 *fifo, int data0); /* 


7.6, 13.4 */ 
#define PORT_KEYDAT 0x0060 
#define PORT_KEYCMD 0x0064 


/* mouse.c */ 
struct MOUSE_DEC { /* 8.2, 8.3 */ 
unsigned char buf[3], phase; 
int x, y, btn; 
}; 
void inthandler2c(int *esp); /* 6.6, 7.7 */ 
void enable_mouse(struct FIFO32 *fifo, int dataQ, 
struct MOUSE DEC *mdec); /* 7.6, 8.2, 13.4 */ 
int mouse_decode(struct MOUSE DEC *mdec, unsigned char 
dat); /* 8.2, 8.3 */ 


/* memory.c */ 

#define MEMMAN_FREES 4090 /* 232KB */ 

#define MEMMAN_ADDR 0x003c0000 

struct FREEINFO { /* 剩余 容量 信息 */ /* 9.4 */ 
unsigned int addr, size; 


}; 


struct MEMMAN { /* 内 存 管理 */ /* 9.4 */ 

int frees, maxfrees, lostsize, losts; 

struct FREEINFO free[MEMMAN_FREES]; 
}; 
unsigned int memtest(unsigned int start, unsigned int 
end); /* 9.2 */ 
void memman_init(struct MEMMAN *man) ; /* 9.4 */ 
unsigned int memman_total(struct MEMMAN *man); /* 9.4 
*/ 
unsigned int memman_alloc(struct MEMMAN *man, unsigned 
int size); /* 9.4 */ 
int memman_free(struct MEMMAN *man, unsigned int addr, 
unsigned int size); /* 9.4 */ 
unsigned int memman_alloc_4k(struct MEMMAN *man, 
unsigned int size); /* 10.1 */ 
int memman_free_4k(struct MEMMAN *man, unsigned int 
addr, unsigned int size); /* 10.1 */ 


/* sheet.c */ 
#define MAX_SHEETS 256 
struct SHEET { /* 10.2, 11.3, 23.8 */ 
unsigned char *buf; 
int bxsize, bysize, vx®, vy@, col_inv, height, 
flags; 
struct SHTCTL *ctl; 
struct TASK *task; 
}; 
struct SHTCTL { /* 10.2, 11.8 */ 
unsigned char *vram, *map; 
int xsize, ysize, top; 
struct SHEET *sheets[MAX_SHEETS ]; 
struct SHEET sheets@[MAX_SHEETS]; 
}; 
struct SHTCTL *shtctl_init(struct MEMMAN *memman, 
unsigned char *vram, int xsize, int ysize); 
/* 10.2, 11.3, 11.8 */ 


struct SHEET *sheet_alloc(struct SHTCTL *ctl); /* 
10.2, 23.8 */ 
void sheet_setbuf(struct SHEET *sht, unsigned char 
*buf, int xsize, int ysize, int col_inv); 

/* 10.2 */ 
void sheet_updown(struct SHEET *sht, int height); /* 
10.2, 11.3, 11.7, 11.8 */ 
void sheet_refresh(struct SHEET *sht, int bx@, int by@, 
int bx1, int by1); /* 10.2, 10.3, 11.3, 11.7, 11.8 */ 
void sheet_slide(struct SHEET *sht, int vx@, int vy@); 
/* 10.2, 10.3, 11.3, 11.7, 11.8 */ 
void sheet_free(struct SHEET *sht); /* 10.2, 11.3 */ 


/* timer.c t/ 
#define MAX_TIMER 500 
struct TIMER { /* 12.4, 13.4, 13.5, 24.8 */ 
struct TIMER *next; 
unsigned int timeout; 
char flags, flags2; 
struct FIFO32 *fifo; 
int data; 
}; 
struct TIMERCTL { /* 12.2, 12.3, 12.4, 12.6, 12.7, 
13.5 */ 
unsigned int count, next; 
struct TIMER *t®; 
struct TIMER timers@[MAX_TIMER]; 
}; 
extern struct TIMERCTL timerctl; 
void init_pit(void); /* 12.1, 12.2, 12.3, 12.4, 
12.6, 12.7, 13.6 */ 
struct TIMER *timer_alloc(void); /* 12.4, 12.7, 24.8 
*/ 
void timer_free(struct TIMER *timer) ; /* 12.4 */ 
void timer_init(struct TIMER *timer, struct FIFO32 
*fifo, int data); /* 12.4, 13.4 */ 


void timer_settime(struct TIMER *timer, unsigned int 
timeout); /* 12.4, 12.5, 12.6, 12.7, 13.5, 13.6 */ 
void inthandler2@(int *esp); ff A? 1 12-25-12-33 
12.4, 12.5, 12.6, 12.7, 13.4, 13.5, 13.6, 15.7 */ 

int timer_cancel(struct TIMER *timer); /* 24.8 */ 
void timer_cancelall(struct FIFO32 *fifo); /* 24.8 */ 


/* mtask.c */ 


#define MAX_TASKS 1000 /* 最 大 任务 数量 */ 
#define TASK GDTO 3 /* TSS 从 GDT 的 几 号 开始 分 配 
ey 


#define MAX_TASKS LV 100 
#define MAX_TASKLEVELS 10 
struct TSS32 { /* 15.1, 16.1 */ 
int backlink, esp@, ss@, esp1, ssi, esp2, ss2, cr3; 
int eip, eflags, eax, ecx, edx, ebx, esp, ebp, esi, 
edi; 
int es, cs, ss, ds, fs, gs; 
int ldtr, iomap; 
}; 
struct TASK { /* 16.1, 16.4, 16.5, 17.4, 25.6, 26.7, 
27.4, 28.3, 28.4, 28.5, 28.6 */ 
int sel, flags; /* sel 代 表 GDT 编 号 */ 
int level, priority; 
struct FIFO32 fifo; 
struct TSS32 tss; 
struct SEGMENT DESCRIPTOR ldt[2]; 
struct CONSOLE *cons; 
int ds_base, cons_stack; 
struct FILEHANDLE *fhandle; 
int *fat; 
char *cmdline; 
unsigned char langmode, langbyte1; 
}; 
struct TASKLEVEL { /* 16.5 */ 
int running; /* 活 动 的 任务 数量 */ 


int now; /* 保 存 当 前 活动 任务 的 变量 */ 
struct TASK *tasks[MAX_TASKS LV]; 
}; 
struct TASKCTL { /* 16.1, 16.5 */ 
int now_lv; /* 当 前 活动 的 层级 */ 
char lv_change; /* 下 次 切换 任务 时 是 否 需 要 改变 层级 */ 
struct TASKLEVEL level[MAX_TASKLEVELS ]; 
struct TASK tasks@[MAX_TASKS]; 


}; 

extern struct TASKCTL *taskctl; 

extern struct TIMER *task_timer; 

struct TASK *task_now(void) ; /* 16.5 */ 

struct TASK *task_init(struct MEMMAN *memman); /* 
16.1, 16.4, 16.5, 17.1, 27.4 */ 

struct TASK *task_alloc(void); /* 16.1, 22.3, 27.4 */ 
void task_run(struct TASK *task, int level, int 
priority); /* 16.1, 16.4, 16.5 */ 

void task_switch(void); /* 16.1, 16.4, 16.5 */ 

void task_sleep(struct TASK *task); /* 16.2, 16.5 */ 


/* window.c */ 

void make_window8(unsigned char *buf, int xsize, int 
ysize, char *title, char act); /* 11.4, 16.3, 17.3 */ 
void putfonts8_asc_sht(struct SHEET *sht, int x, int y, 
int c, int b, char *s, int 1); /* 13.1, 29.1 */ 

void make_textbox8(struct SHEET *sht, int x@, int y@, 
int sx, int sy, int c); /* 14.6 */ 

void make_wtitle8(unsigned char *buf, int xsize, char 
*title, char act); /* 17.3 */ 

void change_wtitle8(struct SHEET *sht, char act); [7 
24.5 */ 


/* console.c */ 

struct CONSOLE { /* 20.1, 23.6 */ 
struct SHEET *sht; 
int cur_x, cur_y, cur_c; 


struct TIMER *timer; 


}5 

struct FILEHANDLE { /* 28.3 */ 
char *buf; 
int size; 
int pos; 

}; 


void console task(struct SHEET *sheet, int memtotal); 

/* 17.2, 17.4, 18.2, 18.3, 18.4, 18.5, 18.6, 18.7, 
19.1, 19.2, 19.3,19.5, 20.1, 20.2, 25.6, 25.10, 26.8, 
26.10, 27.2, 28.3, 28.4, 28.5, 28.6 */ 
void cons_putchar(struct CONSOLE *cons, int chr, char 
move) ; /* 20.1, 26.10 */ 
void cons _newline(struct CONSOLE *cons); /* 20.1, 
26.10, 28.6 */ 
void cons_putstr@(struct CONSOLE *cons, char *s); /* 
20.8 */ 
void cons_putstri(struct CONSOLE *cons, char *s, int 
1); /* 20.8 */ 
void cons_runcmd(char *cmdline, struct CONSOLE *cons, 
int *fat, int memtotal); 

/* 20.1, 20.6, 20.8, 26.7, 26.9, 26.10, 28.5 */ 
void cmd_mem(struct CONSOLE *cons, int memtotal ) ; fe 
20.1, 20.8 */ 
void cmd_cls(struct CONSOLE *cons); /* 20.1 */ 
void cmd_dir(struct CONSOLE *cons); /* 20.1, 20.8 */ 
void cmd_exit(struct CONSOLE *cons, int *fat); /* 
26.7, 26.10 */ 
void cmd_start(struct CONSOLE *cons, char *cmdline, int 
memtotal); /* 26.9 */ 
void cmd_ncst(struct CONSOLE *cons, char *cmdline, int 
memtotal ); /* 26.10 */ 
void cmd_langmode(struct CONSOLE *cons, char *cmdline); 
/* 28.5, 28.7 */ 
int cmd_app(struct CONSOLE *cons, int *fat, char 
*cmdline) ; 


/* 20.6, 21.1, 21.2, 21.4, 21.6, 22.4, 23.8, 24.5, 
24.8, 25.6, 25.7, 27.4, 28.3, 28.6, 29.2 */ 
int *hrb_api(int edi, int esi, int ebp, int esp, int 
ebx, int edx, int ecx, int eax); 

/* 21.6, 22.1, 22.4, 22.5, 22.6, 23.1, 23.2, 23.3, 
23.4, 23.5, 23.6, 23.8, 

24.5, 24.7, 24.8, 25.1, 25.4, 25.6, 26.2, 27.2, 

28.3, 28.4, 28.7, 29.2, 29.5 */ 
int *inthandlerðd(int *esp); /* 21.6, 22.2, 25.6 */ 
int *inthandlerðc(int *esp); /* 22.2, 25.6 */ 
void hrb_api_linewin(struct SHEET *sht, int x@, int y@, 
int x1, int y1, int col); /* 23.4 */ 


/* file.c */ 
struct FILEINFO { /* 18.7, 19.1 */ 

unsigned char name[8], ext[3], type; 

char reserve[1@]; 

unsigned short time, date, clustno; 

unsigned int size; 
}; 
void file readfat(int *fat, unsigned char *img); /* 
19.3 */ 
void file loadfile(int clustno, int size, char *buf, 
int *fat, char *img); /* 19.3 */ 
struct FILEINFO *file_search(char *name, struct 
FILEINFO *finfo, int max); /* 20.1 */ 
char *file_loadfile2(int clustno, int *psize, int 
*fat); /* 29.2 */ 


/* tek.c */ 

int tek_getsize(unsigned char *p); /* 29.2 */ 

int tek_decomp(unsigned char *p, char *q, int size); 
/* 29.2 */ 


/* bootpack.c */ 
struct TASK *open_constask(struct SHEET *sht, unsigned 


int memtotal) ; /* 26.10 */ 
struct SHEET *open_console(struct SHTCTL *shtctl, 
unsigned int memtotal) ; /* 26.5, 26.7, 26.10 */ 


apilib.h 


void api_putchar(int c); /* 21.2, 21:6; 27.5 */ 
void api_putstr@(char *s); /* 22.4, 27.5 */ 

void api_putstri(char *s, int 1); /* 27.5 */ 

void api_end(void); /* 21.6 */ 

int api_openwin(char *buf, int xsiz, int ysiz, int 
col_inv, char *title); /* 22.5 */ 

void api_putstrwin(int win, int x, int y, int col, int 
len, char *str); /* 22.6 */ 

void api_boxfilwin(int win, int xð, int yO, int x1, int 
y1, int col); /* 22.6 */ 

void api_initmalloc(void); /* 23.1 */ 

char *api_malloc(int size); /* 23.1 */ 

void api_free(char *addr, int size); /* 23.1. */ 
void api_point(int win, int x, int y, int col); /* 23.2 
gi 

void api_refreshwin(int win, int xð, int yO, int x1, 
int y1); JF 23.3: "7 

void api_linewin(int win, int xð, int y@, int x1, int 
y1, int col); /* 23.4 */ 

void api_closewin(int win); /* 23.5 */ 

int api_getkey(int mode); /* 23.6 */ 

int api_alloctimer(void); /* 24.7 */ 

void api_inittimer(int timer, int data); /* 24.7 */ 
void api_settimer(int timer, int time); /* 24.7 */ 
void api_freetimer(int timer); /* 24.7 */ 

void api_beep(int tone); fF 25:1. *7 


int api_fopen(char *fname); /* 28.3 */ 

void api_fclose(int fhandle) ; /* 28.3 */ 

void api fseek(int fhandle, int offset, int mode); /* 
28.3 */ 

int api_fsize(int fhandle, int mode); /* 28.3 */ 

int api_fread(char *buf, int maxsize, int fhandle); /* 
28.3 */ 

int api_cmdline(char *buf, int maxsize); /* 28.4 */ 
int api_getlang(void); /* 28.7 */ 


